Sorry maybe someone else can help you.
This was the answer:
Sub SendReportAsSNP(PW As String, subj As String, text As String)
Dim appOutlook As New Outlook.Application
Dim itm As Outlook.MailItem
Dim strEMailRecipient As String
Dim strSnapshotFile As String
strSnapshotFile = <filepath and name>
'DoCmd.OutputTo ObjectType:=acOutputReport, _
objectname:=strReport, _
outputformat:=acFormatSNP, _
outputfile:=strSnapshotFile
'Create new mail message and attach snapshot file to it
Set itm = appOutlook.CreateItem(olMailItem)
With itm
.To = strEMailRecipient
.subject = subj
.Body = text
.Attachments.Add strSnapshotFile
.Send
End With
End Sub
> Sorry maybe someone else can help you.
>
[quoted text clipped - 52 lines]
> > > > > > > > > >
> > > > > > > > > > Thanks!
Rick Brandt - 11 Apr 2006 12:30 GMT
> This was the answer:
>
[quoted text clipped - 3 lines]
> Dim strEMailRecipient As String
> Dim strSnapshotFile As String
[snip]
It is *an* answer, but not to the original question which specified the use of
SendObject(). If you can use Snapshot for OutputTo but not for SendObject then
you are simply missing a registry entry.
Having said that, the Outlook method is far superior to using SendObject so I
would stay with that or automate CDO. I haven't used SendObject for many years
now.

Signature
Rick Brandt, Microsoft Access MVP
Email (as appropriate) to...
RBrandt at Hunter dot com