B
Bob Vance
Is it possible that this report can open then close then send it to email
reciepent in .txt format?
Also can Subject: "Horse Billing Details" be added
Private Sub cmdShowBillEmail_Click()
On Error GoTo Err_Command12_Click
Dim stDocName As String
stDocName = "HorseInfoOwner"
DoCmd.OpenReport "HorseInfoOwner", acViewPreview, ,
"[qHorseNameSourceAddModifyAll.HorseID]=Forms!frmHorseInfo!HorseID"
DoCmd.SendObject acReport, stDocName
Exit_Command12_Click:
Exit Sub
Err_Command12_Click:
Resume Exit_Command12_Click
End Sub
reciepent in .txt format?
Also can Subject: "Horse Billing Details" be added
Private Sub cmdShowBillEmail_Click()
On Error GoTo Err_Command12_Click
Dim stDocName As String
stDocName = "HorseInfoOwner"
DoCmd.OpenReport "HorseInfoOwner", acViewPreview, ,
"[qHorseNameSourceAddModifyAll.HorseID]=Forms!frmHorseInfo!HorseID"
DoCmd.SendObject acReport, stDocName
Exit_Command12_Click:
Exit Sub
Err_Command12_Click:
Resume Exit_Command12_Click
End Sub