批处理之家 - Powered by Discuz! Board

标题: [特效代码] 批处理怎样自动输入游戏的账号密码？ [打印本页]

作者: twt212 时间: 2010-11-14 06:27 标题: 批处理怎样自动输入游戏的账号密码？

这个是可以输入中文名字的VBS脚本，但是有个问题。运行VBS后要点IE认其在前置，还会打开记事本，各位有什么办法解决？

 
set ierunner = CreateObject("wscript.shell")
ierunner.run "cmd /c start iexplore http://s1.pet.mop.com/",0
wscript.sleep 3000
ierunner.sendkeys "{TAB}"
wscript.sleep 400
ierunner.sendkeys "{TAB}"
wscript.sleep 400
ierunner.sendkeys "{TAB}"
wscript.sleep 400
ierunner.sendkeys "{TAB}"
Set wshobj=WScript.CreateObject("WScript.Shell")
code="中文名字"
wshobj.Run "cmd.exe /c echo " & code & "| clip.exe", vbHide
app=wshobj.Run ("C:\windows\notepad.exe")
WScript.Sleep 2000
wshobj.AppActivate app
wshobj.SendKeys "^v"
ierunner.sendkeys "{TAB}"
ierunner.sendkeys "密码"
ierunner.sendkeys "{TAB}"
wscript.sleep 400
复制代码

[ 本帖最后由 twt212 于 2010-12-3 06:38 编辑 ]

作者: twt212 时间: 2010-11-15 03:01

怎么没人帮我啊？？？？？

作者: caiyaoyao 时间: 2010-11-15 10:57

呵呵我也很想知道哦
我只会打开网页但是不知道怎么自动输入账号和密码

作者: BillGates 时间: 2010-11-15 12:17 标题: 标题

vbs应该可以实现噢，打开，然后延时，模拟按键输入…

作者: netbenton 时间: 2010-11-15 12:38

用户名，密密码都好解决~~
可是“验证码”无法输入呀

作者: twt212 时间: 2010-11-15 23:58

验证码我自已手动输入就可以了。只要能自动输入账号密码就很不错了。

作者: netbenton 时间: 2010-11-16 06:55

既然不能全自动，那还不如自已复制粘贴比较实在。

你把用户名与密码放在一个文本文件内，然后一个一个复制粘贴，也差不多。
毕竟还要输入验证码。

作者: sgaizxt001 时间: 2010-11-16 07:03

完全不要把账号和密码放在一起，这是安全意识啊

作者: twt212 时间: 2010-11-16 07:57

原帖由 netbenton 于 2010-11-16 06:55 发表
既然不能全自动，那还不如自已复制粘贴比较实在。

你把用户名与密码放在一个文本文件内，然后一个一个复制粘贴，也差不多。
毕竟还要输入验证码。

不一样啊。N个号。复制登陆要半个小时，累死人了。批处理方便很多。

作者: canyuexiaolang 时间: 2010-11-16 22:34

批处理做不到吧。
PS:让你女朋友玩什么游戏额，真是不心疼她，

作者: BillGates 时间: 2010-11-16 23:58

可以实现，可惜我用手机上，建议楼主搜索一下论坛，自动登陆网页的一大堆，可以批处理和vbs结合。

作者: canyuexiaolang 时间: 2010-11-17 16:50 标题: 回复 11楼的帖子

Echo出来个VBS，还不如直接用VBS，。

作者: twt212 时间: 2010-11-21 06:34

我找到一个代码。但是打开网页之后要用鼠标点一下“用户名”框框里才能自动填上账号密码。大家帮我改一下。

 
set ierunner = CreateObject("wscript.shell") 
ierunner.run "cmd /c start iexplore http://s1.pet.mop.com/login.html",0 
wscript.sleep 3000
ierunner.sendkeys "{TAB}"
wscript.sleep 400
ierunner.sendkeys "{TAB}"
wscript.sleep 400
ierunner.sendkeys "{TAB}"
wscript.sleep 400
ierunner.sendkeys "英文用户名" 
ierunner.sendkeys "{TAB}"
ierunner.sendkeys "密码" 
ierunner.sendkeys "{TAB}" 
 
复制代码

[ 本帖最后由 twt212 于 2010-12-3 06:41 编辑 ]

作者: twt212 时间: 2010-12-3 06:42

顶顶上，，，谁能帮我？

作者: jjmmrr 时间: 2010-12-7 19:30

WScript.CreateObject("WScript.Shell").Run "iexplore http://cht.reg.qq.com/"
WScript.Sleep 5000
Set qqej = CreateObject("WScript.Shell")
qqej.SendKeys "QQEJ"
qqej.SendKeys "{Tab}"
WScript.Sleep 250
qqej.SendKeys "{down}"  '生日
qqej.SendKeys "{Tab}"
qqej.SendKeys "{down}"
'qqej.SendKeys "10"  '10月
qqej.SendKeys "{Tab}"
'qqej.SendKeys "1"  '1日
qqej.SendKeys "{down}"
qqej.SendKeys "{Tab}"
qqej.SendKeys "{Tab}"
qqej.SendKeys "PASS"  '密码
qqej.SendKeys "{Tab}"
qqej.SendKeys "PASS"  '密码
qqej.SendKeys "{Tab}"
qqej.SendKeys "{Tab}"  '中国
qqej.SendKeys "{Tab}"  '省
qqej.SendKeys "{Tab}"  '市

这是批量申请QQ号码运行后自动打开申请QQ页面，自动填写用户名和密码，定位到输入验证码框，

你可以修改一下。

[ 本帖最后由 jjmmrr 于 2010-12-7 19:32 编辑 ]

作者: youxi01 时间: 2010-12-7 20:16

首先不建议使用sendKeys。

利用VBS可以直接获取打开IE对象的，并能获取相应的控件名称，ID，并设置其中的值，

因此，完成可以利用VBS自动填充账号、密码，还可以控制按钮点击
曾经写过一个教师培训自动学习的，可以参考下：
http://www.2laoshi.cn/post/206.html
请自行修改代码！

欢迎光临批处理之家 (http://bbs.bathome.net/)