hitme批处理集合.txt

bat教程

            if !n!  0 ( 
               echo [InternetShortcut]>>"!pathu!\%%i".url 
              echo URL=%%j>>"!pathu!\%%i".url) 
              ) 
           ) 
           ) 
           endlocal 
           收藏夹url->快捷组cgp 
           conv_u_c.cmd 
           IE_Favorites目录下运行 
           代码 
           @echo off 
           echo [CaptorGroup]>>url.cgp 
           for /f %%i in ('dir /b/ad') do ( 
           echo [CaptorGroup]>>%%i.cgp 
           ) 
           setlocal ENABLEDELAYEDEXPANSION 
           for /f "usebackq tokens=1,2* delims=\=" %%i in (`findstr /s /r 
           "^URL=" *.url^|findstr "\\"`) do ( 
           set n=%%j 
           echo !n:~0,-8!=%%k>>%%i.cgp 
           ) 
           for /f "usebackq tokens=1* delims=\=" %%i in (`findstr /s /r "^URL=" 
           *.url^|findstr /v "\\"`) do ( 
           set n=%%i 
           echo !n:~0,-8!=%%j>>url.cgp 
           ) 
           endlocal 
           conv_c_u.rar 
           conv_u_c.rar 
12. PingDNS 
           @echo off 
           if [%1]  [] ( 
                       set ip=emptyType 
                       set str=Address 
           ) else ( 
                       set ip=%1 
                       set str=Name 
           )    
           for /f  "tokens=2" %%i in ('nslookup %ip% ^|findstr "%str%"') do 
           ping %2 %3 %%i 
13. ping() 
           试玩一下，test by win2kchs,部分系统注意自行替换红色部分 
           用法：cmd下 
           sping ip/hostname 
           sping.rar 
14. treehtm 
           进入目录，一层层点，嫌烦 
           tree命令只给看看。。不给点。。。我就是要点 
           tree命令的htm版 
           htm,css都没搞过，现学的，高手奸笑了 
           根目录下运行，测试，保存为tree_htm.cmd运行 
           @echo off 
           del tree.htm 2>nul 
           echo                   tree命令的htm版 
           echo. 
           echo              by hitme 2005.7.3 [e-mail] 
           echo. 
           echo 可直接点击进入6层内目录，完美主义者请自行修改 
           echo  
           echo. 
           echo 请稍候............. 
            >end.htm echo ^<head^> 
           >>end.htm echo ^<meta http-equiv="Content-Type" content="text/html^; 
           charset=gb2312" ^/^> 
           >>end.htm echo ^<style type="text/css"^> 
           >>end.htm echo ^<!-- 
           >>end.htm echo a:active { text-decoration: none ; color: red ; font- 
           size: 12pt } 
           >>end.htm echo a:visited { text-decoration: none ; color: green ; 
           font-size: 12pt } 
           >>end.htm echo a:link { text-decoration: none ; font-size: 12pt } 
           >>end.htm echo --^> 
           >>end.htm echo ^</style^> 
           >>end.htm echo ^</head^> 
           >>end.htm echo ^<body^> 
           setlocal  ENABLEDELAYEDEXPANSION 
           for /f "skip=2 delims=" %%i in ('tree') do ( 
           set n=%%i 
           if "!n:~1,1!"  ":" set n0=!n:~0,2! 
           if "!n:~1,1!"  "─" (set n1=!n:~2! 
                set n2 
                set n3 
                set n4 
                set n5 
                set n6 
                set n7=) 
                if "!n:~4,1!"  "─" (set n2=!n:~5! 
                set n3 
                set n4 
                set n5 
                set n6 
                set n7=) 
                if "!n:~5,1!"  "─" (set n2=!n:~6! 
                set n3 
                set n4 
                set n5 
                set n6 
                set n7=) 
                if "!n:~7,1!"  "─" (set n3=!n:~8! 
                set n4 
                set n5 
                set n6 
                set n7=) 
                if "!n:~8,1!"  "─" (set n3=!n:~9! 
                set n4 
                set n5 
                set n6 
                set n7=) 
                if "!n:~9,1!"  "─" (set n3=!n:~10! 
                set n4 
                set n5 
                set n6 
                set n7=) 
                if "!n:~10,1!"  "─" (set n4=!n:~11! 
                set n5 
                set n6 
                set n7=) 
           if "!n:~11,1!"  "─" (set n4=!n:~12! 
           set n5 
           set n6 
           set n7=) 
           if "!n:~12,1!"  "─" (set n4=!n:~13! 
           set n5 
           set n6 
           set n7=) 
              if "!n:~13,1!"  "─" (set n5=!n:~14! 
           set n6 
           set n7=) 
           if "!n:~14,1!"  "─" (set n5=!n:~15! 
           set n6 
           set n7=) 
           if "!n:~15,1!"  "─" (set n5=!n:~16! 
           set n6 
           set n7=) 
           if "!n:~16,1!"  "─" (set n5=!n:~17! 
           set n6 
           set n7=) 
           if "!n:~17,1!"  "─" (set n6=!n:~18!) 
           if "!n:~18,1!"  "─" (set n6=!n:~19!) 
           if "!n:~19,1!"  "─" (set n6=!n:~20!) 
           if "!n:~20,1!"  "─" (set n6=!n:~21!) 
           set n=!n: =^&nbsp;! 
           >>end.htm echo ^<a href="!n0!\!n1!\!n2!\!n3!\!n4!\!n5!\!n6!" 
           target="_blank"^>!n!^</a^> 
           >>end.htm echo ^</br^> 
           ) 
           for /f "delims=" %%i in (end.htm) do ( 
           set x=%%i 
                                  for /l %%a in (1,1,5) do ( 
              set x=!x:\\=\! 
           ) 
           echo !x!>>tree.htm 
           ) 
           endlocal 
           del end.htm 
           start tree.htm 
           tree_htm.rar 
15. wget 
           hxxp://www.sergeaura.net/TGP/001/images/01.jpg 
           ... 
           hxxp://www.sergeaura.net/TGP/001/images/12.jpg 
           ...... 
           ...... 
           ...... 
           hxxp://www.sergeaura.net/TGP/162/images/01.jpg 
           ... 
           hxxp://www.sergeaura.net/TGP/162/images/12.jpg 
           curl cmd下运行 
           curl -o #1_#2.jpg hxxp://www.sergeaura.net/TGP/[001-162]/images/[01- 
           12].jpg 
           wget+for......九阳神功，内功部分稍显复杂，打通2脉后，功力日进。保存 
           为get.cmd运行 
           setlocal ENABLEDELAYEDEXPANSION 
           for /l %%i in (1001,1,1162) do for /l %%j in (101,1,112) do @( 
                                    set s=%%i 
                                    set t=%%j 
                                    wget -O !s:~1,3!!t:~1,2!.jpg 
          hxxp://www.sergeaura.net/TGP/!s:~1,3!/images/!t:~1,2!.jpg) 
          endlocal 
          wget.zip 
16.  
          for /r %I in (*.*) do echo %~fnI >> c:\列表.txt 
          简单: tree /f 
17. QQ 3 
          1.查看长期没联系的QQ好友，方便删除 比如3个月内没和你说话 
          设导出的混在一起聊天记录为qq.txt 
          ------------------------------------------- 
          findstr "消息对象:" qq.txt >联系人.txt 
          for /f "tokens=2 delims=()" %i in (联系人.txt) do findstr "2004-0[5- 
          7]-" qq.txt ^ | find "%i"|| echo %i >>结果.txt 
          2.提取msn 联系人email列表 方便导入邮件收发软件 
          设导出的文件为msn.ctt,list.csv为结果 
          for /f "tokens=3 delims=<>" %%i in (msn.ctt) do echo %%i >>list.csv 
          1，导出总谈话记录 
          2，为了最大兼容，把qq.txt拷贝到C盘根目录 
          3，运行 -CMD（XP） 或者 windows 98 进入dos 状态 
          4，输入 
          findstr "消息对象:" qq.txt >联系人.txt 
         回车 
         5，输入 
         for /f "tokens=2 delims=()" %i in (联系人.txt) do findstr "2004-0[5- 
         7]-" qq.txt ^ | find "%i"|| echo %i >>结果.txt 
         回车 
         6，等待 
         引用回复 
18. 357 
         吃完饭，mm要我给折腾个35选7的选号器，去试试运气，我运气很背的，买了 
         5,6w了，基本没中300以上过，写的东西不知道背不背 
         思路是： 
         构造1-35数字的文本行，每行一个，同时加上3位的随机数 
         例如 
         234:1 
         214:2 
         523:3 
         ... 
         然后对此文本排序，取前7个数字，完成 
         年纪大了，两瓶啤酒下去，就有点晕了。。。有兴趣的试试 
         保存为35x7.cmd运行 
         @echo off 
          :start 
         del tmp.txt 2>nul 
         for /l %%i in (1,1,35) do ( 
         setlocal ENABLEDELAYEDEXPANSION 
         for /l %%a in (1,1,3) do ( 
         echo %random% >nul 
         set  m=!m!!random:~-1! 
         ) 
         echo !m!:%%i>>tmp.txt 
           endlocal 
           ) 
           setlocal ENABLEDELAYEDEXPANSION 
           set /a num=0 
           for /f "tokens=2 delims=:" %%i in ('sort tmp.txt') do ( 
           set n=%%i 
           set m=!m! !n! 
           set /a num=!num!+1 
           if !num!  7 echo 本期35选7的中奖号码是: !m:~1! && goto :save 
           ) 
           :save 
           set /p x=保留号码至num.txt[y/n] 
           if /i [%x%]  [y] (echo !m:~1!>>num.txt && endlocal && goto :start) 
           else (endlocal && goto :start) 
           35x7.rar 
19.  
           保存为xx.cmd文档目录下运行，再次运行恢复 
           @echo off 
           setlocal  ENABLEDELAYEDEXPANSION 
           for /f "delims=" %%i in ('dir /s/b *.doc') do ( 
           set n=%%~ni 
           set r_name=%%~ni 
           set t_name 
           for /l %%a in (1,1,100) do ( 
           set n1=!n:~0,1! 
           set n=!n:~1! 
           set t_name=!n1!!t_name! 
           if "!n!"  "" ( 
           cd "%%~dpi" 
           ren  "!r_name!.doc" "!t_name!.doc" 2>nul>nul 
           ) 
           ) 
           ) 
           endlocal 
           xx.rar 
20. htm-----CMD  
           这是基础了。。。格式简单，构造起来较容易 
           cmd查查也方便 如:help dir 
           有人需要就造个htm手册玩玩 
           保存为cmd_help.cmd运行 
           @echo off 
           del net_cmd_help.htm 2>nul 
           echo. 
           echo......请稍候，构造htm文件中..... 
           echo. 
           >cmd_help.htm echo ^<head^> 
           >>cmd_help.htm echo ^<title^>Help for Net commands^</title^> 
           >>cmd_help.htm echo ^<meta http-equiv="Content-Type" 
           content="text/html^; charset=gb2312" ^/^> 
           >>cmd_help.htm echo ^</head^> 
           >>cmd_help.htm echo ^<A NAME="Top"^> 
           >>cmd_help.htm echo ^<center^> 
           >>cmd_help.htm echo ^<h1^>CMD 命令速查手册^</h1^> 
           >>cmd_help.htm echo Written by Hitme 
           >>cmd_help.htm echo ^</center^>