之前写过一个长 ping命令加上时间标签，检测网络连接状态的文章。
使用过程发现那个版本有些不友好：
1、时间标签加在一批 ping 命令的上面
2、时间不能很精确的跟踪，使用它是每隔3秒的时长ping一次查看
set IP="xxx.xxx.xxx.xxx" //输入你要ping 的 IP 地址
:A
echo %date% %time% >> D:\%IP%.txt
ping %IP% | find "TTL" >> D:\%IP%.txt
GOTO:A
后来上网无意中又发现了如下另一种方法，感觉ping 的时间更细腻些。
pingTest.vbs 内容如下：
Set shell = WScript.CreateObject("WScript.Shell")
Set re=New RegExp
re.Pattern = "^Reply|^Request"
Set myping=shell.Exec("ping 130.75.242.55 -t")
while Not myping.StdOut.AtEndOfStream
strLine = myping.StdOut.ReadLine()
r=re.Test(strLine)
If r Then
WScript.Echo date & " "& time & chr(9) & strLine
End if
Wend
使用：
1、开始 — 运行 —在弹出的命令框中输入cscript 然后将该文件拖入即可。
2、如果想将ping 的结果写入到指定文件中可以按照如下操作：运行—输入cmd ：输入cscript pingTest.vbs>>d:\pingTest.txt
3、封装使用：将 pingTest.vbs 放到指定的盘符下，比如D:\pingTest.vbs ；然后生成一个可执行bat 文件 ping.bat ，使用的时候我们只要双击该bat 文件就可以了。
ping.bat 内容如下：
cscript D:\pingTest.vbs>>D:\pingTest.txt
效果演示：
Microsoft (R) Windows Script Host Version 5.7
版权所有(C) Microsoft Corporation 1996-2001。保留所有权利。
2011-12-22 下午 05:28:47 Reply from 130.75.242.55: bytes=32 time=5ms TTL=123
2011-12-22 下午 05:28:48 Reply from 130.75.242.55: bytes=32 time=3ms TTL=123
2011-12-22 下午 05:28:49 Reply from 130.75.242.55: bytes=32 time=2ms TTL=123
2011-12-22 下午 05:28:50 Reply from 130.75.242.55: bytes=32 time=3ms TTL=123
2011-12-22 下午 05:28:51 Reply from 130.75.242.55: bytes=32 time=2ms TTL=123
2011-12-22 下午 05:28:52 Reply from 130.75.242.55: bytes=32 time=1ms TTL=123
2011-12-22 下午 05:28:53 Reply from 130.75.242.55: bytes=32 time=3ms TTL=123