如何偵測電腦的網路連線是正常的
出自VFP Wiki
（修訂版本間差異）
小 (revert) |
|||
| 第29行： | 第29行： | ||
endif | 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/ 磁盘阵列数据修复] | ||
在2005年4月16日 (六) 12:51所做的修訂版本
目錄 |
出處
致謝
Thanks a123eric and ge8941!!
Solution
使用Windows API:InternetGetConnectedState
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
使用 ping
local isok
ws = createobject("WScript.Shell")
isok = ws.run("ping 192.168.1.39",0,"True")
if ISOK==0
msg("連線")
else
msg("斷線")
endif
数据恢复 硬盘数据恢复 磁带数据恢复 raid数据恢复 磁盘阵列数据恢复 数据恢复 数据恢复 数据恢复 数据修复 硬盘数据修复 磁带数据修复 raid数据修复 数据修复 数据修复 数据修复 磁盘阵列数据修复
