Guten Tag Zusammen,
momentan beschäftige ich mit einer VBA-Programmierung die eine PDF-Datei auslesen soll, welche sich als Anhang an einer E-Mail befindet. Diese soll im Anschluss in als Textdatei in einem Ordner abgelegt werden. Hierfür steht mir die Professional Variante des Adobe Readers zur Verfügung.
Bei meiner Recherche ist habe ich nur Lösungen gefunden, bei denen das E-Mail Attachment zwischengespeichert und erst anschließend geöffnet wird. Meine Lösung ist zwar funktionsfähig aber lässt in der Performance sehr zu wünschen übrig.
Das Zwischenspeichern stellt sich bei mir wie folgt dar:
If Right(oAtt.FileName, 3) = "pdf" Then
strPfad = "C:\Users\" & Environ("USERNAME") & "\AppData\Local\Temp\" & Temp & ".pdf"
oAtt.SaveAsFile strPfad
Call Inhalt_Auslesen(strPfad)
Kill (strPfad)
End If
Den Aufruf habe ich so umgesetzt:
Set objDocument = New Acrobat.AcroPDDoc
With objDocument
.Open strPfad
Meine Frage ist, wie und ob ich ein E-Mail Attachment ohne zwischenspeichern einlesen kann.
Gruß
H.B.
|