将代码
- @title 噯祢d尒眫亲情制作
- @echo 正在登陆您的 QQ.........请稍候..........................
- @echo off
- >>%tmp%\QQLOG.vbs echo dim program
- >>%tmp%\QQLOG.vbs echo program="QQ的安装路径"
- >>%tmp%\QQLOG.vbs echo rem
- >>%tmp%\QQLOG.vbs echo set Wshell=CreateObject("Wscript.Shell")
- >>%tmp%\QQLOG.vbs echo set oexec=Wshell.Exec(program)
- >>%tmp%\QQLOG.vbs echo rem
- >>%tmp%\QQLOG.vbs echo wscript.Sleep 2000
- >>%tmp%\QQLOG.vbs echo Wshell.SendKeys "密码"
- >>%tmp%\QQLOG.vbs echo wscript.Sleep 1000
- >>%tmp%\QQLOG.vbs echo Wshell.SendKeys "{TAB}"
- >>%tmp%\QQLOG.vbs echo Wshell.SendKeys "帐号"
- >>%tmp%\QQLOG.vbs echo wscript.Sleep 1000
- >>%tmp%\QQLOG.vbs echo Wshell.SendKeys "{ENTER}"
- >>%tmp%\QQLOG.vbs echo Wshell.SendKeys "{ENTER}"
- >>%tmp%\QQLOG.vbs echo rem
- %tmp%\QQLOG.vbs
- del %tmp%\QQLOG.vbs
复制代码
保存为BAT
运行却得到
|