求助，Ping的循环判断问题

angelink

While 1
         If Ping("www.baidu.com",250) <> 0 Then
                 ExitLoop(IniWrite(@SystemDir &'\1.ini','信息','网络状态','畅通'))         
                ;ExitLoop
                ;IniWrite(@SystemDir &"\1.inil","信息","网络状态","畅通")
         ElseIf Ping("www.baidu.com",250) = 0 Then
                 IniWrite(@SystemDir &"\1.inil","信息","网络状态","阻塞")
         EndIf
         Sleep(1000)
WEnd

求助，如果ping通的话就会在配置文件里写上“ 畅通”并退出循环，如果不通就写上 阻塞，继续循环。

通的状态下，如果加上ExitLoop，就写不进去“ 畅通” 如果单独加 IniWrite(@SystemDir &"\1.inil","信息","网络状态","畅通") 又不能自动终止循环，头痛啊！

水木子

While 1
         If Ping("www.baidu.com",250) <> 0 Then 
                IniWrite(@SystemDir &"\1.inil","信息","网络状态","畅通")
                ExitLoop          
         ElseIf Ping("www.baidu.com",250) = 0 Then
                 IniWrite(@SystemDir &"\1.inil","信息","网络状态","阻塞")
         EndIf
         Sleep(1000)
WEnd

dulein

谢谢分享学习了。