G
Guest
i am a relative newbie to this so you'll have to excuse this if the answer is
totally obviouso, but how do you programatically restrict the output to just
those records meeting your 'where' specifications. i am not seeing a place
when i write the output command below to insert my where clause as i did when
i created another cmd button to print the identical report:
Private Sub OutputSnp_Click()
On Error GoTo Err_OutputSnp_Click
Dim stDocName As String
Dim strWhere As String
stDocName = "By Site: Patients on Follow-Up"
strWhere = "[FollowUp] Between #" & _
Forms![Tracking Print By Site]![StartDate] & _
"# And #" & Forms![Tracking Print By Site]![StopDate] & "#"
DoCmd.OutputTo acOutputReport, stDocName, "SnapshotFormat(*.snp)" ?????
Exit_OutputSnp_Click:
Exit Sub
Err_OutputSnp_Click:
MsgBox Err.description
Resume Exit_OutputSnp_Click
End Sub
totally obviouso, but how do you programatically restrict the output to just
those records meeting your 'where' specifications. i am not seeing a place
when i write the output command below to insert my where clause as i did when
i created another cmd button to print the identical report:
Private Sub OutputSnp_Click()
On Error GoTo Err_OutputSnp_Click
Dim stDocName As String
Dim strWhere As String
stDocName = "By Site: Patients on Follow-Up"
strWhere = "[FollowUp] Between #" & _
Forms![Tracking Print By Site]![StartDate] & _
"# And #" & Forms![Tracking Print By Site]![StopDate] & "#"
DoCmd.OutputTo acOutputReport, stDocName, "SnapshotFormat(*.snp)" ?????
Exit_OutputSnp_Click:
Exit Sub
Err_OutputSnp_Click:
MsgBox Err.description
Resume Exit_OutputSnp_Click
End Sub