Recent content by NDuarte

Parent Form: 'Executes when previous button is pressed Private Sub Previous_Disease_Condition_Button_Click() 'When an error is encountered, go to the proper handler On Error GoTo Err_Previous_Disease_Condition_Button_Click 'Go to previous record DoCmd.GoToRecord , , acPrevious...

Not a problem. Are you using buttons you created or the native buttons on the bottom of the form?

You are correct to assume that access does not read the green lines. These are comments. Try this in the Parent form and let me know how it works: 'This is the code that executes when you click the button Private Sub Pathophysiology_command_Click() 'If an error occurs, go to the appropriate...

It seems as if the code is being put on a button instead of the open event. On you child form the code should look like the below: 'This is the "On Open" Event Code. This runs when the form is opened Private Sub Form_Open(Cancel As Integer) 'Create the string that will hold your variable...

Add "" after the <>

That is my fault. I failed to see that you were using Access 2003. TempVars were not added until 2007. Instead of setting the TempVars, you can just refer the the field value like: Forms![Main Form Name]!ID.Value In your searchrecord statement on the child form

On the "On Current" event, instead of using Not Null try the following: If Nz(Me.COMMISSION.Value,"") <> Then Me.COMMISSION.Locked = True Else Me.COMMISSION.Locked = False End If I created a test database and inserted this code and it worked. If it doesn't check to make sure that the name...

Are you using your own buttons or the built in record navigators?

What is the end result supposed to be? A query would probably be the best thing to do to get the inforamtion if I am understanding this correctly. If we know what the end result is supposed to be, we may be able to provide so assistance. Thanks!

What is highlighted when the error occurs? Also, why are you trying to get in on the "On Current" event instead of the "On Open" Event?

Try changing the line: DoCmd.OpenForm stDocName, , , stLinkCriteria to: DoCmd.OpenForm stDocName Also, change: TempVars.Add "ID", Me![ID] to TempVars.Add "ID", Me.ID.Value. Let me know if that fixes it. On the child, copy the following code in (*This code needs to be on the...

There is an option that you can use that will make this work the way you want. Private Sub Pathophysiology_command_Click() On Error GoTo Err_Pathophysiology_command_Click Dim stDocName As String Dim stLinkCriteria As String stDocName = "Secondary Nutrition Information...