Print gives header only

[Don Elston]

I have a data entry form and a print form. After entering
date, the user selects PRINT from command button. The form
prints correctly. IF the user then selects the command
button to "ENTER ANOTHER". it opens a new record.

When the PRINT is used on this record, only the header of
the form prints. THe record is saved prior to print.

DoCmd.Save
DoCmd.OpenForm "FIRECALL1", acViewPreview, , "
FireRecord ='" & FireRecord & "'"

DoCmd.PrintOut

Exit_Command51_Click:
Exit Sub

This is the code, but how do I get it to print the entire
form on 2nd and 3rd records.

Thanks

 

[SteveS]

-----Original Message-----
I have a data entry form and a print form. After entering
date, the user selects PRINT from command button. The form
prints correctly. IF the user then selects the command
button to "ENTER ANOTHER". it opens a new record.

When the PRINT is used on this record, only the header of
the form prints. THe record is saved prior to print.

DoCmd.Save
DoCmd.OpenForm "FIRECALL1", acViewPreview, , "
FireRecord ='" & FireRecord & "'"

DoCmd.PrintOut

Exit_Command51_Click:
Exit Sub

This is the code, but how do I get it to print the entire
form on 2nd and 3rd records.

Thanks
.

The short answer is, you don't.

Forms are to enter, edit and/or view the data. Reports are
for printing. Make a report with the same record source as
the form, then use

DoCmd.OpenReport "FIRECALL1", acViewPreview, , "

FireRecord ='" & FireRecord & "'"

HTH

Steve