|
|
使用 HTTP(超级文本传输协议) 传输数据
Set http = CreateObject("NetBox.Http")
| dataAvailable | 返回 Http 请求当前可读取的数据字节数 |
| readyState | 返回请求执行的状态 |
| status | 返回 Http 请求返回的状态码 |
| statusText | 返回 Http 请求返回的状态文本 |
| TotalBytes | 返回 Http 请求返回结果内容的总字节数 |
| abort | 取消 Http 请求 |
| getResponseHeader | 读取 Http 请求返回结果的消息头字段 |
| getAllResponseHeaders | 查询全部返回结果的头字段,结果以换行符 vbCrLf 为分割 |
| open | 初始化一个 NetBox.Http 对象,指定方法,URL 和请求的认证信息 |
| Read | 从 Http 请求中读取指定大小的数据块,结果类型为 VT_ARRAY | VT_UI1 |
| ReadAll | 读取全部返回结果的数据,结果类型为 VT_ARRAY | VT_UI1 |
| send | 发送请求到服务器并接收返回结果 |
| setRequestHeader | 设定 Http 请求头的值 |
| WaitForResponse | 等待服务器返回数据 |
下面的例子创建一个 Http 对象,并发出请求,并显示返回的内容:
Set Http = CreateObject("NetBox.Http")
Http.Open "GET", "http://www.zydsoft.com/", False
Http.Send
Shell.Console.Write NetBox.Encoding.BinToStr(Http.ReadAll)