Close PDF file without Save prompt
Posted on 2007-07-30
I'm using Outlook2000 and Acrobat 7 Pro, I have a VBA script that watches a Outlook Folder for new mail then prints the attachments, either PDF or TIFF. It uses Acrobat 7 Pro to open and print the attachments, the issue is that Acrobat then prompts to save the file before closing. Is there anyway I can disable this prompt, either from within Adobe Acrobat or from the VBA script?
Below is the print sub from my script.
I've tried the AcroApp.Close call but it doesn't work.
Sub PrintPDF2(ByVal FileName As String, Optional Copies As Long = 1)
'++ Prints the PDF files using a command line.
'++ Written by Masaru Kaji aka Colo
'++ FileName : Required String expression that specifies a file name
'++ - may include directory or folder, and drive..
'++ Copies : Optional Long. The number of copies to print.
'++ If omitted one copy is printed.
Dim cnt As Long
Set myShell = CreateObject("WScript.Shell")
Dim Acro As AcroApp
Set Acro = New AcroApp
For cnt = 1 To Copies
'opens Acrobat and prints file
'myShell.Run ("""C:\Program Files\Adobe\Acrobat 7.0\Reader\AcroRd32.exe""" & "/t " & FileName)
myShell.Run ("""C:\Program Files\Adobe\Acrobat 7.0\Acrobat\Acrobat.exe""" & "/t " & FileName)