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 函数