[疑难] D语言如何实现类似的功能
sw2wolf
2007-10-22
使用C#调用外部Ping命令获取网络连接情况
以前在玩Windows 98的时候,几台电脑连起来,需要测试网络连接是否正常,经常用的一个命令就是Ping.exe.感觉相当实用. 现在 .net为我们提供了强大的功能来调用外部工具,并通过重定向输入、输出获取执行结果,下面就用一个例子来说明调用Ping.exe命令实现网络的检测,希望对.net初学者有所帮助. 首先,我们用使用Process类,来创建独立的进程,导入System.Diagnostics, using System.Diagnostics; 实例一个Process类,启动一个独立进程 Process p = new Process( ); Process类有一个StartInfo属性,这个是ProcessStartInfo类,包括了一些属性和方法, 下面我们用到了他的几个属性: 设定程序名 p.StartInfo.FileName = "cmd.exe"; 关闭Shell的使用 p.StartInfo.UseShellExecute = false; 重定向标准输入 p.StartInfo.RedirectStandardInput = true; 重定向标准输出 p.StartInfo.RedirectStandardOutput = true; 重定向错误输出 p.StartInfo.RedirectStandardError = true; 设置不显示窗口 p.StartInfo.CreateNoWindow = true; 上面几个属性的设置是比较关键的一步. 既然都设置好了那就启动进程吧, p.Start( ); 输入要执行的命令,这里就是ping了, p.StandardInput.WriteLine( "ping -n 1 192.192.132.229" ); p.StandardInput.WriteLine( "exit" ); 从输出流获取命令执行结果, string strRst = p.StandardOutput.ReadToEnd( ); 在本机测试得到如下结果: "Microsoft Windows 2000 [Version 5.00.2195] ( C ) 版权所有 1985-2000 Microsoft Corp. D:\himuraz\csharpproject\ZZ\ConsoleTest\bin\Debug>ping -n 1 192.192.132.231 Pinging 192.192.132.231 with 32 bytes of data: Reply from 192.192.132.231: bytes=32 time<10ms TTL=128 Ping statistics for 192.192.132.231: Packets: Sent = 1, Received = 1, Lost = 0 ( 0% loss ), Approximate round trip times in milli-seconds: Minimum = 0ms, Maximum = 0ms, Average = 0ms D:\himuraz\csharpproject\ZZ\ConsoleTest\bin\Debug>exit " 有了输出结果,那还有什么好说的,分析strRst字符串就可以知道网络的连接情况了. 下面是一个完整的程序,当然对Ping.exe程序执行的结果不全,读者可以进一步修改 完整代码如下: using System; using System.Diagnostics; namespace ZZ { class ZZConsole { [STAThread] static void Main( string[] args ) { string ip = "192.192.132.229"; string strRst = CmdPing( ip ); Console.WriteLine( strRst ); Console.ReadLine( ); } private static string CmdPing( string strIp ) { Process p = new Process( ); p.StartInfo.FileName = "cmd.exe"; p.StartInfo.UseShellExecute = false; p.StartInfo.RedirectStandardInput = true; p.StartInfo.RedirectStandardOutput = true; p.StartInfo.RedirectStandardError = true; p.StartInfo.CreateNoWindow = true; string pingrst; p.Start( ); p.StandardInput.WriteLine( "ping -n 1 "+strIp ); p.StandardInput.WriteLine( "exit" ); string strRst = p.StandardOutput.ReadToEnd( ); if( strRst.IndexOf( "( 0% loss )" )!=-1 ) pingrst = "连接"; else if(strRst.IndexOf( "Destination host unreachable." )!=-1 ) pingrst = "无法到达目的主机"; else if( strRst.IndexOf( "Request timed out." )!=-1 ) pingrst = "超时"; else if( strRst.IndexOf( "Unknown host" )!=-1 ) pingrst = "无法解析主机"; else pingrst = strRst; p.Close( ); return pingrst; } } } |
|
tomqyp
2007-10-22
tango正好有个类似的例子
private import tango.io.Stdout; private import tango.sys.Process; private import tango.core.Exception; private import tango.text.stream.LineIterator; /** * Example program for the tango.sys.Process class. */ void main() { version (Windows) char[] command = "ping -n 4 localhost"; else version (Posix) char[] command = "ping -c 4 localhost"; else assert(false, "Unsupported platform"); try { auto p = new Process(command, null); Stdout.formatln("Executing {0}", p.toUtf8()); p.execute(); Stdout.formatln("Output from process: {0} (pid {1})\n---", p.programName, p.pid); foreach (line; new LineIterator!(char)(p.stdout)) { Stdout.formatln("{0}", line); } Stdout.print("---\n"); auto result = p.wait(); Stdout.formatln("Process '{0}' ({1}) finished: {2}", p.programName, p.pid, result.toUtf8()); } catch (ProcessException e) { Stdout.formatln("Process execution failed: {0}", e.toUtf8()); } catch (IOException e) { Stdout.formatln("Input/output exception caught: {0}", e.toUtf8()); } catch (Exception e) { Stdout.formatln("Unexpected exception caught: {0}", e.toUtf8()); } } |
|
player7
2007-10-22
我用过Tango库,可是执行后取到的结果只是执行进程的结果;
比如用" dfl sample.d"编译后,都取不到错误信息 |
|
oldrev
2007-10-22
在技术论坛做标题党很没劲
|
|
sw2wolf
2007-10-22
谢谢tomqyp, 不知道用phobos行不行
|
|
tomqyp
2007-10-22
有个简单通用的办法就是用C的system函数
version(Tango) { private import tango.stdc.stdlib : system; } else { private import std.process : system; } void main() { system("ping www.digitalmars.com"); } |
|
sw2wolf
2007-10-23
用system似乎不能获得进程的标准输出
|