Hallo,
ich benötige einen Agenten, der bei selektierten Dokumenten
- alle Dateianlagen in einen vom Benutzer angegebenen Ordner speichert,
- den Speicherpfad der Dateianlagen in das Dokument schreibt
- und die Dateianlagen dann aus dem Dokument entfernt.
Im openntf.org Codebin habe ich den beigefügten Agenten gefunden und mal eingebaut.
Der Agent funktioniert super bei Dokumenten, bei denen vorhandenen Anlagen mit dem "Büroklammer"-Symbol in der Ansicht gelistet werden.
Bei vielen Dokumenten werden vorhandene Anlagen allerdings mit dem Symbol "Zerissene blaue Seiten" gelistet und hier extrahiert der Agent die Anlagen nicht, sondern meldet folgende Fehler:
---
Notes Error at line 155: FOR loop not initialized
Notes Error at line 156: FOR loop not initialized
Notes Error at line 158: FOR loop not initialized
Notes Error at line 173: FOR loop not initialized
Notes Error at line 174: FOR loop not initialized
Notes Error at line 175: Object variable not set
Notes Error at line 176: Object variable not set
---
Auszug aus dem Scriptcode:
151 If ( rtitem.Type = RICHTEXT ) Then
152 If Not Isempty(rtitem.EmbeddedObjects) Then
153 Forall obj In rtitem.EmbeddedObjects
154 If ( obj.Type = EMBED_ATTACHMENT ) Then
155 FileSize = obj.FileSize 'will count toward the "TotalFileSize" of all files deleted from documents
Ich vermute, das in den Dokumenten die Anlagen unterschiedlich gespeichert werden: Richtext oder Mime (multipart/related, multipart/mixed, Content-Disposition: inline) oder ?
Und nun meine Fragen:
- für welchen "Anlagen"-Typ verwendet Notes welches "Anlagen"-Symbol?
- was müsste im Script angepasst werden, damit wirklich alle Anlagen extrahiert werden?
Besten Dank für Anregungen und Tipps!