Creation of pdf-files from a VBA programming of a database application

Question

In a kind of form letter practice through a modular programming in Microsoft Access individual invoices created as PDF files shall be sent as serial e-mails.
Example: After a seminar, for example 50 people shall receive individual invoices with invoice number and the respective address.
After creation we don’t want the pdf-documents to be displayed on the screen. It should be automatically transferred through our MS-Access-programming to Outlook for serial e-mails.
The functionality of the automation is positioned in a VBA module (Visual Basic for Application) of a MS Access form.
At this point Acrobat PDF should be controlled by MS-Access VBA programming (and not manually by the user).
To implement such an automatic, we need a documentation of the interfaces for the later in the text referred Acrobat objects, which can be addressed in the MS-Access VBA Programming.
References in Microsoft Access:
Adobe Acrobat 10.0 Type Library
Acrobat Access 3.0 Type Library
Acrobat Distiller
Objects according to Microsoft Access Object Browser:
AcroApp
AcroAVDoc
AcroAXDoc
AcrobatAccessLib
ACRODISTXLib
AcroHiliteList
AcroPDDoc
AcroPoint
AcroRect
AcroTime
Among the listed objects and their properties and methods, we need a comprehensive description.
Are there special *. DLL or *. chm or *. hlp - files
which can be addressed by MS-Access directly to automatically generate PDF files?

Answer 1

Google the following:
Software\Adobe\Acrobat Distiller\PrinterJobControl\
I have done this using a Report I designed in MS Access, you basically print to the 'ADOBE PDF' printer. No need to use any of the References you listed.
I loop thru a recordset of Customer IDs and generate my reports. I do the Outlook piece after I have generated the pdf files.
My Access report has no RecordSet, it is set on the fly, using the following:
Private Sub Report_Open(Cancel As Integer)
Me.RecordSource = sqlReport
End Sub
sample code:
sub genReports
Dim lRC
Dim sReg
Dim emailPath As String
Dim accessPath As String
Dim strKey As String
Dim rsCust As New ADODB.Recordset
Dim rsRecs As New ADODB.Recordset
       emailPath = currentproject.path & "\email\"
       accessPath = SysCmd(acSysCmdAccessDir)
       accessPath = accessPath & "MSACCESS.EXE"
       strKey = "Software\Adobe\Acrobat Distiller\PrinterJobControl\"
        Set sReg = GetObject("winmgmts://./root/default:StdRegProv")
       'PrinterJobControl key
       lRC = sReg.CreateKey(HKEY_CURRENT_USER, strKey)
       'query to get Customer IDs     
       rsCust.Open "qryReportCust", CurrentProject.Connection, adOpenStatic
       Do Until rsCust.EOF
        strCust =rsCust!CustID
        'sqlReport is a function that uses CustID as parameter
        rsRecs.Open sqlReport, CurrentProject.Connection, adOpenStatic
        If Not rsRecs.BOF Then
           lRC = sReg.SetStringValue(HKEY_CURRENT_USER, strKey, _
                                     accessPath, emailPath & strCust & ".pdf")
            DoCmd.OpenReport "rptCustomerInvoice", acViewNormal
        End If
        rsRecs.Close
        Set rsRecs = Nothing
   rsCust.MoveNext
    Loop
   rsCust.Close
end sub