重定向外部程序输出的例子:
Dim proc As new System.Diagnostics.process
proc.StartInfo.FileName = "cmd.exe"
proc.StartInfo.UseShellExecute = False
proc.StartInfo.CreateNoWindow = True
proc.StartInfo.RedirectStandardInput = True
proc.StartInfo.RedirectStandardOutput= True
proc.StartInfo.RedirectStandardError= True
Dim strcmd As String = "ping www.163.com" & vbcrlf & "exit"
proc.Start()
proc.StandardInput.WriteLine(strcmd)
Dim result As String = proc.StandardOutput.ReadToEnd()
proc.WaitForExit()
proc.Close()
messagebox.show(result)
其实C#和vb.net的方法,在foxtable可以用
[此贴子已经被作者于2016/9/2 17:42:17编辑过]