|
发表于 2011-5-31 21:42:34
|
显示全部楼层
广东省深圳市
.版本 2
.支持库 iconv
.支持库 iext
' 载入 (窗口_VerifyCode, , 真)
图|片框1.图|片 = 彗星HTTP读文件 (验证码地址)
.如果真 (输入框 (“输入验证码”, , “在这里输入验证码”, 验证码文本, ))
地址 = 到文本 (编码转换 (彗星HTTP读文件 (“http://lt4.3g.qq.com/g/reply_add.jsp?p=” + 贴子ID + “&sid=” + SID, “post”, 编辑框3.内容, , “&fromPage=topic_detail.jsp&content=” + 到文本 (编码转换 (到字节集 (内容), #编码_GBK, #编码_UTF_8, )) + “&ruin=” + ruin + “&verify=” + 验证码 + “&verifyExtend=” + verifyExtend, ), #编码_UTF_8, #编码_GBK, ))
输出调试文本 (地址)
.判断开始 (寻找文本 (地址, “您输入的验证码有误”, , 假) ≠ -1)
成功 = “验证码有误!”
超级列表框1.置标题 (索引, 1, 成功)
.判断 (寻找文本 (地址, “系统发现您有异常发帖行为”, , 假) ≠ -1)
成功 = “系统发现您有异常!”
超级列表框1.置标题 (索引, 1, 成功)
.判断 (寻找文本 (地址, “回复已发表”, , 假) ≠ -1)
成功 = “回复已发表!”
超级列表框1.置标题 (索引, 1, 成功)
.如果真 (寻找文本 (地址, “回帖失败”, , 假) ≠ -1)
成功 = “回帖失败!”
超级列表框1.置标题 (索引, 1, 成功)
.如果真结束
|
|