Url.Post 以Post方式访问地址

文章目录

1. 1. 功能
2. 2. 语法
3. 3. 参数
4. 4. 返回值
5. 5. 示例
6. 6. 备注

功能

以Post方式提交数据并获取其网页源文件。

语法

结果 = Url.Post(网址, 数据[, 超时时间])

参数

参数	数据类型	解释
网址	字符串	要访问并获取源文件的网址。
数据	字符串	要提交的Post参数数据。
超时时间	数值型	可选, 单位秒, 设置获取超时时间, 省略默认为30秒

返回值

字符串 ，读取到的网页源文件内容。

示例

//下面例子是以post方式自动登录按键精灵论坛
Dim 网页源文件,账号,密码,请求地址,post数据
//先把需要登录的账号和密码进行赋值到变量
账号 = ""//此处设置自己的账号
密码 = ""//此处设置自己的账号
//发送账号登录请求的地址,以及POST请求的内容
请求地址 = "http://bbs.anjian.com/login.aspx?infloat=1&&inajax=1"
post数据 = "username=" & 账号 & "&password=" & 密码 &"&question=0&answer=&templateid=0&expires=43200"
网页源文件= url.post(请求地址, post数据)
TracePrint 网页源文件
If InStr(1,网页源文件, "登录成功") > 0 Then 
    TracePrint "登陆成功"
Else 
    TracePrint "登陆失败"
End If
//TracePrint url.get("http://bbs.anjian.com/")

备注

• Post提交的数据可以使用Fiddler等抓包软件来获取，由于篇幅有限，具体使用方法请自行百度搜索，或者报名紫猫学院学习VIP教程。
• 该命令仅支持utf-8编码网页，若获取源文件为乱码，可以尝试Linux的iconv命令转换编码。