Vi mando il codice che sto cercando di far girare :
codice:
'WinHttpRequest proxy settings.
Const HTTPREQUEST_PROXYSETTING_DEFAULT = 0
Const HTTPREQUEST_PROXYSETTING_PRECONFIG = 0
Const HTTPREQUEST_PROXYSETTING_DIRECT = 1
Const HTTPREQUEST_PROXYSETTING_PROXY = 2
Private Sub Command1_Click()
Dim HttpReq As Object
' Create the WinHTTPRequest ActiveX Object.
Set HttpReq = New WinHttpRequest
' Switch the mouse pointer to an hourglass while busy.
MousePointer = vbHourglass
'Set proxy settings.
'HttpReq.SetProxy HTTPREQUEST_PROXYSETTING_PROXY, _
' "proxy_server:80", "*.microsoft.com"
' Open an HTTP connection.
HttpReq.Open "GET", "http://www.google.com", False
' Send the HTTP Request.
HttpReq.Send
' Get all response text.
Text1.Text = HttpReq.ResponseText
' Switch the mouse pointer back to default.
MousePointer = vbDefault
End Sub
...INUTILE DIRVI CHE NON FUNZIONA