计次循环首 (到数值 (编辑框1.内容 ), m )文本 = 编码_URL解码 (到文本 (网页_访问_对象 (“http://wx.rvter.com/plugin.php?id=aljreg&x=” + 编辑框2.内容, 0, , ck, , #协yi头, )), 真)调试输出 (ck )索引1 = 超级列表框1. 插入表项 (, , , , , )超级列表框1. 置标题 (索引1, 0, 到文本 (索引1 + 1 )) 账号 = “150” + 文本_取随机数字 (8 )调试输出 (账号 )密码 = 文本_取随机字母 (3 ) + 文本_取随机数字 (3 )调试输出 (密码 )超级列表框1. 置标题 (索引1, 1, 账号 )超级列表框1. 置标题 (索引1, 2, 密码 )账号 = 超级列表框1. 取标题 (索引1, 1 )密码 = 超级列表框1. 取标题 (索引1, 2 )调试输出 (账号, 密码 )文本 = 编码_URL解码 (到文本 (网页_访问_对象 (“http://wx.rvter.com/plugin.php?id=jzsjiale_sms:mobile&act=login”, 0, , ck, , #协yi头, )), 真)调试输出 (ck )如果真 (寻找文本 (文本, “formhash=”, , 假) ≠ -1 )文本 = 文本_取出中间文本 (文本, “formhash=”, #后 )调试输出 (文本 )文本 = 编码_URL解码 (到文本 (网页_访问_对象 (“http://wx.rvter.com/plugin.php?id=jzsjiale_sms:mobile&act=register&phoneregistersubmit=yes&formhash=” + 文本, 1, “username=undefined&password=” + 密码 + “&phone=” + 账号 + “&referer=http%3A%2F%2Fwx.rvter.com%2Fplugin.php%3Fid%3Djzsjiale_sms%3Amobile%26act%3Dlogin”, ck, , #协yi头, , , )), 真)调试输出 (文本 )如果 (寻找文本 (文本, “registersuccess”, , 假) ≠ -1 )超级列表框1. 置标题 (索引1, 3, “zc成功”)超级列表框1. 置标题 (索引1, 3, “zc失败”)调试输出 (ck, 文本 )延迟 (600 )文本 = 编码_URL解码 (到文本 (网页_访问_对象 (“http://wx.rvter.com/plugin.php?id=aljreg&x=” + 编辑框2.内容, 0, , ck, , #协yi头, )), 真)调试输出 (ck )写到文件 (取运行目录 () + “\挖金矿zc成功.txt”, 读入文件 (取运行目录 () + “\挖金矿zc成功.txt”) + 到字节集 (账号 + “----” + 密码 + “----” + #换行符 ))计次循环尾 ()
现在的问题是循环zc的时候第二次 就失败 总是把第一次的最后一次的ck 自动的带到了第二次zc,需要的ck里面去了,怎么处理
|