Da du die Objekte des Strukturbaums alle abgrasen willst, ist es ratsam statt der Strings in den Item-Statements Zahlenwerte zu nehmen. Collections fangen immer bei 1 an und z.B. CATIA.Documents.Count gibt die Anzahl der vorhandenen Elemente an.

Gerade für das abgrasen aller Elemente des Strukturbaums lege ich dir den Eintrag zu ReferenceProduct in der "Product"-Beschreibung der Doku ans Herz.

Ein File zum schreiben öffnen geht so:

Code:

---

FileName = "C:\Ordner\Datei.txt"
FS = CATIA.FileSystem

if FS.FileExists(FileName) = "Wahr" then
  set FD = FS.GetFile(FileName)
else
  set FD = FS.CreateFile(FileName, False)
end if

set TS = FD.OpenAsTextStream("ForAppending")
TS.Write "something"
TS.Close

---