Print button to auto print a form

[spectraflame]

I have created a print button that when clicked will print a specific form. The problem that I am having is that it prints a copy of the form for each record that I have in my database. I just need a single copy.

Is there a way to force the print button to only print a single copy of this form? By the way, this form has no data from my database. It just contains data labels.

Here is the code that I am currently using.

Private Sub Print_Blank_Click()
On Error GoTo Err_Print_Blank_Click

Dim stDocName As String

stDocName = "Blank Work Order"
DoCmd.OpenReport stDocName, acNormal

Exit_Print_Blank_Click:
Exit Sub

Err_Print_Blank_Click:
MsgBox Err.Description
Resume Exit_Print_Blank_Click

End Sub


Thanks,
Matthew

 

[bat17]

If the report is printing multiple times then it must be using data from your db

try opening the record source for the report and seeing how many records it shows

Peter

 

[spectraflame]

bat17,

I deleted all of the fields within the report and recreated each label. When I view the report, it shows me exactly what I want, but there is a copy of the blank report in the print preview for every record that is in my database but it is not showing any real data from the database.

Still confused?
Matthew

 

[spectraflame]

I figured it out. I created a new blank report and then copied all of my text labels from the screwed up one to the new one.

All is well.

Thanks for your help.

Matthew