Suppress PDF-print pop-up

[WilliamJames]

Hi all,

I have a chunck of code in Access to print a report to pdf. For every report the pdf-printer pops up the question wether I want to print the file with that particular name to that particular location - Send to Desktop, Save As, Append to other pdf's.

These are all things the code sets in advance, so I don't want this pop-up window. How do I suppress it? I am using FreePDF_XP.

Thanks in advance!

William

[westconn1]

read the user manual
page 10

[WilliamJames]

hyperlink please? thanks!

[westconn1]

http://66.163.168.225/babelfish/tran...PDFXPAdmin.pdf

try that, i just found it with google

[WilliamJames]

Thanks for the info so far.

Does anyone know how my registry file should be composed to disable the pop-up?

I have tried some stuff, but I cannot seem te get it right...

fi this does not work...

Windows Registry Editor Version 5.00

[HKEY_CURRENT_USER\Program Files\FreePDF_XP]disabledesktop
"PDFFilename"="H:\\Macros\\Reports\\EmployeeList_20100803.PDF"

Thanks in advance!

Bill

[westconn1]

CU/LM ADefaultsaveasLike pushing the Save As button. Dialog will not rise!

• CU means HKey_Current_User\Software\shbox\FreePdfXp
• LM means HKey_Local_Machine\Software\shbox\FreePdfXp

you can set the registry key from within your code and change back after

[WilliamJames]

I'm affraid I don't understand how to use this registry file, is it sth like this?

Open strPath & "CreatePDF.reg" For Append As #1
    
    Print #1, "Windows Registry Editor Version 5.00"
    Print #1, ""
    Print #1, "[HKey_Local_Machine\Software\shbox\FreePdfXp]"
    Print #1, "SaveAs=0"
    Print #1, """PDFFilename""=" & Chr(34) & strPDF & Chr(34)
    Close #1
    
    x = Shell("regedit.exe /s " & strPath & "CreatePDF.reg", vbHide)

    Kill strPath & "CreatePDF.reg"

Set Application.Printer = Application.Printers("FreePDF XP")
    DoCmd.OpenReport strReport, acViewNormal

Open strPath & "CreatePDF.reg" For Append As #1
    
    Print #1, "Windows Registry Editor Version 5.00"
    Print #1, ""
    Print #1, "[HKey_Local_Machine\Software\shbox\FreePdfXp]"
    Print #1, "SaveAs=1"
    Print #1, """PDFFilename""=" & Chr(34) & strPDF & Chr(34)
    Close #1
    
    x = Shell("regedit.exe /s " & strPath & "CreatePDF.reg", vbHide)

    Kill strPath & "CreatePDF.reg"

[westconn1]

there are better, more direct ways to read and write registry keys, than to shell to regedit

search on registry APIs
or registry scripting

if strpath can contain spaces shell will fail, unless the path is enclosed in quotes

[WilliamJames]

As a matter of fact, I can't seem to get it done, I'm affraid I'm gonna have to let loose this line of thought...