User login

Who's online

There are currently 1 user and 62 guests online.

Online users

Advertisements


SourceForge.net Logo

Sending email with object field

Submitted by Luhhha on Fri, 2008-09-05 13:37.

Hi everybody!

I'm using pdf creator 0.95 in a module of Access 2003, and I can send pdf files through Lotus Notes using these code:

Public Sub SendPDF(RepName As String, NomeFile As String, Criteri As String, Directory As String, Recipients As String)

Dim PDFCreator1 As PDFCreator.clsPDFCreator, DefaultPrinter As String, c As Long, OutputFilename As String
Set PDFCreator1 = New clsPDFCreator
With PDFCreator1
.cStart "/NoProcessingAtStartup"
.cOption("UseAutosave") = 1
.cOption("UseAutosaveDirectory") = 1
.cOption("AutosaveDirectory") = Directory
.cOption("AutosaveFilename") = NomeFile
.cOption("AutosaveFormat") = 0 ' 0 = PDF
DefaultPrinter = .cDefaultPrinter
.cDefaultPrinter = "PDFCreator"
MsgBox "Clicca OK per continuare", , "Creazione PDF"
.cClearCache
DoCmd.OpenReport RepName, acViewNormal, , Criteri
.cPrinterStop = False
End With

c = 0

Do While (PDFCreator1.cOutputFilename = "") And (c

© 2006 by pdfforge.org :: Contact us

Validate XHTML or CSS.