ID=Web.Bind("wqm.exe") Plugin Web.Tips("完美时空通行证") Plugin Web.Go("http://passport.wanmei.com/jsp/member/register.jsp") //<>===================================================打开网页免费申请 Plugin Web.SetSize(1024,768) Plugin Z=File.IsFileExit("D:\精灵记录.ini") If Z=false Plugin File.WriteINI("累计数","number","1","D:\精灵记录.ini") EndIf Plugin S=File.ReadINI("累计数","number","D:\精灵记录.ini") Plugin Web.HtmlInput("账号"&S,"name:username") SS=S+1 Plugin File.WriteINI("累计数","number",SS,"D:\精灵记录.ini") Plugin Web.HtmlInput("此填密码","name:passwd") Plugin Web.HtmlInput("此填密码","name:repeatpasswd") Plugin Web.HtmlInput("身份证","name:fcmidnumber") Plugin Web.HtmlInput("此姓名","name:fcmtruename") Plugin Web.HtmlInput("邮箱","name:email") Plugin Web.HtmlInput("身份证","name:idnumber1") //<>==================================================输入验证码 Plugin Web.Tips("等待输入验证码,结束按回车键") Delay 100 Plugin Web.LeftClick(484,571) Delay 500 Rem 等待 WaitKey key //<>===================================================按CTRL键即可提交申请 If key=17 Goto 离开 EndIf Goto 等待 Rem 离开 //<>===================================================确定并同意以下条款 Plugin Web.Tips("注册提交") Delay 100 Plugin web.HtmlClick("id:protocol1") Delay 100 Plugin web.HtmlClick("id:protocol2") Delay 100 Plugin web.HtmlClick("tag:INPUT&value:注册账号") Delay 500 EndScript Sub OnScriptExit Plugin Web.Tips("脚本停止运行") Return