---

Hallo,

ich lese Daten von einem geöffneten CATPart in eine Textdatei. Wenn CATIA in Tools/Options auf Folder = Current gesetzt ist, kann ich den Pfad eines geöffneten CATPart folgendermassen ermitteln:

Dim sFile
sFile = CATIA.ActiveDocument.Path & CATIA.FileSystem.FileSeparator & sFileName

Bei der Verwendung von DLNames bekomme ich z.B. folgenden Wert für sFile:

"
\CATIAV5MAP_01\Geo Set_Part7_DeleteMe.txt"

unter Windows. Dabei steht CATIAV5MAP_01 für den Namen des DLNames. Folgender Code schlägt dann fehl:

Dim oFileOut
Set oFileOut = oFileSys.CreateFile(sFile, FALSE)

Unter Unix bekomme ich mit DLNames ähnliche Probleme.

Hat jemand eine Idee, wie man trotz der Verwendung von DLNames den absoluten Pfad eines Dokuments ermitteln kann?

vielen Dank

Viele Grüße,
Logan

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo logan,

guckst du hier:
http://ww3.cad.de/foren/ubb/Forum137/HTML/000784.shtml#000001

Gruß
CAMiCADse

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo CAMiCADse,

ich hatte den Post überflogen und wohl falsch verstanden ("XML Datei generieren und auslesen..."). Werde noch mal in mein Kämmerlein gehen und das durcharbeiten.

Dumm, dass die Dateioperationen in V5 Automation absolute Pfade erfordern, CATIA das DLName Konzept unterstützt, dem Programmierer jedoch nur so eine unelegante Lösung bereitstellt.

CAMiCADse, ich bin mich für den Hinweis sehr dankbar! 

Viele Grüße,
Logan

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Nun die Lösung:

Set oSetCtrls = CATIA.SettingControllers
Dim oSetCtrl 'As SettingController
Set oSetCtrl = oSetCtrls.Item("CATSysDLNameSettingCtrl")
Dim sUnixPath 'As String
Dim sWinPath 'As STring
Dim sParentDL 'As String
sParentDL = ""
oSetCtrl.GetDLName("MyDLName", sUnixPath, sWinPath, sParentDL)

'Die Variablen sUnixPath und sWinPath enthalten nun die Pfade
'GetDLName liefert einen Fehler, wenn der DLName nicht existiert, dafür bitte mit On Error Resume Next... absichern

Viele Grüße,
Logan

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP