- 展开附件 .\plugin *.dll
- 延时500毫秒
- 用户定义变量 tx=a12736a8sfgwsadf 通行证(须在4-16位,第1位为英文字母)
- 用户定义变量 mm=a123456789 密码(长度为4-10个字符)
- 调用插件命令 Web.Bind("wqm.exe")
- //打开申请地址
- 调用插件命令 Web.Tips("打开申请网页...")
- 调用插件命令 Web.Go("http://register.sdo.com/sdo/reg/mir2_tg/inputinfo.asp")
- 调用插件命令 Web.SetSize(900,850)
- 延时500毫秒
- 调用插件命令 Web.Tips("正在输入...")
- 调用插件命令 Web.HtmlInput(tx,"id:username")
- 调用插件命令 Web.HtmlInput(mm,"id:password")
- 调用插件命令 Web.HtmlInput(mm,"id:repassword")
- 调用插件命令 Web.Tips("验证码识别...")
- //<>=============识别验证码(必须保证能看见验证码在最前面,否则无法识别!)
- //下面这句是得到当前最前面的窗口句柄
- 调用插件命令 Hwnd = Window.Foreground()
- //下面这句是移动窗口到(0, 0)位置
- 调用插件命令 Window.Move(Hwnd, 0, 0)
- 延时500毫秒
- //下面这句是得到窗口句柄的客户区大小
- 调用插件命令 Rect = Window.GetClientRect(Hwnd)
- MyArray = Split(Rect, "|")
- L = Clng(MyArray(0))+258: T = Clng(MyArray(1))+504
- 调用插件命令 yzm=SDTXZ.GetSDNO(Hwnd,L,T)
- 调用插件命令 Web.HtmlInput(yzm,"id:attcode2")
- 延时500毫秒
- 调用插件命令 Web.Tips("提交申请...")
- //提交注册
- //Plugin Web.Click("tag:INPUT&value:我已经阅读并同意接受用户服务协议,创建我的盛大通行证")
- 脚本停止运行
- 子程序 OnScriptExit
- 调用插件命令 Web.Tips("脚本停止运行...")
- 弹出窗口 "演示填表完成,最好的脚本都是自己做的!"
- 子程序结束,回到调用处