Hello everybody,
we have a Developer License from Version 2.1 and want to create PDF-Files by printing reports.
During printing we get a Error-Message: MS Access can't print your object
Does we need a other License ?
Because the Trail-Version 2.5 (Professional License) works right.[/b]
Problem by using PDF Converter with MS Access
Hello Joan,
thank you for your answer!
I have the Information, that we can't enable Amyuni as Printer, because we have only the DEVELOPER LICENSE: for integration and royalty-free distribution in applications.
We using our activation code only with the method enablePrinter.
With MS Word it works correctly, but there we using the Options of the PrintOut-Command to specify Filename etc.
Word-Example:
Sub PDFPrint()
'
' PDF-Druck in Eigene Dateien
'
Const PDF_PRINTER_NAME = "Amyuni PDF Converter"
Set PDFPrinter = CreateObject("CDIntfEx.CDIntfEx")
nRc = PDFPrinter.DriverInit(PDF_PRINTER_NAME)
strCompany = "..."
strCode = "..."
nRc = PDFPrinter.EnablePrinter(strCompany, strCode)
strFilename = ActiveDocument.Name + ".pdf"
strFilename = "P:\Eigene Dateien\" + strFilename
savePrinter = ActivePrinter
ActivePrinter = PDF_PRINTER_NAME
Application.PrintOut OutputFileName:=strFilename, FileName:="", Range:=wdPrintAllDocument, Item:= _
wdPrintDocumentContent, Copies:=1, Pages:="", PageType:=wdPrintAllPages, _
Collate:=False, Background:=False, PrintToFile:=True, PrintZoomColumn:=0, _
PrintZoomRow:=0, PrintZoomPaperWidth:=0, PrintZoomPaperHeight:=0
ActivePrinter = savePrinter
End Sub
thank you for your answer!
I have the Information, that we can't enable Amyuni as Printer, because we have only the DEVELOPER LICENSE: for integration and royalty-free distribution in applications.
We using our activation code only with the method enablePrinter.
With MS Word it works correctly, but there we using the Options of the PrintOut-Command to specify Filename etc.
Word-Example:
Sub PDFPrint()
'
' PDF-Druck in Eigene Dateien
'
Const PDF_PRINTER_NAME = "Amyuni PDF Converter"
Set PDFPrinter = CreateObject("CDIntfEx.CDIntfEx")
nRc = PDFPrinter.DriverInit(PDF_PRINTER_NAME)
strCompany = "..."
strCode = "..."
nRc = PDFPrinter.EnablePrinter(strCompany, strCode)
strFilename = ActiveDocument.Name + ".pdf"
strFilename = "P:\Eigene Dateien\" + strFilename
savePrinter = ActivePrinter
ActivePrinter = PDF_PRINTER_NAME
Application.PrintOut OutputFileName:=strFilename, FileName:="", Range:=wdPrintAllDocument, Item:= _
wdPrintDocumentContent, Copies:=1, Pages:="", PageType:=wdPrintAllPages, _
Collate:=False, Background:=False, PrintToFile:=True, PrintZoomColumn:=0, _
PrintZoomRow:=0, PrintZoomPaperWidth:=0, PrintZoomPaperHeight:=0
ActivePrinter = savePrinter
End Sub