找回密码
 加入
搜索
查看: 6090|回复: 14

pingIP地址不通时候记录下信息同时记录下当时的时间

  [复制链接]
发表于 2009-5-5 18:18:47 | 显示全部楼层 |阅读模式
本帖最后由 ywenxiao 于 2009-5-5 22:15 编辑

比如ping 192.168.0.i -t

当不通的时候记录下来,并记下当时的时间

该怎么写???
发表于 2009-5-8 09:32:59 | 显示全部楼层
看帮助,我看你不是在提问题,而是在找人帮你写。
 楼主| 发表于 2009-5-16 12:08:43 | 显示全部楼层
比如像用命令: ping 192.168.0.1 -t >ip.txt
这个是一直纪录的,如何判断他延时大时或掉包时候都纪录呢?
该怎么判断?
发表于 2009-5-16 12:17:43 | 显示全部楼层
本帖最后由 lynfr8 于 2009-7-22 02:19 编辑

运行截图:

-----------------------------------------------------------
;未严格测试,只提供思路而已
#include <inet.au3>
dim $ip,$file,$var
For $i = 100 to 254
        $var = Ping ("192.168.0."&$i,500)
        If $var Then
        Else
  ToolTip ("Pinging:192.168.0."&$i,1,1)
        $ip ="192.168.0."&$i&"|"
  $file = FileOpen("log.txt", 1)
        FileWriteLine($file,$ip & @YEAR & "年" & @MON & "月" & @MDAY &"日" &@HOUR &"时"& @MIN &"分")
  FileClose($file)
        EndIf
Next
啰嗦几句:
1.善于搜索自行解决问题
http://www.autoitx.com/search.php?searchid=65&orderby=lastpost&ascdesc=desc&searchsubmit=yes
2.楼主兄弟,苦口婆心再多说一遍:真的要看帮助文件:网络函数部分
3.ping域名返回的IP地址的方法【延伸】
FileWrite("ip.ini", TcpNameToIp("www.abc.com"))
4.ping还是用批处理来搞定的好!
因为有au3坛友反映过:加延时参数后速度非常快可全部扫完,但加5 秒以上的延时,就非常慢了;另外,单独使用没问题,放到循环里面有时候会错报(在于你使用的windows系统版本)即便不在循环中,连续运行数次有时也会误报。

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?加入

×
发表于 2009-5-16 13:27:54 | 显示全部楼层
比如像用命令: ping 192.168.0.1 -t >ip.txt
这个是一直纪录的,如何判断他延时大时或掉包时候都纪录呢?
该怎么判断?
ywenxiao 发表于 2009-5-16 12:08

自己写个判断语句,关键是延时的判断
发表于 2009-8-26 11:18:43 | 显示全部楼层
ping 192.168.0.1 -t >ip.txt
这个是最好的也是最快的
发表于 2009-8-26 22:50:10 | 显示全部楼层
受益匪浅呀
发表于 2009-9-13 20:17:33 | 显示全部楼层
本帖最后由 fjvip 于 2009-9-13 20:22 编辑
$var = Ping("172.31.157.251", 250)

If @error = 1 Then
        MsgBox(0, "测试结果", "目标主机离线:" & $var)
ElseIf @error = 2 Then
        MsgBox(0, "测试结果", "目标主机无法连接" & $var)
ElseIf @error = 3 Then
        MsgBox(0, "测试结果", "目标错误" & $var)
ElseIf @error = 4 Then
        MsgBox(0, "测试结果", "其它错误" & $var)
Else

        If $var = 0 Then
                MsgBox(0, "测试结果", "其它网络错误" & $var)
        Else
              If $var = 10 Then
                      MsgBox(0, "测试结果", "你的网速超快:" & $var)
                      Else
                      MsgBox(0, "测试结果", "你的网速不是很快哟:" & $var)
                      Endif
        EndIf
EndIf
发表于 2009-10-17 04:02:44 | 显示全部楼层
怎么这帖子还在未解决区?
4、8楼那个例子很不错!
发表于 2011-12-4 01:21:48 | 显示全部楼层
..........................................................
发表于 2013-1-18 21:29:38 | 显示全部楼层
谢谢分享。
发表于 2013-2-21 22:48:58 | 显示全部楼层
这里真好,我就在找扫描局域网ip,实现自动安装程序的实例
发表于 2013-4-5 22:07:31 | 显示全部楼层
来学习了哟
发表于 2013-4-26 15:09:52 | 显示全部楼层
学习受教了
发表于 2013-5-1 00:53:21 | 显示全部楼层
来学习了哟
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-11-17 21:26 , Processed in 0.076212 second(s), 20 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表