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