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
	
	

