RSS
StartseiteKnowledge LibraryTop 10Impressum

7.13 Wie kann ich bei der Shell-Funktion ein Arbeitsverzeichnis mitgeben?

VB4-VB6

Von: Thorsten Dörfler

Die Shell-Funktion lässt einen Parameter vermissen, der der gestarteten Anwendung ein abweichendes Arbeitsverzeichnis übergeben lässt. Sie können jedoch vor dem Start des Programms das aktuelle Verzeichnis Mithilfe der ChDrive-/ChDir-Funktionen setzen. Dies wird automatisch dem neu gestarteten Prozess vererbt:

Public Function ShellEx(ByVal PathName As String, _
               Optional ByVal WindowStyle As VbAppWinStyle = vbMinimizedFocus, _
               Optional ByVal DirName As String) As Double

  If CBool(Len(DirName)) Then
    ChDrive DirName
    ChDir DirName
  End If

  ShellEx = Shell(PathName, WindowStyle)
End Function