Domino 9 und frühere Versionen > Entwicklung
Attachment aus einer Mail DB lösen
sculer:
Hallo,
ich hab eigentlich vor, alle Attachments eine Mail DB zu lösen.
Dabei bin ich dann auf diesen Beitrag gestoßen
(http://atnotes.de/index.php?topic=22415.0)
der Code dafür sieht so aus:
--- Code: ---Dim doc As NotesDocument
Dim rtitem As Variant
'...set value of doc...
Set rtitem = doc.GetFirstItem( "Body" )
If ( rtitem.Type = RICHTEXT ) Then
Forall o In rtitem.EmbeddedObjects
If ( o.Type = EMBED_ATTACHMENT ) Then
Call o.ExtractFile( "c:\samples\" & o.Source )
Call o.Remove
Call doc.Save( False, True )
End If
End Forall
End If
--- Ende Code ---
, und wollte dies auch gleich mal testen. Hab auch das Beispiel in der Hilfe DB gefunden und versucht dieses umzusetzen.
Jedoch gibt er immer bei der Forall Schleife eine Type Mismatch Fehlermeldung aus. Nun ist aber noch die Frage, was ist eigentlich mit dem kleinen "o" ? Es wird nirgends gesetzt noch definiert. Kann mir da jemand weiterhelfen?
mfg
scipio:
Forall o In rtitem.EmbeddedObjects 'Mache mit allen Objekten des RichTextItems
o = eingebettete Objekte
If ( o.Type = EMBED_ATTACHMENT ) Then 'Wenn o dann ein Attachment ist
dann
- auf Laufwerk C lösen
- entfernen
- Doc speichern
Axel:
Wo genau kommt die Fehlermeldung. Lass mal den Debugger zu Wort kommen. Da siehst du dann wo's knallt.
Axel
koehlerbv:
@Axel: Knallen wird es vermutlich in dem Moment, wo ein RTI ohne embedded objects angefasst wird.
Forall o In rtitem.EmbeddedObjects
kann man nur verwenden, wenn rtitem.EmbeddedObjects nicht empty ist.
Weitere Fehlermöglichkeit, die nicht abgeprüft wirde
Es wird versucht, das Item "Body" zu instantiieren. Dieses muss nicht vorhanden sein. Es wäre hier noch auf rtitem Is Nothing zu prüfen (die Fehlermeldung wäre ohne die Prüfung aber "Object variable not set", ich erwähne das nur der Vollständigkeit halber).
@scipio: "o" ist ein völlig frei wählbarer Bezeichner für die Elemente, die in einer Forall-Schleife durchlaufen werden soll. Das muss also nicht zwangläufig ein eingebettetes Objekt sein und kann natürlich statt "o" auch "Hurz" heissen.
Bernhard
scipio:
Man kann das o auch hurz nennen? Ist ja erstaunlich.
Navigation
[0] Themen-Index
[#] Nächste Seite
Zur normalen Ansicht wechseln