|

10精币
[e]
.版本 2
.支持库 EThread
.支持库 iext
.支持库 spec
.局部变量 返回文本, 文本型
.局部变量 sid2, 整数型
.局部变量 sid, 文本型
.局部变量 正则, 正则表达式类
.局部变量 问题ID, 文本型
.局部变量 答案, 文本型
.局部变量 搜索问题, 文本型
初始化COM库 ()
.判断循环首 (run ≠ 0)
进入许可区 (许可)
s = s + 1
sid2 = s
sid = 超级列表框1.取标题 (sid2, 3)
.如果真 (s > 提取总数)
跳出循环 ()
.如果真结束
退出许可区 (许可)
返回文本 = UTF8转ANSI (访问网页_MARS (“http://sq.3g.qq.com/comm/v2/index.jsp?sid=” + sid + “&activeId=96”, “GET”))
超级列表框1.保证显示 (sid2)
正则.创建 (“aId=(\d{5})”, 返回文本)
问题ID = 正则.取子匹配文本 (1, 1)
调试输出 (问题ID)
正则.创建 (问题ID, 编辑框6.内容)
调试输出 (到文本 (正则.取匹配数量 ()))
.' 如果真 (正则.取匹配数量 () = 1)
' 答案 = 正则.取子匹配文本 (1, 1)
' 返回文本 = UTF8转ANSI (访问网页_MARS (“http://sq8.3g.qq.com/comm/v2/result.jsp?sid=” + sid + “&activeId=96&aId=” + 问题ID + “&answer=” + 答案, “GET”))
.' 如果 (寻找文本 (返回文本, “答错了,继续加油吧!”, , 假) ≠ -1)
' 超级列表框1.置标题 (sid2, 4, “答题错误”)
' 调试输出 (问题ID + “-” + 答案)
.否则
' 正则.创建 (“获得【.*物品”, 假)
.' 如果 (正则.搜索全部 (返回文本) = 1)
' 超级列表框1.置标题 (sid2, 4, “答题正确”)
.否则
.' 如果 (寻找文本 (返回文本, “您的书签已过期!”, , 假) ≠ -1)
' 过期 = 过期 + 1
' 超级列表框1.置标题 (sid2, 4, “过期”)
.否则
' 失败 = 失败 + 1
' 超级列表框1.置标题 (sid2, 4, “失败”)
.如果结束
.如果结束
.如果结束
.如果真结束
返回文本 = 子文本替换 (返回文本, #换行符, “”, , , 真)
返回文本 = 子文本替换 (返回文本, “</p>”, #换行符, , , 真)
返回文本 = 子文本替换 (返回文本, “<br/>”, #换行符, , , 真)
正则.创建 (“<(.|\n)+?>”, 返回文本)
编辑框2.内容 = 正则.替换 (“”)
状态条1.置文本 (1, “成功:” + 到文本 (成功))
状态条1.置文本 (2, “失败:” + 到文本 (失败))
状态条1.置文本 (3, “过期:” + 到文本 (过期))
.判断循环尾 ()
[/e]
上面2个正则表达式,第一个问题ID我取出来了,但是用这个变量问题ID作为第二个的正则表达式,就没办法取出来,为什么?求助
|
|