Hi,
mit folgender Funktion führe ich ein externes Programm aus:
Public Sub ShellandWait(ByVal ProcessPath As String)
Dim objProcess As System.Diagnostics.Process
Try
objProcess = New System.Diagnostics.Process()
objProcess.StartInfo.FileName = ProcessPath
objProcess.StartInfo.WindowStyle = ProcessWindowStyle.Normal
objProcess.Start()
'Wait until the process passes back an exit code
objProcess.WaitForExit()
'Free resources associated with this process
objProcess.Close()
Catch
Console.WriteLine("Could not start process " & ProcessPath)
End Try
End Sub
Funktioniert auch problemlos, es sei den ich setzte das Ganze in einem Dienst ein.
Dann öffnet sich kein Programm mehr und die Funktion wird sofort wieder verlassen, allerdings gibt es auch keinen Fehler.
Hat jemand einie Lösung dafür?
Danke,
Andre