Das Notes Forum

Domino 9 und frühere Versionen => ND8: Entwicklung => Thema gestartet von: domino23 am 13.05.14 - 09:12:11

Titel: Anhänge aller Dokumente auf Platte speichern
Beitrag von: domino23 am 13.05.14 - 09:12:11

Moin,

ich muss aus einer sehr alten DB alle Anhänge jeglicher Dokumente auf Platte speichern.
Dabei weiss ich nicht immer, in welchem Feld der Anhang steckt (DB ist teilweise aus eigener Entwicklung), sodass ich mit

Code

If doc.HasEmbedded Then

zwar identifizieren kann ob ein Dok ein Anhang hat aber nicht in welchem Feld.

Das ist mein Ansatz:

Code

Set rtitem = doc.GetFirstItem( "Body" )
Forall o In rtitem.EmbeddedObjects  

Nicht jedes RTItem hat den Namen "Body".
Wie bekomme ich denn alle Anhänge aus den Dokumenten, auch wenn ich den Feldnamen nicht kenne?
Habt ihr einen Tipp?

Danke für Hilfe!

EDIT:
Notes 8.5.1
Domino 6.5.2

Max

Titel: Re: Anhänge aller Dokumente auf Platte speichern
Beitrag von: koehlerbv am 13.05.14 - 09:16:32

@AttachmentsNames evaluieren und abarbeiten, wenn da ein Ergebnis kommt.

Bernhard

Titel: Re: Anhänge aller Dokumente auf Platte speichern
Beitrag von: Alexander 28 am 13.05.14 - 09:16:57

siehe hier

http://atnotes.de/index.php/topic,57080.0.html

Titel: Re: Anhänge aller Dokumente auf Platte speichern
Beitrag von: domino23 am 13.05.14 - 11:15:24

Jo, funktioniert einwandfrei.
Ich musste nur noch zwischen DocLinks und Anhängen unterscheiden, aber läuft.

Vielen Dank!