IP
Usado para definir ou recuperar o endereço IP ou nome do host.
Sintaxe
HTTPObject.IP
Na qual:
IP
é uma cadeia de caracteres (leitura/gravação).
Exemplo
Este script usará novamente o mesmo objeto para se conectar a um host diferente e enviar a mesma solicitação:
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,port)
'Configura o tipo de solicitação
HTTPobj.GetURL("/")
'para passar pelo proxy com autenticação automática
'Precisa alterar autenticação para 1
HTTPobj.Authentication = 1
'Envia solicitação GET
HTTPResponse1 = HTTPobj.SendRequest ()
HTTPobj.IP = ip2
HTTPResponse2 = HTTPobj.SendRequest ()
echo “Resultado: " + CStr(HTTPResponse1)+cr
echo “Resultado: " + CStr(HTTPResponse2)+cr
End Function