|
楼主 |
发表于 2011-10-30 16:25:22
|
显示全部楼层
浙江省嘉兴市
似水往昔浮流年 发表于 2011-10-30 16:22
自己动手丰衣足食 自己看下教程 吧
[e]
.版本 2
.支持库 EThread
.子程序 _按钮1_被单击
启动线程 (&POST提交, , )
.子程序 POST提交, 逻辑型, , ⊙⊙本代码由精易会员专用浏览器生成
.局部变量 局_提交地址, 文本型
.局部变量 局_提交数据, 文本型
.局部变量 局_返回文本, 文本型
局_提交地址 = “http://yl-4cvb.5d6d.com/logging. ... it=yes&inajax=1”
局_提交数据 = “formhash=1a63a951&referer=bbs.php&loginfield=username&username=” + 删首尾空 (编辑框1.内容) + “&password=” + 删首尾空 (编辑框2.内容) + “&questionid=0&answer=&loginsubmit=%B5%C7%C2%BC”
局_返回文本 = 到文本 (网页_访问 (局_提交地址, 1, , , 局_提交数据, )) ' 最后一个参数为返回的编码方式
.判断开始 (寻找文本 (局_返回文本, “输入你成功的关键字”, , 假) ≠ -1)
返回 (真)
.判断 (寻找文本 (局_返回文本, “输入你失败的关键字”, , 假) ≠ -1)
返回 (假)
.默认
输出调试文本 (局_返回文本) ' 如果前面2个没判断成功,把返回文件输出来
.判断结束
返回 (假)
[/e]
|
|