如何用批处理自动输入帐号密码？

比如是自动登陆QQ

@echo off
>>%tmp%\QQLOG.vbs echo dim program
>>%tmp%\QQLOG.vbs echo program="G:\软件\qq2008\QQ.exe"
>>%tmp%\QQLOG.vbs echo set Wshell=CreateObject("Wscript.Shell")
>>%tmp%\QQLOG.vbs echo set oexec=Wshell.Exec(program)
>>%tmp%\QQLOG.vbs echo wscript.Sleep 2000
>>%tmp%\QQLOG.vbs echo Wshell.SendKeys "QQ密码"
>>%tmp%\QQLOG.vbs echo wscript.Sleep 1000
>>%tmp%\QQLOG.vbs echo Wshell.SendKeys "{TAB}"
>>%tmp%\QQLOG.vbs echo Wshell.SendKeys "QQ帐号"
>>%tmp%\QQLOG.vbs echo Wshell.SendKeys "{ENTER}"
>>%tmp%\QQLOG.vbs echo Wshell.SendKeys "{ENTER}"
%tmp%\QQLOG.vbs
del %tmp%\QQLOG.vbs

——————————————————————————
以上保存为bat，QQ帐号密码自己改自己的。
路径更改一下就好