Try
            p = New Process
            With p.StartInfo
                .FileName = "arp.exe"
                .Arguments = "-a > c:\arp.txt"
                .CreateNoWindow = True
                .UseShellExecute = False
                .RedirectStandardOutput = True
            End With
            p.Start()
            p.WaitForExit()
            Dim sr As New IO.StreamReader(p.StandardOutput.BaseStream, _
              System.Text.Encoding.GetEncoding(850))
            Debug.WriteLine(sr.ReadToEnd)
            Debug.WriteLine("Exit code " & p.ExitCode)
        Catch ex As Exception
            Debug.WriteLine(ex.ToString)
        End Try