"rptInvoice" = "[InvID]=" & Me.fsubPrintInvoice.Form![InvID],
See correction below
"rptInvoice", "InvID]=" & Me.fsubPrintInvoice.Form![InvID],
Filip
"DD" <david.deacon@bigpond.com.au> wrote in message
news:1412655e.0408022218.6ac3fdde@posting.google.c om...[color=blue]
> 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.fsubPrintInvoice.Form![InvID]
> DoCmd.OpenReport strDocName, acPreview, , strWhere
>
> I am trying the following adjustment with the sendObject
>
> 'DoCmd.SendObject acSendReport, "rptInvoice" = "[InvID]=" &
> Me.fsubPrintInvoice.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[/color]
Email Invoice 
