SendRequest
SendRequest 用来发送发起的 HTTP 请求。 例如,如果先前使用了 GetURL 方法,则将发送 GET 请求。
语法
SendRequest()
返回值
HTTP 响应代码。
示例
该脚本将执行 GET 请求,并打印返回代码:
函数 Main
Dim HTTPObj as Object
ip = "www.gfi.com"
port = 80
Set HTTPobj = HTTP.Connect (ip,port)
'设置请求类型
HTTPobj.GetURL("/")
'使用自动身份验证通过代理
'身份验证必须设置为 1
HTTPobj.Authentication = 1
'发送 GET 请求
HTTPResponse = HTTPobj.SendRequest()
echo "Result: " + cstr(HTTPResponse)
End 函数