Hi Michel,
das Problem liegt in dem Programm das aufgerufen wird, das ist schlecht programmiert. Statt nach App.Path wird nach CurDir geschrieben, das führt dann zu solchen Fehlern.
Wenn das Programm von dir ist, ist es besser das Programm in Ordnung zu bringen.
Ist das Programm nicht von Dir, kannst Du dem Pfad aber einfach selbst setzen und das Programm dann aufrufen. Ein Beispielprogramm, in dem der Pfad gesetzt wird:
Option Explicit
Private Declare Function SetCurrentDirectory \_
Lib "kernel32" Alias "SetCurrentDirectoryA" \_
(ByVal lpPathName As String) As Long
Private Sub Command1\_Click()
SetCurrentDirectory "C:\"
Me.Caption = CurDir
End Sub
Gruß Rainer