检测Internet是否已连接

时间:2010-08-19 06:52:05

标签: vb.net

如果计算机是否与互联网连接,我如何检查我的应用程序(目前) 如果网络连接,我需要一条消息。

非常感谢 Furqan

4 个答案:

答案 0 :(得分:4)

平。 Dim response As Boolean = False response = My.Computer.Network.ping(google.com)

是的,您有访问权限,错误,您没有,或者世界正在结束,因为谷歌处于离线状态。

答案 1 :(得分:3)

我会试试。 它来自VB 6,但我认为你可以轻松转换它。

Private Declare Function InternetGetConnectedState Lib "wininet.dll" (ByRef
dwflags As Long, ByVal dwReserved As Long) As Long

Public Function IsOnline() As Boolean
Dim LFlags As Long
IsOnline = InternetGetConnectedState(LFlags, 0&)
End Function

http://bytes.com/topic/visual-basic/answers/14551-detecting-internet-connection

答案 2 :(得分:2)

应该像处理文件可用性一样处理Internet连接。

对于文件,您通常不应该使用File.Exists()来首先查看是否可以打开文件,因为在执行检查和对结果执行操作时结果可能会发生变化,更不用说区别了仅存在和读取权限之间。无论如何,你必须处理这些例外情况,这样才能真正地集中精力。

互联网访问也是如此。最好的选择通常就是去做,并将开发时间集中在异常处理程序上。

答案 3 :(得分:0)

使用此代码:

If My.Computer.Network.IsAvailable Then
    MsgBox("Computer is connected.")
Else
    MsgBox("Computer is not connected.")
End If

请参阅this link