怎样用vb api实现检测是否上网，通过什么方式上的网呀？

Question

怎样用vb api实现检测是否上网，通过什么方式上的网呀？
我用Private Declare Function InternetGetConnetedState Lib "C:\WINDOWS\system32\wininet.dll" (ByRef lpdwflags As Long, ByVal dwReserved As Long) As Boolean
结果不行，出现一个错误，找不到　"dll的入口点？"　　什么意思呀，？？？？

Answer 1

从哪抄来的声明？抄都抄错了
InternetGetConnetedState
InternetGetConnectedState

Answer 2

C:\WINDOWS\system32\wininet.dll 
系统在C盘吗？

Answer 3

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

Answer 4

http://www.vbnew.net/dvbbs/printpage.asp?BoardID=4&ID=645

Answer 5

谢谢了，但是有一个问题result = InternetGetConnectedState(flags, 0)
If result Then
MsgBox "已经连接"
Else
MsgBox "没有连接"
End If
If flags And INTERNET_CONNECTION_MODEM Then
MsgBox "你是通过modem连接上网的"
End If
If flags And INTERNET_CONNECTION_LAN Then
MsgBox "你是通过lan连接上网的"
End If
If flags And INTERNET_CONNECTION_PROXY Then
MsgBox "你是通过proxy连接上网的"
End If
我是通过ADSL在家上网的，为什么会出现说我是通过LAN上网的，会不会有问题呀

Answer 6

If flags And INTERNET_CONNECTION_LAN Then
MsgBox "你是通过lan连接上网的或通过ADSL在家上网的"
End If