Search results

Nope, lost focus throws an error... stops the code on the AddNewRec line........ And.... After a new image is added the tab key does nothing. ???

Have an odd little problem that I cant seem to solve.... Pick up a very simple code and form on here for linked images in a db.... I added a "Description" field and planning to add some other items..... Problem I am having is after I add the new image I want to set focus on the "Description"...

You can do something like this, on the afterupdate field of the barcode, see attached, via VBA. Or you can create fields in a query using the "Right", "Mid","Left" but in this case, via query, you would need to save the barcode..... Maybe :) I'm still thinking about the need to save the field.......

First, I think you should have created a new post. Second, what yo seem to be talking about is a full blown cost accounting system. NOT an easy task for even seasoned developers. My advice.... Tell your boss to look for some prepackaged software.

I admit I have not jumped into my 2007 as much as I need to.....BUT, I don't think that is something in 07 either.... Looks like some custom coding needed to me too.... And keep in mind some sort of "Date/Time" stamp on each entry... I'm guessing this might be needed.

One little trick I sometimes use is the expression builder.. Then you will have the path written correctly by Access... No typos or errors... might give it a try.

Should just be a Memo field.

Private Sub cmdInsert_DoubleClick() Forms![frmFormName]![FieldName] = Me.FieldName DoCmd.Close End Sub Stick your close in there too :)

Private Sub Cmd08_Click() On Error GoTo Err_Cmd08_Click Dim stDocName As String Dim stLinkCriteria As String stDocName = "StartForm02" stLinkCriteria = "[RptID]=" & Me![Combo03] If IsNull(Me![Combo03]) Then MsgBox "Please choose a report from the drop down list." Else DoCmd.OpenForm...

Do a search on "cascading combo box" here... That sounds like what you are looking for. Lots of info and samples in the forum.

An example for code on a textbox for LastName Private Sub LastName_AfterUpdate() Screen.ActiveControl = StrConv(Screen.ActiveControl, 3) End Sub The numbers... 1 for all upper, 2 for all lower, 3 to capitalize first letter of every word.

Try the Nz function in your db... should copy over.... Nz(fieldname)

Look here.. http://msdn.microsoft.com/en-us/library/aa140082(office.10).aspx Also search on "Merge to word" .... One way uses "Bookmark" in Word. I think the full code might be in the forum someplace... And Yes, it does come in handy when you have a standard Word document...like a contract.. and...

Maybe something like this on the before update of your textbox will give you some ideas.......... Dim strValue As String Dim strLeft As String strValue = "E" strLeft = Left(strValue, 1) If strLeft = Left(yourTextBox, 1) Then MsgBox "yes it is E" Else MsgBox "No...

Take a look at this little example...might give you some ideas...

Do a search on "Validation" I think you'll see a few ways to do it... You might look into changing your validation criteria to a function, then call the function on close...

Andy, I copied your code into a form and subform I had.... worked fine.... Could there be another event being triggered....a OnDirty...an update.... something that is causing the problem?

Well, simply tag the ones you want to do something ( an asterisk in the tag property for example) with and leave others with no tag.... something this.. If ctl.ControlType = acTextBox Then "do something" ElseIf ctl.ControlType = acTextBox And ctl.Tag = "*" Then "do something else" else End...

How bout using the tag property to exclude it....

Well, if I'm reading this correctly it looks like your "Payment Received" is going to be what triggers the calculation... In that case I would put it on the BeforeUpdate event of that field. Something like... If me.PaymentReceived = me.PaymentPending or me.PaymentBalance = 0 then me.PayStatus =...