所以我尝试过 Process 并启动 cmd.exe 并将命令直接发送到该窗口。然后获取写入 cmd.exe 窗口的值。
代码如下所示:
Dim arrServers As ArrayList
Dim s(ListBoxServers.Items.Count) As String
ListBoxServers.Items.CopyTo(s, 0)
arrServers = New ArrayList(s)
Using P As New Process
P.StartInfo.FileName = "cmd.exe"
P.StartInfo.UseShellExecute = False
P.StartInfo.RedirectStandardOutput = True
P.StartInfo.RedirectStandardInput = True
P.Start()
For Each i In arrServers
P.StandardInput.WriteLine("query user " & txtBoxUsername.Text & " /server:" & i)
Next
P.StandardInput.WriteLine("exit")
Output = P.StandardOutput.ReadToEnd()
Trace.WriteLine(Output)
MsgBox(Output)
P.WaitForExit()
End Using
但看起来它并没有“按回车键”之类的。这意味着,我没有从该命令中得到任何结果。我什至没有得到“‘命令’不被识别为内部或外部命令、可操作程序或批处理文件。”就像你通常在不理解语法时得到的那样。
看看Process http://msdn.microsoft.com/en-us/library/system.diagnostics.process.aspxSystem.Diagnostics 命名空间中用于运行批处理文件的类。
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)