[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
试了一下,不用再输入密码了!很方便!xx

TOP

你太有才了..............

TOP

感谢

人生何处逢知己,唯有DOS联盟在这里!强,我真是碰见了亲人了!我求知欲特强!谢谢

TOP

谢谢,复制一个自己研究下

TOP

呵呵 有点麻烦啊

现在工具挺多的

TOP

我来稍微解释一下楼主整个代码:
代码第一部分
  1. ::============================密码部分开始============================
  2. :: ╔══════════════════════╗
  3. :: ║ 编写:野菜 hi.baidu.com/jsj30651 ║
  4. :: ╠══════════════════════╣
  5. :: ║ QQ:959212677 ║
  6. :: ╚══════════════════════╝
  7. set cishu=3
  8. ::定义最高尝试次数
  9. set mima=123
  10. ::定义密码 set shijian=5
  11. ::定义超过尝试次数后多少秒后自动退出
  12. set times=%cishu% echo 请输入密码:
  13. echo 注:回车直接退出!!!
  14. set /p pass= goto kaishihou :kaishi set /p pass="请输入密码:"
  15. :kaishihou if %pass%=="" goto kaishi
  16. cls
  17. if %pass%==%mima% goto start
  18. set /a times=%times%-1
  19. if %times%==0 goto jieshu echo 对不起,密码错误!请重新输入!
  20. echo 还有%times%次机会
  21. goto kaishi
  22. :jieshu echo 对不起,你已连续输错密码%cishu%次!!!
  23. echo 程序将%shijian%秒后自动退出!!!
  24. ping -n %shijian% 127.0.0.1>nul exit
  25. :start
  26. ::为了不让别人看到密码,可以用BAT转EXE工具,把批处理转换成EXE可执行文件。
  27. ::============================密码部分结束============================
复制代码

解释:这一部分主要是给这个自动登录器加上密码保护,如果别人不知道密码,就不能使用这个登录器,这里楼主设的初始密码是123,当然,有人会说,直接用记事本打开,看密码,不就行了吗,是的 ,可以这样看到密码,但是楼主已经提示了,最好用BAT转EXE,将这个自动登录器转为EXE格式。这样就很好的保护了密码。
代码第二部分
  1. ::============================寻找QQ路径============================
  2. for /f "skip=4 tokens=2,*" %%i in ('REG QUERY "HKEY_LOCAL_MACHINE\SOFTWARE\TENCENT\QQ" /v "Install"')
  3. do (
  4.        set QQ=%%j.\QQ.exe
  5. ) >nul 2>nul
  6. cls
  7. if not '%QQ%'=='' goto fndqq
  8. echo 注册表中没有QQ的安装信息,正在全盘搜索……
  9. for %%a in (c d e f g h i j k l m n o p q r s t u v w x y z) do (
  10.      pushd %%a:\
  11.      for /r %%b in (.) do (
  12.           if exist %%b\QQ.exe set QQ=%%b\QQ.exe
  13. )
  14. ) >nul 2>nul
  15. popd
  16. set regadd=%QQ:~0,-8%
  17. REG ADD "HKEY_LOCAL_MACHINE\SOFTWARE\TENCENT\QQ" /v "Install" /t REG_SZ /d %regadd% >nul 2>nul
  18. cls
  19. :fndqq
  20. ::============================寻找QQ路径============================
复制代码

解释:这一部分,我想不用说太多,就是寻找你机子上,QQ的安装路径。
代码第三部分
  1. ::==========================主批处理部分开始==========================
  2. echo 请选择:
  3. echo.
  4. echo 1、只登陆QQ《947064999》
  5. echo.
  6. echo 2、只登陆QQ《959212677》
  7. echo.
  8. echo 3、同时登陆以上两个QQ
  9. echo.
  10. echo 4、登陆其他QQ
  11. echo.
  12. echo 5、关闭所有QQ ! ! !
  13. echo.
  14. ::显示可以选择的选项
  15. set /p choose="请输入序号:"
  16. ::输入上面的选项
  17. if %choose%==1 goto 1
  18. if %choose%==2 goto 2
  19. if %choose%==3 goto 3
  20. if %choose%==4 goto 4
  21. if %choose%==5 goto 5
  22. ::根据输入的序号判断下一步跳转到哪里
  23. :1 start "" "%QQ%" /START QQUIN:947064999 PWDHASH:[此处为密码加密后的字符串] /STAT:41
  24. ::自动登陆QQ:947064999 exit
  25. :2 start "" "%QQ%" /START QQUIN:959212677 PWDHASH:[此处为密码加密后的字符串] /STAT:41
  26. ::自动登陆QQ:959212677 exit
  27. :3 start "" "%QQ%" /START QQUIN:947064999 PWDHASH:[此处为密码加密后的字符串] /STAT:41
  28. ping -n 5 127.0.0.1>nul
  29. ::设置延时5秒后运行下一条命令
  30. start "" "%QQ%" /START QQUIN:959212677 PWDHASH:[此处为密码加密后的字符串] /STAT:41
  31. exit
  32. :4 start "" "%QQ%"
  33. ::直接打开QQ exit
  34. :5 taskkill /im QQ.exe /f /t
  35. ::结束所有QQ进程
  36. exit
  37. ::==========================主批处理部分结束==========================
复制代码

解释:这一部分,正如楼主所说,是主要部分。它主要是显示5个选项,让你选择,不同的选择,进行不同的功能。 新手们不会用,出错都是这一块。 当你选择1时,这当然是楼主自己的QQ号,它就会自动登录楼主的QQ号。要想登陆你的QQ号,首先把楼主的QQ号码换成你自己的。然后在PWDHASH:后面填写上自己QQ号的密码的经过加密后的字符串 。有人问,自己的QQ号密码,怎么加密,加密后的字符串是什么样子,问的好,楼主给出了一个PWDHASH工具,在附件中,下载后,打开PWDHASH,填写自己的QQ号密码,然后确定,然后你就会看到自己 QQ号密码的加密字符串。然后把这个字符串复制到代码中,楼主让你填写密码字符串的地方,就是[此处为密码加密后的字符串]。 选择2、3时,跟1一样。 选择4时,就是启动QQ自己的登录器。就是腾讯自己提供的登录界面。 选择5时,就是杀掉QQ进程。

[ 本帖最后由 keen 于 2009-4-8 20:48 编辑 ]
1

评分人数

(*^_^*)

TOP

再贴一个批处理版的PWDHASH:
  1. @echo %dbg% off   &&   setlocal   &&   chcp 437|graftabl 936>nul   &&   set /p var=字符串:
  2. for /f %%. in ('md5 -d%var%') do set "var=%%."
  3. :toSplit
  4.    if [%a%]==[32] (goto :toBase64) else (call call set "str=%str% %%var:~%a%,2%%" && set /a a+=2)
  5.    goto :toSplit
  6. :toBase64
  7.    echo exit|%ComSpec%/kprompt e 100 %str% $_rcx$_10$_n tmp.tmp$_w$_q$_|debug>nul
  8.    for /f %%. in ('type tmp.tmp^|base64') do ( set "base64=%%." )
  9.    echo.&echo PwdHash码: %base64%   &&   del tmp.tmp >nul 2>nul
  10. pause
复制代码
这是别人写的,我也忘了原作者是谁,如果是作者本人看到,请提示!
这个代码,要求有MD5工具。
其中有些代码,我也看不懂,贴出来,只是大家讨论,学习!
(*^_^*)

TOP

找了很久!

TOP

回复 22楼 的帖子

这个代码不但需要md5工具还需要base64工具,
我说我怎么用md5和base64都无法得到正确结果呢,原来还有这一句。
echo exit|%ComSpec%/kprompt e 100 %str% $_rcx$_10$_n tmp.tmp$_w$_q$_|debug>nul
不懂。。
技术问题请到论坛发帖求助!

TOP

回复 24楼 的帖子

有个纯批处理版的base64代码,可以摆脱对base64.exe的依赖。
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

太复杂啦,不能输入自己想登的QQ

TOP

原帖由 keen 于 2009-4-8 23:33 发表
再贴一个批处理版的PWDHASH:@echo %dbg% off   &&   setlocal   &&   chcp 437|graftabl 936>nul   &&   set /p var=字符串:
for /f %%. in ('md5 -d%var%') do set "var=%%."

:toSplit
   if [%a%]==[32] (g ...

这个是cn-dos里的redtek写的。呵呵

TOP

回复 1楼 的帖子

好久没来这里了,   全盘搜索时应该有一个枚举函数吧,  abcd那样应该太费事了吧

TOP

找了很久!!!!!!

TOP

返回列表