I can't figure out why Access form "OutputTo" is creating extra pages. As it is, the code below creates the correct page number 1, but then adds 24 additional pages that don't make sense. I've attached the pdf file so you can see what I mean. Below the code are screenshots of the page setup properties.
Code:
Private Sub cmdPDF_Click()
Dim shellstring As String
Dim ShellRC As Variant
On Error GoTo Err_Handler
DoCmd.OutputTo acOutputForm, "frmPrkgNorth", acFormatPDF, "c:\Revel\RDS\ParkingNorth.pdf"
If bolCtrlPDF Then
shellstring = "c:\Windows\Explorer.exe " & "c:\Revel\RDS\ParkingNorth.pdf"
ShellRC = Shell(shellstring, 4)
bolCtrlPDF = False
End If
Exit_Handler:
Exit Sub
Err_Handler:
MsgBox "Error " & Err.Number & " amidst PDF creation : " & Err.description
Resume Exit_Handler
End Sub