如何偵測電腦的網路連線是正常的

[[category:Internet相關問題]]

====出處====
*http://fox.hanyu.com.tw/View.aspx?fbId=1&Id=24078

====致謝====
Thanks a123eric and ge8941!!

====Solution====
=====使用Windows API:InternetGetConnectedState=====
<pre>
LOCAL nFlags AS Long, lOffline AS Boolean
DECLARE SHORT InternetGetConnectedState IN wininet INTEGER @ lpdwFlags, INTEGER dwReserved
m.nFlags = 0
m.lOffLine = !InternetGetConnectedState(@m.nFlags, 0) <> 0

return m.lOffLine
</pre>

=====使用 ping =====
<pre>
local isok
ws = createobject("WScript.Shell")
isok = ws.run("ping 192.168.1.39",0,"True")
if ISOK==0
msg("連線")
else
msg("斷線")
endif
<pre></pre>
[http://www.hg-fix.com/ 数据恢复]
[http://www.hg-fix.com/ 硬盘数据恢复]
[http://www.hg-fix.com/ 磁带数据恢复]
[http://www.hg-fix.com/ raid数据恢复]
[http://www.hg-fix.com/ 磁盘阵列数据恢复]
[http://www.hg-fix.com/diskrecover.htm 数据恢复]
[http://www.hg-fix.com/taperecover.htm 数据恢复]
[http://www.hg-fix.com/raidrecover.htm 数据恢复]
[http://www.hg-fix.com/ 数据修复]
[http://www.hg-fix.com/ 硬盘数据修复]
[http://www.hg-fix.com/ 磁带数据修复]
[http://www.hg-fix.com/ raid数据修复]
[http://www.hg-fix.com/diskrecover.htm 数据修复]
[http://www.hg-fix.com/raidrecover.htm 数据修复]
[http://www.hg-fix.com/taperecover.htm 数据修复]
[http://www.hg-fix.com/ 磁盘阵列数据修复]