征途自动注册

啊冲

.版本 2
.支持库 HtmlView
.支持库 spec

.程序集 窗口程序集1
.程序集变量 网页操作, 网页文档类
.程序集变量 文件号, 整数型

.子程序 _按钮1_被单击

' 取网页句柄
网页操作.初始化 (, 超文本浏览框1.取窗口句柄 ())
' 写账户
网页操作.填写表单 (“username”, #元素标识类型_名称, 编辑框1.内容)
' 写密码
网页操作.填写表单 (“userpwd”, #元素标识类型_名称, 编辑框2.内容)
网页操作.填写表单 (“reuserpwd”, #元素标识类型_名称, 编辑框2.内容)
' 写数字密码
网页操作.填写表单 (“superpwd”, #元素标识类型_名称, 编辑框3.内容)
网页操作.填写表单 (“resuperpwd”, #元素标识类型_名称, 编辑框3.内容)
' 安全邮箱
网页操作.填写表单 (“email”, #元素标识类型_名称, 编辑框4.内容)
' 身份证
网页操作.填写表单 (“idnum”, #元素标识类型_名称, 编辑框5.内容)
' 姓名
网页操作.填写表单 (“realname”, #元素标识类型_名称, 编辑框6.内容)
' 提交
网页操作.执行脚本 (“do_register()”, #脚本类型_JavaScript)
写文本行 (文件号, 时间到文本 (取现行时间 (), ) ＋ “|” ＋ 编辑框1.内容 ＋ “|” ＋ 编辑框2.内容)


.子程序 _按钮3_被单击
.局部变量 随机账号, 文本型, , "10"

置随机数种子 ()
取随机数 (97, 122)
随机账号 [1] ＝ 字符 (取随机数 (97, 122))
随机账号 [2] ＝ 字符 (取随机数 (97, 122))
随机账号 [3] ＝ 字符 (取随机数 (97, 122))
随机账号 [4] ＝ 字符 (取随机数 (97, 122))
随机账号 [5] ＝ 字符 (取随机数 (97, 122))
随机账号 [6] ＝ 字符 (取随机数 (97, 122))
随机账号 [7] ＝ 字符 (取随机数 (97, 122))
随机账号 [8] ＝ 字符 (取随机数 (97, 122))
随机账号 [9] ＝ 字符 (取随机数 (97, 122))
随机账号 [10] ＝ 字符 (取随机数 (97, 122))
编辑框1.内容 ＝ 随机账号 [1] ＋ 随机账号 [2] ＋ 随机账号 [3] ＋ 随机账号 [4] ＋ 随机账号 [5] ＋ 随机账号 [6] ＋ 随机账号 [7] ＋ 随机账号 [8] ＋ 随机账号 [9] ＋ 随机账号 [10] ＋ 编辑框7.内容


.子程序 _按钮2_被单击

关闭文件 (文件号)
_启动窗口.销毁 ()


.子程序 _按钮4_被单击
.局部变量 a, 整数型
.局部变量 随机账号, 文本型, , "10"

按钮2.禁止 ＝ 真
.计次循环首 (10, a)
    超文本浏览框1.跳转 (“https://vip.ztgame.com:8081/registe/register.jsp”, , )
    超文本浏览框1.刷新显示 ()
    延迟 (到整数 (编辑框8.内容))
    置随机数种子 ()
    取随机数 (97, 122)
    随机账号 [1] ＝ 字符 (取随机数 (97, 122))
    随机账号 [2] ＝ 字符 (取随机数 (97, 122))
    随机账号 [3] ＝ 字符 (取随机数 (97, 122))
    随机账号 [4] ＝ 字符 (取随机数 (97, 122))
    随机账号 [5] ＝ 字符 (取随机数 (97, 122))
    随机账号 [6] ＝ 字符 (取随机数 (97, 122))
    随机账号 [7] ＝ 字符 (取随机数 (97, 122))
    随机账号 [8] ＝ 字符 (取随机数 (97, 122))
    随机账号 [9] ＝ 字符 (取随机数 (97, 122))
    随机账号 [10] ＝ 字符 (取随机数 (97, 122))
    编辑框1.内容 ＝ 随机账号 [1] ＋ 随机账号 [2] ＋ 随机账号 [3] ＋ 随机账号 [4] ＋ 随机账号 [5] ＋ 随机账号 [6] ＋ 随机账号 [7] ＋ 随机账号 [8] ＋ 随机账号 [9] ＋ 随机账号 [10] ＋ 编辑框7.内容
    延迟 (1000)

    ' 取网页句柄
    网页操作.初始化 (, 超文本浏览框1.取窗口句柄 ())
    ' 写账户
    网页操作.填写表单 (“username”, #元素标识类型_名称, 编辑框1.内容)
    ' 写密码
    网页操作.填写表单 (“userpwd”, #元素标识类型_名称, 编辑框2.内容)
    网页操作.填写表单 (“reuserpwd”, #元素标识类型_名称, 编辑框2.内容)
    ' 写数字密码
    网页操作.填写表单 (“superpwd”, #元素标识类型_名称, 编辑框3.内容)
    网页操作.填写表单 (“resuperpwd”, #元素标识类型_名称, 编辑框3.内容)
    ' 安全邮箱
    网页操作.填写表单 (“email”, #元素标识类型_名称, 编辑框4.内容)
    ' 身份证
    网页操作.填写表单 (“idnum”, #元素标识类型_名称, 编辑框5.内容)
    ' 姓名
    网页操作.填写表单 (“realname”, #元素标识类型_名称, 编辑框6.内容)
    ' 提交
    网页操作.执行脚本 (“do_register()”, #脚本类型_JavaScript)
    延迟 (1000)
    写文本行 (文件号, 时间到文本 (取现行时间 (), ) ＋ “|” ＋ 编辑框1.内容 ＋ “|” ＋ 编辑框2.内容)




.计次循环尾 ()



.子程序 __启动窗口_创建完毕

按钮4.禁止 ＝ 真
编辑框8.禁止 ＝ 真

文件号 ＝ 打开文件 (取运行目录 () ＋ “\” ＋ “账号.txt”, #改写, #无限制)


.子程序 __启动窗口_可否被关闭, 逻辑型

关闭文件 (文件号)
_启动窗口.销毁 ()



http://yunpan.cn/QXhJnRDnJiqQD