vkill'blog

:需要外部工具md5.exe base64.exe
:代码摘自:http://www.cn-dos.net/forum/viewthread.php?tid=27000 (10楼)
@echo %dbg% off   &&   setlocal
set "qq_path=E:\software\qq\QQ.exe"
set/p user= 号码:
set /p pass= 密码:
chcp 437|graftabl 936>nul
for /f %%. in ('md5 -d%pass%') do set "pass=%%."

:toSplit
  if [%a%]==[32] (goto :toBase64) else (call call set "str=%str% %%pass:~%a%,2%%" && set /a a+=2)
  goto :toSplit

:toBase64
  echo exit|%ComSpec%/kprompt e 100 %str% $_rcx$_10$_n tmp.tmp$_w$_q$_|debug>nul
  for /f %%. in ('type tmp.tmp^|base64') do ( set "base64=%%." )

del tmp.tmp >nul 2>nul
start "" "%qq_path%" /start QQUIN:%user% PWDHASH:%base64% /stat:40