Hi
I want to email Invoice ID1 from a list of Invoices in a datasheet
My code for printing is
strDocName = "rptInvoice "
strWhere = "[InvID]=" & Me.fsubPrintInv oice.Form![InvID]
DoCmd.OpenRepor t strDocName, acPreview, , strWhere
I am trying the following adjustment with the sendObject
'DoCmd.SendObje ct acSendReport, "rptInvoice " = "[InvID]=" &
Me.fsubPrintInv oice.Form![InvID], acFormatSNP, _
"", , , "Your Invoice....", "If you can not view the report
you will need to download the free SnapShot reader at
www.microsoft.com/downloads (Search by Keywords SnapShot)", True
And it is not working
Can anyone help or advise a better method
Regards
DD
I want to email Invoice ID1 from a list of Invoices in a datasheet
My code for printing is
strDocName = "rptInvoice "
strWhere = "[InvID]=" & Me.fsubPrintInv oice.Form![InvID]
DoCmd.OpenRepor t strDocName, acPreview, , strWhere
I am trying the following adjustment with the sendObject
'DoCmd.SendObje ct acSendReport, "rptInvoice " = "[InvID]=" &
Me.fsubPrintInv oice.Form![InvID], acFormatSNP, _
"", , , "Your Invoice....", "If you can not view the report
you will need to download the free SnapShot reader at
www.microsoft.com/downloads (Search by Keywords SnapShot)", True
And it is not working
Can anyone help or advise a better method
Regards
DD
Comment