Access, PDF & e-mailen

[madref]

Hoi iedereen,

Gegevens:
Rapport: "rpt_GeflotenWedstrijdenPerScheidsrechter"
e-mailadres: "scheidsrechter@umpire.com"

Weet iemand hoe je automaties MET ÉÉN DRUK OP DE KNOP van een rapport een PDF kunt maken (als je een pdfwriter hebt) en dit versturen via e-mail in access, zonder dat je nog iets moet invoeren via het toetsenbord.

 

[beheer25]

Je moet dan iig een pdfwriter hebben die je argumenten mee kunt geven zodat zonder tussenkomst van de gebruiker gewerkt kan worden.

Wat je dan moet doen is met VBA het commando samenstellen dat ervoor zorgt dat je pdf-bestand wordt gegenereerd. En dan met een mailcomponentje of m.b.v. de outlook API het mailtje opbouwen en versturen. Van dat laatste staat een voorbeeld in een andere post van mij : http://www.helpmij.nl/forum/showthread.php?t=236842


Grtz,

 

[madref]

Het mailen is me gelukt middels onderstaande code

Public Sub SendEmail(strTo As String, strSubject As String, strBody As String, blnSend As Boolean, Optional strAttachement As String)
    'Procedure om e-mail te kunnen versturen via Outlook.

On Error GoTo Err_SendEmail

    Set objoutlook = CreateObject("Outlook.Application")
    Set objemail = objoutlook.CreateItem(olMailItem)
    
    With objemail
        .To = strTo
        .ReadReceiptRequested = False
        .Subject = strSubject
        .body = strBody
        If Len(strAttachement) > 0 Then
            Set objOutlookAttach = .Attachments.Add(strAttachement)
        End If
        If blnSend = True Then
            .Send
        Else
            .Save
        End If
    End With
    
    Set objemail = Nothing
    Set objoutlook = Nothing

Exit_SendEmail:
    Exit Sub

Err_SendEmail:
    MsgBox "Fout: " & Err.Description, vbCritical + vbOKOnly, "Error: " & Err.Number
    Resume Exit_SendEmail

End Sub

Maar nu het printen van een PDF-file
Ik loop tegen het volgende probleem aan.
Ik moet een bestandsnaam opgeven in een dialoogvenster, maar nu wil ik het dialoogventer omzeilen.
Hoe doe ik dat?

 

[beheer25]

Welke pdfwriter gebruik je? Staat er niets in de documentatie daarvan hoe je die commandline kunt aansturen?


Grtz,

 

[madref]

Gewoon Adobe Pro 7.0

 

[beheer25]

Die ken ik helaas niet. Helpt de helpfile je ook niet verder? Of google? zoek eens op commandline arguments oid...


Grtz,