VBA module - Send Snapshot

[amfroehlich]

Can you send a snapshot view of a report using a VBA module?

 

[Joe4]

Here is a line of code that will print a report to a Snapshot file via VBA code:

DoCmd.OutputTo acReport, "ReportName", "SnapshotFormat(*.snp)", "FilePathAndName", False, ""

substitute the correct values for "ReportName" and "FilePathAndName" (this is the destination of the saved output).

 

[amfroehlich]

Could i mix that with this code?

DoCmd.GoToRecord , , acNewRec
DoCmd.Close
DoCmd.SetWarnings (WaringsOff)
Dim olApp As Object, olMail As Object
Set olApp = CreateObject("Outlook.Application")
Set olMail = olApp.CreateItem(olMailItem)
With olMail
.to = "MarketingRequest@dmi-stl.com"
.Subject = "A Marketing Print Requst Has Been Made"
.Body = "A print project request has been submitted company time number : " + CTN + " and number : " + PNum
.DeleteAfterSubmit = True
.Send
End With
Set olMail = Nothing
Set olApp = Nothing
DoCmd.SetWarnings (WarningsOn)