用户端“傻瓜式”网络数据自动采集

　　昨天晚上有这样的一个情况，有某些地区上的用户访问某个论坛速度会慢  为了分析原因  协调跟客户谈好了  可以帮忙做个小测试。利用了win下的curl，哎个人工作都是用solaris linux  今天是第一次写win下的批处理

　　怎么做一个傻瓜式的一键完成呢 我写了下面的一个脚本跟大家分享一下：

　　SET Obj_Length=4

　　SET Obj[0]:URL=url1

　　SET Obj[1]:URL=url2

　　SET Obj[2]:URL=url3

　　SET Obj[3]:URL=url4

　　SET Obj_Index=0

　　ECHO %DATE% %TIME% >> result.txt

　　:LoopStart

　　IF %Obj_Index% EQU %Obj_Length% GOTO :LAST

　　SET Obj_Current.URL=0

　　FOR /F "usebackq delims==: tokens=1-3" %%I IN (`SET Obj[%Obj_Index%]`) DO (

　　SET Obj_Current.%%J=%%K

　　)

　　@goto testweb

　　:testweb

　　ping %Obj_Current.URL% >> result.txt

　　tracert %Obj_Current.URL% >> result.txt

　　@goto end

　　:end

　　SET /A Obj_Index=%Obj_Index% + 1

　　GOTO LoopStart

　　:LAST

　　ipconfig /all >> result.txt

　　netstat -nr >> result.tx

　　type %SystemRoot%\system32\drivers\etc\hosts >> result.txt

　　curl http://www.123cha.com/ -o ip.html  #获取用户公网ip

　　@pause

　　@echo 按任意键