- 延时 1000 毫秒
- 注释:Plugin Web.GetProcessID("wqm.exe")
- 调用 Web.Bind("wqm.exe")
- 注释:<>===================================================打开网页免费申请
- 调用 Web.Tips("打开网页免费申请网页")
- 调用 Web.Go("http://newreg.qq.com/")
- 调用 Web.SetSize(913,850)
- 延时 1000 毫秒
- 注释:<>===================================================输入名字
- 调用 Web.HtmlInput("name","type:text&index:0")
- 调用 Web.Tips("输入生日")
- 延时 500 毫秒
- 注释:<>===================================================输入生日-年
- 调用 Web.LeftClick(325,200)
- 延时 500 毫秒
- 循环 3 次
- 调用 Web.KeyPress(40)
- 循环结束
- 延时 500 毫秒
- 注释:<>===================================================输入生日-月
- 调用 Web.LeftClick(425,200)
- 延时 500 毫秒
- 循环 3 次
- 调用 Web.KeyPress(40)
- 循环结束
- 延时 500 毫秒
- 注释:<>===================================================输入生日-日
- 调用 Web.LeftClick(525,200)
- 延时 500 毫秒
- 循环 3 次
- 调用 Web.KeyPress(40)
- 循环结束
- 延时 500 毫秒
- 调用 Web.LeftClick(625,200)
- 注释:<>===================================================输入密码
- 调用 Web.LeftClick(360,260)
- 延时 500 毫秒
- 调用 Web.Tips("输入密码")
- 调用 Web.KeyPress(65)
- 循环 6 次
- 调用 Web.KeyPress(49)
- 循环结束
- 延时 500 毫秒
- 调用 Web.LeftClick(360,310)
- 延时 500 毫秒
- 调用 Web.KeyPress(65)
- 循环 6 次
- 调用 Web.KeyPress(49)
- 循环结束
- 延时 500 毫秒
- 注释:<>==================================================输入验证码
- 调用 Web.Tips("等待输入验证码,结束按回车键")
- 调用 Web.LeftClick(335,373)
- 延时 500 毫秒
- 标记 等待
- 令 key = (键盘)等待按任意键
- 注释:<>===================================================按回车键即可提交申请
- 如果 key = 13 则
- 跳转到标记 离开
- 条件结束
- 跳转到标记 等待
- 标记 离开
- 注释:<>===================================================确定并同意以下条款
- 调用 Web.Tips("注册提交")
- 调用 web.HtmlClick("tag:span&txt:确定并同意以下条款")
- 延时 500 毫秒
- 脚本停止运行
- 子程序 OnScriptExit()
- 调用 Web.Tips("脚本停止运行")
- 子程序结束