Выполнить команду батника - Visual Basic .NET

Формулировка задачи:

Пытаюсь выполнить команду батника:

                    Листинг программы
                
 Process.Start("cmd", "/c systeminfo /s " & TextBox3.Text & " /fo list >d:\info.txt")

Команда выводит в текстовый файл информацию о системе с удаленного компьютера. В TextBox3.Text - заносим имя компьютера. Все шикарно работает, но я хочу что бы файл сохранялся в папке с проектом. пытаюсь сделать так:

                    Листинг программы
                
Process.Start("cmd", "/c systeminfo /s " & ListBox1.SelectedItem & " /fo list >" & Application.StartupPath & "\info.txt")

но почему то не работает! Помогите разобраться, что я не так написал? Заранее спасибо!

Решение задачи: «Выполнить команду батника»

textual
                            Листинг программы 
                        
 
                        
                          
                    
        Dim proc As System.Diagnostics.Process
        proc = New System.Diagnostics.Process()
        Dim arg As String = "systeminfo /s " & ListBox1.SelectedItem & " /fo list >""" & Application.StartupPath & "\info.txt"""
        proc .StartInfo.FileName = "C:\Windows\System32\cmd.exe"
        proc .StartInfo.Arguments = "/C " & arg
        proc .StartInfo.WindowStyle = ProcessWindowStyle.Hidden
        proc .StartInfo.UseShellExecute = False
        proc .StartInfo.CreateNoWindow = True
        proc .Start()
        proc .WaitForExit()