求助:设置好代理IP后,怎样判断能否连上Internet
RT,程序已经用InternetSetOption设置好代理IP。但是我应该怎样来判断设置后能否连上Internet ?程序代码:
Function SetProxy(ProxyIP As String) As Integer Dim options As INTERNET_PROXY_INFO options.dwAccessType = INTERNET_OPEN_TYPE_PROXY options.lpszProxy = ProxyIP options.lpszProxyBypass = "" SetProxy = InternetSetOption(0, INTERNET_OPTION_PROXY, options, LenB(options)) '返回0或1 End Function
找了好多相关的函数也没有什么头绪!