kbrooks
Still learning
- Local time
- Today, 03:44
- Joined
- May 15, 2001
- Messages
- 202
I am going crazy here. I had this db just about ready and was making some slight changes (in appearance only) before rolling it out. I had a user log on and try to use it to see if I was missing anything.
Before, on the form OPRegistration, you clicked a button that saved and then printed the report OPLabels for the current record. The first patient she registered, she clicked this button and got a blank report. (Blank except for headings, I guess.) I honestly don't think I made any changes once I got it working, and in looking at the code and at previous posts here, I can't figure out what's wrong. Hopefully that's enough information for someone much smarter than me to figure this out. Here is the code behind the command button:
Private Sub Command71_Click()
On Error GoTo Err_Command71_Click
DoCmd.RunCommand acCmdSaveRecord
DoCmd.OpenReport "OPLabels", , , "[Account] = " & Me![Account]
DoCmd.Close acForm, "OPRegistration"
Exit_Command71_Click:
Exit Sub
Err_Command71_Click:
MsgBox Err.Description
Resume Exit_Command71_Click
End Sub
TIA
Before, on the form OPRegistration, you clicked a button that saved and then printed the report OPLabels for the current record. The first patient she registered, she clicked this button and got a blank report. (Blank except for headings, I guess.) I honestly don't think I made any changes once I got it working, and in looking at the code and at previous posts here, I can't figure out what's wrong. Hopefully that's enough information for someone much smarter than me to figure this out. Here is the code behind the command button:
Private Sub Command71_Click()
On Error GoTo Err_Command71_Click
DoCmd.RunCommand acCmdSaveRecord
DoCmd.OpenReport "OPLabels", , , "[Account] = " & Me![Account]
DoCmd.Close acForm, "OPRegistration"
Exit_Command71_Click:
Exit Sub
Err_Command71_Click:
MsgBox Err.Description
Resume Exit_Command71_Click
End Sub
TIA