|
发表于 2013-10-9 22:55:06
|
显示全部楼层
四川省资阳市
[e]
.版本 2
.支持库 spec
.支持库 HtmlView
.支持库 EThread
.支持库 internet
.程序集 窗口程序集1
.程序集变量 获取值, 文本型
.程序集变量 vie, 文本型
.程序集变量 eve, 文本型
.程序集变量 提交数据, 文本型
.程序集变量 返回状态, 文本型
.子程序 _按钮1_被单击
提交数据 = “__VIEWSTATE=” + vie + “&__EVENTVALIDATION=” + eve + “&username=” + 编辑框1.内容 + “&usepwd=” + 编辑框2.内容 + “&yzm_tbox=” + 编辑框3.内容 + “&ImageButton1.x=24&ImageButton1.y=12”
返回状态 = 到文本 (网页_访问 (“http://www.zzwljc.com:8080/Login.aspx”, 1, , , 到字节集 (提交数据), , , , 1, ))
调试输出 (返回状态)
超文本浏览框1.地址 = “http://www.zzwljc.com:8080/index/cyberbar/Index.aspx” ' 我直接用这个快速判断了!
.子程序 __启动窗口_创建完毕
启动线程 (&获取验证码, , )
.子程序 获取验证码
获取值 = 编码_URL解码UTF8 (到文本 (HTTP读文件 (“http://www.zzwljc.com:8080/login.aspx”)))
vie = 编码_URL编码UTF8 (文本_取出中间文本 (获取值, #VIE前, #后)) ' 这个值你自己去网页源码看就知道了
调试输出 (vie)
eve = “%2FwEWBQLyzrK0AgKvpuq2CAKJ%2BKmUBAKr2%2FqlBALSwpnTCCfEXBhGLfVrT4pZg9OzTlKF%2FZiN”
图片框1.图片 = HTTP读文件 (“http://www.zzwljc.com:8080/yzm.aspx?” + 时间_取随机时间戳 ())
[/e] |
评分
-
参与人数 1 | 荣誉 +3 |
收起
理由
|
笨潴
| + 3 |
热心帮助他人,荣誉+3,希望继续努力(*^__^*) 嘻嘻 |
查看全部评分
|