Dim p2 As new Process()
p2.StartInfo.FileName = "cmd.exe"
p2.StartInfo.UseShellExecute = False '关闭Shell的使用
p2.StartInfo.RedirectStandardInput = True '重定向标准输入
p2.StartInfo.RedirectStandardOutput = True '重定向标准输出
p2.StartInfo.RedirectStandardError = True '重定向错误输出
p2.StartInfo.CreateNoWindow = True '设置不显示窗口
p2.Start()
p2.StandardInput.WriteLine( "ping > D:\ping.txt" )
p2.StandardInput.WriteLine("exit")
Dim dqzfc As String = FileSys.ReadAllText("D:\ping.txt", Encoding.Default)
Output.Show( dqzfc)
请问为何读取的文件内容不是最新的?非要运行两次?
测试:
1、如果输入p2.StandardInput.WriteLine( "ping1 > D:\ping.txt" ) 输出文件内容为空
1、如果输入p2.StandardInput.WriteLine( "ping > D:\ping.txt" ) 输出文件内容有内容