IP
Se utiliza para establecer o recupera la dirección IP o el nombre de host.
Sintaxis
HTTPObject.IP
Donde:
IPes una cadena (lectura/escritura)
Ejemplo
Este script reutilizará el mismo objeto para establecer la conexión con un host diferente y enviar la misma solicitud:
Function Main
Dim HTTPObj As Object
ip1 = "www.gfi.com"
ip2 = "127.0.0.1"
port = 80
cr = Chr(13) + Chr(10)
Set HTTPobj = HTTP.Connect (ip1,puerto)
'Configurar el tipo de solicitud
HTTPobj.GetURL("/")
'para pasar a través del proxy con autenticación automática
'La autenticación se debe fijar en “1”
HTTPobj.Authentication = 1
'Enviar la solicitud GET
HTTPResponse1 = HTTPobj.SendRequest ()
HTTPobj.IP = ip2
HTTPResponse2 = HTTPobj.SendRequest ()
echo "Result: " + CStr(HTTPResponse1)+cr
echo "Result: " + CStr(HTTPResponse2)+cr
End Function