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