|
10精币
.版本 2
.支持库 spec
.支持库 internet
.子程序 _按钮2_被单击
.局部变量 a, 字节集
.局部变量 id, 文本型
.局部变量 返回1, 文本型
.局部变量 seccodeverify, 文本型
.局部变量 返回2, 文本型
.局部变量 idhash, 文本型
.局部变量 update, 文本型
.局部变量 b, 字节集
返回1 = 彗星HTTP读文本 (“http://www.3600gz.cn/member.php? ... =fwin_content_login”)
调试输出 (“返回1:” + 返回1)
seccodeverify = 文本_取出中间文本 (返回1, “seccodeverify_”, #引号)
调试输出 (“seccodeverify:” + seccodeverify)
返回2 = 彗星HTTP读文本 (“http://www.3600gz.cn/misc.php?mo ... =update&idhash=” + seccodeverify + “&inajax=1&ajaxtarget=seccode_” + seccodeverify)
调试输出 (“返回2:” + 返回2)
idhash = 文本_取出中间文本 (返回2, “idhash=”, #引号)
调试输出 (“idhash:” + idhash)
update = 文本_取出中间文本 (返回2, “update=”, “&”)
调试输出 (“update:” + update)
a = HTTP读文件 (“http://www.3600gz.cn/misc.php?mod=seccode&update=” + update + “&idhash=” + idhash)
调试输出 (“http://www.3600gz.cn/misc.php?mod=seccode&update=” + update + “&idhash=” + idhash)
调试输出 (a)
转换图像格式 (a, 1, b)
调试输出 (b)
画板1.底图 = b
---
无法读到画板里面。。{:soso_e109:}
|
|