Dear all,

My form contains a button to save a report to PDF. However, the future
user can not choose the folder the pdf is placed, nor the name of the
pdf: this is all automatically generated; I assume this is done by the
pdf-printer.

Is there a way to make it possible that the folder and/or filename of
the pdf can be chosen by the user?

I was thinking of using fHandleFile or acSysCmd, but I definitely
could use some hints to help me on the way somewhat more.

Best regards,
Sietske

***************************************************************************­***
My current code (with help of accarch131.zip on
http://www.helenfeddema.com/access.htm)
looks like this:

  'Remember the standard printer
  Set prt = Application.Printer
  Debug.Print "Current default printer: " & prt.DeviceName

  'Make the PDF-printer temporary the standard printer
  Application.Printer = Printers("PDFCreator")

  'Print the report to the PDF-printer
   Dim strDocName As String
   Dim strWhere As String
   strDocName = "rptConsult"
   strWhere = "[Id_Consult]=" & Me!Id_Consult
  DoCmd.OpenReport strDocName, acViewNormal, , strWhere

  'Make the original printer standard again
  Application.Printer = prt

***************************************************************************­***