Hej!
I access finns det möjlighet att skicka en rapport till en fil. Formaten som finns att välja på är html, snp, rtf. ms-dos text och xls. Tyvärr finns inte PDF-formatet. Har någon tips på hur man skulle kunna skicka en rapport direkt till en fil av PDF-format.

Adobe har väl en printer-drivrutin som skriver till en PDF-fil
då behöver du bara koda att välja den skrivaren och srkiva ut..
kolla adobe.com?

Ola

Jag hittade följande kod (se nedan). Tyvärr fastnad Access på GetRegistryString. Sub eller function har inte definierats är felmeddelandet.

Tips på lösning?

'****KOD****

Public Sub RunReportAsPDF
On Error GoTo Err_RunReport

‘ Folder where PDF file will be written
sPDFPath = “C:\myapp\archive\”

‘ Save current default printer
sMyDefPrinter = GetRegistryString(HKEY_CURRENT_USER, "Software\Microsoft\WIndows NT\CurrentVersion\Windows", "Device")
‘ Set default printer to PDF Writer
SaveRegistryString HKEY_CURRENT_USER, "Software\Microsoft\WIndows NT\CurrentVersion\Windows", "Device", "Acrobat PDFWriter"

sPDFName = “myReport.pdf"
‘ Setting value for PDFFileName in the registry stops file dialog box from appearing
SaveRegistryString HKEY_CURRENT_USER, "Software\Adobe\Acrobat PDFWriter", "PDFFileName", sPDFPath + sPDFName

‘ Run the report
DoCmd.OpenReport “myReport”, acPreview

Exit_RunReport:
' Restore default printer
SaveRegistryString HKEY_CURRENT_USER, "Software\Microsoft\WIndows NT\CurrentVersion\Windows", "Device", sMyDefPrinter
Exit Sub

Err_RunReport:
MsgBox Err.Description
Resume Exit_RunReport

End Sub

'******Slut KOD*****

Om du öppnar raporten i design lägge kan du ställa in vilken skrivar den skall använd.
* Klicka på "Page Setup" under "File" menyn
* Under fliken "Page" i dialogen "Page Setup" finner du en ruta som heter "Printer for #Rapportens Namn#"
* Ändra option till "Use specific Printer"
* Klicka på "Printer" knappen och gör inställningarna av skrivare
* Spara du sedan raporten och den kommer använda dina inställningar.

Allt detta utan att du behöver någon speciel kod.