16,554
社区成员
发帖
与我相关
我的任务
分享〓〓〓如何获得网络状态？
已经尝试了InternetGetConnectedStateEx 函数
这个东西在lan中不准确。
我的目的主要是针对网线拔掉时候的系统监测。InternetGetConnectedStateEx在网线拔掉时居然显示还是连接正常的 晕！
然后也尝试了读取ping结果来判断。但是时间消耗太大。
有没有别的好方法来判断网络状态？
网线拔除系统托盘立刻显示“网络电缆没有插好”这样的效果是怎么作的？ 难道是网卡驱动里面做的？
回答好了加分不是问题。 跪谢！
这个东西在lan中不准确。
我的目的主要是针对网线拔掉时候的系统监测。InternetGetConnectedStateEx在网线拔掉时居然显示还是连接正常的 晕！
然后也尝试了读取ping结果来判断。但是时间消耗太大。
有没有别的好方法来判断网络状态？
网线拔除系统托盘立刻显示“网络电缆没有插好”这样的效果是怎么作的？ 难道是网卡驱动里面做的？
回答好了加分不是问题。 跪谢！
...全文
请发表友善的回复…
发表回复
在途中 2006-10-08
- 打赏
- 举报
我用ping的方法，VS2003里
阿牛138588 2006-10-07
- 打赏
- 举报
还有另外一种方法
dim str1 as string=dns.GetHostAddresses("www.21cn.com").tostring
if str1.lenght>0 then msgbox("online")
如果str1为空，或dns.GetHostAddresses("www.21cn.com").tostring出错，则不在线
dim str1 as string=dns.GetHostAddresses("www.21cn.com").tostring
if str1.lenght>0 then msgbox("online")
如果str1为空，或dns.GetHostAddresses("www.21cn.com").tostring出错，则不在线
wsxcy66668888 2006-10-07
- 打赏
- 举报
vb.net2005
if My.Computer.Network.IsAvailable Then
MessageBox('连接')
Else
MessageBox('断开')
End if
if My.Computer.Network.IsAvailable Then
MessageBox('连接')
Else
MessageBox('断开')
End if
Sean918 2006-09-20
- 打赏
- 举报
ding
阿牛138588 2006-09-20
- 打赏
- 举报
My.Computer.Network.IsAvailable
给分！
给分！
snowmagic 2006-09-20
- 打赏
- 举报
ping 本机ip把，用-w设timeout
Sean918 2006-09-19
- 打赏
- 举报
再顶！！！
Sean918 2006-09-19
- 打赏
- 举报
高手在哪里啊！！
jy757443 2006-09-19
- 打赏
- 举报
UP
Sean918 2006-09-19
- 打赏
- 举报
顶！！！
Sean918 2006-09-19
- 打赏
- 举报
不能沉了！ 沙发自己来！！
