Dim q As New Process
        Dim qsi As New ProcessStartInfo("cmd")
 
        Try
            qsi.FileName = "run.bat"
            qsi.UseShellExecute = False
            qsi.RedirectStandardError = True
            qsi.RedirectStandardOutput = True
            qsi.WindowStyle = ProcessWindowStyle.Hidden
            qsi.WorkingDirectory = CLRoot 'verzeichnis in dem run.bat gestartet 
            ' werden soll!
            q.StartInfo = qsi
            q.Start()
            Me.lvMeldungen.Items.Add("Clarity Start OK!")
            Me.bInfobrokerVerbinden.Enabled = True
        Catch ex As Exception
            Me.lvMeldungen.Items.Add("Clarity Start fehlgeschlagen!")
        End Try

mfg
rt