Hallo zusammen!
Habe ein kleines Script mit dem ich einfach Dateien umkonvertieren kann. Was soweit auch funktioniert:
catpart -> igs
igs -> catpart
stp -> catpart
catpart -> stp
aber isg <-> stp geht nicht. Wieso? Muss ich erst als catpart speichern oder wo liegt das Problem?
Sub Test()
Set FSO = CreateObject("Scripting.FileSystemObject")
MySource = "C:\"
MyTarget = "C:\"
MyFile = "test.stp"
MyFilter = "igs"
Set ActDocs = CATIA.Documents
Set SelDoc = ActDocs.Open(MySource & MyFile)
MsgBox MyTarget & FSO.GetBaseName(MyFile) & "." & MyFilter
SelDoc.ExportData MyTarget & FSO.GetBaseName(MyFile) & "." & MyFilter, MyFilter
End Sub
/edit: Hat sich erledigt. Musste die Datei nochmals mit ActiveDocument abgreifen.
[Diese Nachricht wurde von Maetes am 22. Nov. 2010 editiert.]
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP