If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below. |
|
|
Thread Tools | Display Modes |
#21
|
|||
|
|||
I AM SO DUMB..........................PLEASE HELP
Hi - It's me again. I guess I was just so happy to hear the printer go off - I didn't pay too much attention to what the form was printing. When I hit print form all that spits out is a blank work order form - none of the information I entered shows up. Simple Solution???
|
#22
|
|||
|
|||
I AM SO DUMB..........................PLEASE HELP
On Tue, 1 Jun 2004 07:01:09 -0700, kdc
wrote: Hi - It's me again. I guess I was just so happy to hear the printer go off - I didn't pay too much attention to what the form was printing. When I hit print form all that spits out is a blank work order form - none of the information I entered shows up. Simple Solution??? Print a Report with a correct recordsource. Since you don't say what you did, and I don't really want to go digging back through Google for previous posts (and since you probably didn't post your code or your queries there anyway), I can't give a more detailed answer, I fear! Could you give us a bit of help here? John W. Vinson[MVP] Come for live chats every Tuesday and Thursday http://go.compuserve.com/msdevapps?loc=us&access=public |
#23
|
|||
|
|||
I AM SO DUMB..........................PLEASE HELP
Thanks for replying: the code I have entered is:
Private Sub Command48_Click() Dim strCriteria As String strCriteria = "[WorkOrder#]=" & Me![workorder#] DoCmd.OpenReport "Work Order", acViewNormal, , strCriteria Exit_Command48_Click: Exit Sub Err_Command48_Click: MsgBox Err.Description Resume Exit_Command48_Click End Sub I have a print form command button on the form in which I want to print each form (re-directed to a report with the same name Work Order #) after it has been completly entered. |
#24
|
|||
|
|||
I AM SO DUMB..........................PLEASE HELP
On Wed, 2 Jun 2004 08:26:12 -0700, kdc
wrote: Thanks for replying: the code I have entered is: Private Sub Command48_Click() Dim strCriteria As String strCriteria = "[WorkOrder#]=" & Me![workorder#] DoCmd.OpenReport "Work Order", acViewNormal, , strCriteria Exit_Command48_Click: Exit Sub Err_Command48_Click: MsgBox Err.Description Resume Exit_Command48_Click End Sub I have a print form command button on the form in which I want to print each form (re-directed to a report with the same name Work Order #) after it has been completly entered. You probably need to explicitly save the record currently being edited to disk before launching the report. Try putting a line If Me.Dirty = True Then Me.Dirty = False immediately before the DoCmd.OpenReport line; this will write the record currently on the form into the table, where it will be available for the report. John W. Vinson[MVP] Come for live chats every Tuesday and Thursday http://go.compuserve.com/msdevapps?loc=us&access=public |
Thread Tools | |
Display Modes | |
|
|