如果用批处理运行QQ
因为本人经常要帮几个人挂QQ,一个一个输入比较麻烦,于是就复制了几个QQ目录,一个QQ直接点就可以运行了,但是这样也麻烦,有没方式做一个批处理文件,直接运行即可自动打开相...
因为本人经常要帮几个人挂QQ,一个一个输入比较麻烦,于是就复制了几个QQ目录,一个QQ直接点就可以运行了,但是这样也麻烦,有没方式做一个批处理文件,直接运行即可自动打开相应的快捷方式。如直接打开E:1、2、3、4号QQ
展开
3个回答
百事牛
2024-10-22 广告
2024-10-22 广告
百事牛是共享提供商,我们提供可靠有效的服务,适当合理的授权费有利于的继续更新优化。同样的事情,同样的方法,百事牛团队十年磨一剑,始终至聚焦在密码恢复领域,深耕于此,我们已研制出有别于其他公司的算法和运算模式, 百事牛的暴力模式加入了分布式点...
点击进入详情页
本回答由百事牛提供
展开全部
就是上面的代码,也不知道是不是批处理,请问可以在哪里加什么语句就能实现给我修改后的批量登录的代码给你,那个是我之前没用数组时的代码。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2011-07-05
展开全部
用VBS代码,自己改成自己的路径密码等等。当然了安全起见,手动设置密码最好。
因为这个文件谁都可以用。
Dim WshShell, QQPath, QQselect
QQPath="E:\软件安装\腾讯\QQ\Bin\QQ.exe"
Set WshShell=WScript.CreateObject("WScript.Shell")
WshShell.Run QQPath
WScript.Sleep 2000
WshShell.AppActivate "QQ登录"
WshShell.SendKeys "+{TAB}"
WshShell.SendKeys "账号"
WScript.Sleep 200
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "密码"
WScript.Sleep 200
WshShell.SendKeys "{ENTER}"
因为这个文件谁都可以用。
Dim WshShell, QQPath, QQselect
QQPath="E:\软件安装\腾讯\QQ\Bin\QQ.exe"
Set WshShell=WScript.CreateObject("WScript.Shell")
WshShell.Run QQPath
WScript.Sleep 2000
WshShell.AppActivate "QQ登录"
WshShell.SendKeys "+{TAB}"
WshShell.SendKeys "账号"
WScript.Sleep 200
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "密码"
WScript.Sleep 200
WshShell.SendKeys "{ENTER}"
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询