Hallo Leute!
Um ein attached File zu lösen, benutzt man normalerweise das embeddedobjects property im notesrichtextitem. unter 4.6 habe ich aber anscheinend das problem, dass in einer mail mit attached file, welche aus dem internet kam, das embeddedobjects property immer leer ist, obwohl ein file angehängt ist.
wie kriege ich nun dieses file aus der memo?
Servus, Herbert
Hallo Herbert!
Hiermit sollte es funktionieren:
Attachments = Evaluate("@Attachments",doc)
AttachmentNames = Evaluate("@AttachmentNames",doc)
AttachmentCount% = 0
While AttachmentCount% 0 Then
Set obj = Doc.GETATTACHMENT(AttachmentNames(Attachmentcount%))
Call obj.ExtractFile ( „d:“ & Obj.Name )
Attachmentcount%=Attachmentcount%+1
End If
Wend
Gruß
Peter
Servus und danke - ja. GetAttachment lautet das Zauberwort, habe es inzwischen auch schon selbst rausgefunden. Übrigens ist der Umweg über die Formelsprache nicht nötig, es gibt ein Item $File im Dokument, wo die einzelnen attacheden Filenamen drinstehen!
Herbert
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]