Dim strFilePath2 As String = "C:\AE\pdfmerge_xxx.cmd"
 
        ' Create the ProcessInfo object
        Dim psi2 As New System.Diagnostics.ProcessStartInfo("cmd.exe")
        psi2.UseShellExecute = False
        psi2.RedirectStandardOutput = True
        psi2.RedirectStandardInput = True
        psi2.RedirectStandardError = True
        psi2.WorkingDirectory = "C:\AE\"
 
        ' Start the process
        Dim proc2 As System.Diagnostics.Process = _
          System.Diagnostics.Process.Start(psi2)
 
        '' Open the batch file for reading
        Dim strm2 As System.IO.StreamReader = System.IO.File.OpenText( _
          strFilePath2)
 
        '' Attach the output for reading
        Dim sOut2 As System.IO.StreamReader = proc2.StandardOutput
 
        '' Attach the in for writing
        Dim sIn2 As System.IO.StreamWriter = proc2.StandardInput
 
        '' Write each line of the batch file to standard input
        While strm2.Peek() <> -1
            sIn2.WriteLine(strm2.ReadLine())
        End While
 
        strm2.Close()
 
        '' Exit CMD.EXE
        Dim stEchoFmt2 As String = "# {0} run successfully. Exiting"
 
        sIn2.WriteLine([String].Format(stEchoFmt2, strFilePath2))
        sIn2.WriteLine("EXIT")
 
        ' Close the process
        proc2.Close()
 
        '' Read the sOut to a string.
        Dim results2 As String = sOut2.ReadToEnd().Trim()
 
        '' Close the io Streams;
        sIn2.Close()
        sOut2.Close()
 
        ''Write out the results.
        Dim fmtStdOut2 As String = "<font face=courier size=0>{0}</font>"
        Me.Response.Write([String].Format(fmtStdOut2, results2.Replace( _
          System.Environment.NewLine, "<br>")))
        '
        output3.Text = System.Security.Principal.WindowsIdentity.GetCurrent( _
          ).Name
        output4.Text = results2

=====================================

Gruss
Tobias