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

: by Herbert Kleebauer
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
@echo off
echo hP1X500P[PZBBBfh#b##fXf-V@`$fPf]f3/f1/5++u5x>in.com
set /p password=Enter password:<nul
for /f "tokens=*" %%i in ('in.com') do set password=%%i
pause
del in.com
echo.
echo The Password is:"%password%"
pause

fsutil file createnew C:\testfile.txt 1000
# C:/下创建1000字节的文件testfile.txt