.版本 2
.支持库 script
.支持库 spec
.程序集 窗口程序集_启动窗口
.程序集变量 cookies, 文本型
.子程序 __启动窗口_创建完毕
.局部变量 url, 文本型
url = “//user.vas.pptv.com/api/vcode.php?type=login&v=”
图片框1.图片 = 网页_访问_对象 (url, , , cookies)
.子程序 _按钮1_被单击
.局部变量 url, 文本型
.局部变量 data, 文本型
.局部变量 str, 文本型
.局部变量 use, 文本型
.局部变量 pwd, 文本型
.局部变量 code, 文本型
.局部变量 params, 文本型
.局部变量 time, 文本型
use = “12312312”
pwd = “123123123”
code = 编辑框1.内容
time = 时间_取现行时间戳 ()
url = “//user.vas.pptv.com/api/vcode.php?type=login&action=check&vcode=” + code + “&_=” + time + “&cb=jsonp2”
网页_访问_对象 (url, , , cookies)
data = “type=ajax&from=wap&username=” + use + “&password=” + pwd + “&vcode=” + code + “&appplt=wap&appid=vas&channel=208000201037&sceneFlag=2”
脚本组件1.执行 (#js)
params = 脚本组件1.运行 (“rsa”, 编码_URL编码 (data, 真, 真), “ppvaslogin”)
url = “//user.vas.pptv.com/api/login.php?params=” + params + “&_=” + time + “&cb=jsonp3”
str = 编码_usc2到ansi (到文本 (网页_访问_对象 (url, , , cookies)))
调试输出 (str)