检查网络通否代码出错

sheng927

For $i = 2 To 1 Step - 1
        $error=Ping("192.168.0.1", 400)
        If $error = 0 or @error = 0 Then
                MsgBox(4096, "", "网关不通请检查MODEM和路由器")
   Exit
        EndIf
Next

$error1=Ping("219.159.237.1", 250)
If $error1 = 0 Then
        MsgBox(4096, "", "你的宽带未能拨得上号或者宽带没有信号请与有关人员联系")
Else
        MsgBox(4096, "", "你的网络是正常的，你现在可以上网了.")
EndIf

请高手帮修改一下。这个代码总是提示"网关不通请检查MODEM和路由器"是在同一个网关里面的。用WINDOWS 的PING 是可以PING 的通的。但在AU3里不能为什么呢？

sunny617

For $i = 2 To 1 Step - 1
        $error=Ping("192.168.89.200", 400)
        If $error = 0 or @error Then
                MsgBox(4096, "", "网关不通请检查MODEM和路由器")
   Exit
        EndIf
Next

$error1=Ping("219.159.237.1", 250)
If $error1 = 0 Then
        MsgBox(4096, "", "你的宽带未能拨得上号或者宽带没有信号请与有关人员联系")
Else
        MsgBox(4096, "", "你的网络是正常的，你现在可以上网了.")
EndIf

-------------------------------------------------------
不知道你要的是不是这个
改了一下


@error 本身就是错误的反回值(我这样理解的)
不需要赋值
具体请看帮助:

当函数执行失败时(返回0)@error 包含数值的具体意思:
1 = 目标主机离线
2 = 目标主机无法连接
3 = 目标错误
4 = 其它错误