---

Hallo,

ich habe eine Frage zur FileSelectionBox. Gibt es eine Möglichkeit den Pfad, wo z.B. die Dateien liegen, vorzubelegen? Ansonsten muss ich mich duch die Filestruktur klicken bis ich am Ziel bin. Vielleicht gibt es ja noch eine andere Möglichkeit?

Gruß

Meridian

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

---

Siehe hier

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

---

In CATScript

Sub CATMain ()

    Dim objDialog

    ' Create a dialog object
    Set objDialog = CreateObject( "UserAccounts.CommonDialog" )
   
myDir = "c:\temp\Diverse\"

    ' Check arguments and use defaults when necessary
    If myDir = "" Then
        ' Default initial folder is "My Documents"
        objDialog.InitialDir = CreateObject( "WScript.Shell" ).SpecialFolders( "MyDocuments" )
    Else
        ' Use the specified initial folder
        objDialog.InitialDir = myDir
    End If
    If myFilter = "" Then
        '  file filter can be "All files"  or something else
        '~ objDialog.Filter = "All files|*.*"
        objDialog.Filter = "CATParts|*.CATPart"
    Else
        ' Use the specified file filter
        objDialog.Filter = myFilter
    End If

    ' Open the dialog and return the selected file name
    If objDialog.ShowOpen Then
        GetFileName = objDialog.FileName
    Else
        GetFileName = ""
    End If

Dim ADoc As Document
  Set ADoc = CATIA.Documents.Open (GetFileName)

End Sub

------------------
Best regards
Fernando

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