Chat with Me -- HOST

[Kernelpanic]

Thanks, Pete! I would not have thought of the "$" next to the function.

The program works now. One more note, without "Console" one can not enter "\".

Code: (Select All)

'Externes Programm aufrufen mit Funktion - 15. Dez. 2022
'Korrektur durch Pete bei der Funktion "$" - 16. Dez. 2022
'Ohne "Console" kann "\" nicht eingegeben werden

$Console:Only

Option _Explicit

Declare Function externesProgramm(extern As String) As String

Dim As String externerAufruf

Input "Externes Programm: ", externerAufruf

Shell _Hide _DontWait "D:\" + Chr$(34) + "Program Files" + Chr$(34) + externesProgramm(externerAufruf)

End

Function externesProgramm$ (extern As String)

  Dim As String pfad

  pfad = extern
  externesProgramm = pfad
End Function