M
M Skabialka
http://www.mvps.org/access/reports/rpt0011.htm
Having been told that users had Adobe on their machines already I was
able to adapt the code on this site and it worked like a champ using Adobe
PDFWriter. Now I find out they all have Adobe Distiller, not Adobe
PDFWriter. I tried changing all instances in the code from PDFWriter to
Distiller but now it asks for a file name and location for each report, when
I am running a series in a batch, and there should be no user prompt at all.
In fact I am trying to run this from a command line, which works great on my
PC of course, but not on theirs.
Can anyone suggest what changes I need in the code on this web-site which
will make my batch run using Distiller rather than PDFWriter?
The code I think has to change is:
strOldDefault = QueryKey("Software\Microsoft\Windows
NT\CurrentVersion\Windows", "Device")
SetKeyValue "Software\Microsoft\Windows NT\CurrentVersion\Windows",
"Device", "Acrobat PDFWriter", REG_SZ
SetKeyValue "Software\Adobe\Acrobat PDFWriter", "PDFFilename", strPath,
REG_SZ
SetKeyValue "Software\Adobe\Acrobat PDFWriter", "bExecViewer", 0, REG_SZ
(Print report here)
SetKeyValue "Software\Microsoft\Windows NT\CurrentVersion\Windows",
"Device", strOldDefault, REG_SZ
Thanks,
Mich
Having been told that users had Adobe on their machines already I was
able to adapt the code on this site and it worked like a champ using Adobe
PDFWriter. Now I find out they all have Adobe Distiller, not Adobe
PDFWriter. I tried changing all instances in the code from PDFWriter to
Distiller but now it asks for a file name and location for each report, when
I am running a series in a batch, and there should be no user prompt at all.
In fact I am trying to run this from a command line, which works great on my
PC of course, but not on theirs.
Can anyone suggest what changes I need in the code on this web-site which
will make my batch run using Distiller rather than PDFWriter?
The code I think has to change is:
strOldDefault = QueryKey("Software\Microsoft\Windows
NT\CurrentVersion\Windows", "Device")
SetKeyValue "Software\Microsoft\Windows NT\CurrentVersion\Windows",
"Device", "Acrobat PDFWriter", REG_SZ
SetKeyValue "Software\Adobe\Acrobat PDFWriter", "PDFFilename", strPath,
REG_SZ
SetKeyValue "Software\Adobe\Acrobat PDFWriter", "bExecViewer", 0, REG_SZ
(Print report here)
SetKeyValue "Software\Microsoft\Windows NT\CurrentVersion\Windows",
"Device", strOldDefault, REG_SZ
Thanks,
Mich