Try
            Dim p As New Process
            Dim psi As New ProcessStartInfo(My.Settings.Path_IView, "" & _
              "/batchscan=(" & My.Settings.ZielDateiname & "," & _
              My.Settings.StartIndex & "," & My.Settings.Erhöhung & _
            "," & My.Settings.Zifferzahl & ",1," & _
            My.Settings.Path_ScanSpeicherort & ",jpg,0)")
            psi.UseShellExecute = False
            psi.RedirectStandardError = True
            psi.RedirectStandardOutput = True
            psi.CreateNoWindow = True
            p.StartInfo = psi
            p.Start()
 
            'p.WaitForExit()
            Process_ID = p.Id
            AppActivate(Process_ID)
            SendKeys.SendWait("{DOWN}")
            SendKeys.SendWait("{TAB}")
            SendKeys.SendWait("{DOWN}")
            SendKeys.SendWait("{ENTER}")
 
 
            'MessageBox.Show("Error: " + p.StandardError.ReadToEnd())
            'MessageBox.Show("Output: " + p.StandardError.ReadToEnd())
        Catch ex As Exception
            MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei" & _
              "btnStart.Click:")
        End Try

Ich glaube nicht, dass Zitronenfalter wirklich Zitronen falten