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