qasa's Blog ★08-04-04更新★ - 中国DOS联盟论坛

@echo %dbg% off
Setlocal EnableDelayedExpansion
...

　　%dbg%是一个变量，这是在命令行调试批处理程序设置的临时变量，那你预先在命令行运行set dbg=on，那么这里的echo %dbg% off就相当于echo on off，也就是打开命令行回显，这样就便于你检查程序的运行错误和运行过程，当你设置set dbg=时，执行批处理后，自然是关闭了命令的回显(echo off)，这样就不会在屏幕显示命令的回显了。
echo后面跟空格和一些特殊的符号，有时效果是一样的。还有很多，类似echo;!str! echo\!str! echo/!str! echo;!str! 等等。
每天收集点学到的一点小知识上来吧。以便以后方便参考

qasa原创收集区

全自动设置机号、IP工具(绝对实用)
经过半个月的摸索，终于编好了我的一大作品：
http://www.cn-dos.net/forum/viewthread.php?tid=26870&fpage=2

处理常见病毒批处理并自动打补丁
http://www.cn-dos.net/forum/viewthread.php?tid=27017&fpage=1

处理常见病毒批处理并自动免疫打补丁
http://www.cn-dos.net/forum/viewthread.php?tid=27041&fpage=1

全自动设置机号、IP、并安装冰点工具（网吧版）
http://www.cn-dos.net/forum/viewthread.php?tid=26870&fpage=4&highlight=&page=2

系统服务优化批处理，新年献给大家的贺礼！
http://www.cn-dos.net/forum/viewthread.php?tid=27631&fpage=1

自动改IP2.0版
http://www.cn-dos.net/forum/viewthread.php?tid=28621&fpage=1

全自动设置机号、IP工具3.0（完整版）
http://www.cn-dos.net/forum/viewthread.php?tid=32490

屏蔽病毒网站（实用）
http://www.cn-dos.net/forum/viewthread.php?tid=35690&fpage=1

屏蔽端口，很简单很好用
http://www.cn-dos.net/forum/viewthread.php?tid=39053&fpage=1

[ Last edited by qasa on 2008-4-4 at 11:50 PM ]

全自动设置机号、IP工具
ip.bat

set dbg=
@echo %dbg% off&setlocal enabledelayedexpansion
:: code by qasa copyright@qknet 2:16 2007-1-19
title 全自动设置机号、IP工具  作者:qasa
set no_=0
mode con cols=40 lines=10&color fc
for /f "tokens=12 delims= " %%i in ('ipconfig /all^|find /i "Physical Address"') do (
   set mac=%%i
   set mac=!mac:~0,-1!
   )
for /f "tokens=1-3 delims==|" %%j in (MAC.INI) do (
   set mac_=%%j
   set ip_=%%k
   set sm_=%%l
   if !mac! equ !mac_! (
      call :set_ !mac_! !ip_! !sm_!  
      set /a no_+=1
      )   
   )
if "!no_!"=="0" (
   echo.&echo MAC.ini中没有此机的MAC地址，将发送到工作机上......
       echo %date% %time%新发现的MAC地址：>>NewMAC.ini&echo !mac! >>NewMAC.ini
   echo.&echo 已经发送到工作机! ! !
   )
start shutdown -r -t 40
echo.
set/p zz_=         按Q键退出关机状态:
if /i !zz_! equ q (start shutdown -a)
ping/n 5 127.1>nul
exit /b

:set_
echo %1 %2 %3
set yy_=%3
echo.&echo 正在为%yy_:~1,3%号设置IP、机号...... 请稍候
for /f "tokens=1-4 delims==|" %%e in (DNS.ini) do (
    set dns1_=%%e
    set dns2_=%%f
    set workgate_=%%g
    set zwym_=%%h
    )
for /l %%w in (1,1,2) do (
  netsh interface IP Set Address "本地连接" Static %2 %zwym_% %workgate_% 1 >nul
  )
netsh interface IP Set Dns "本地连接" static %dns1_% >nul
netsh interface ip add dns "本地连接"  %dns2_% >nul
REG ADD HKLM\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters /v "Hostname"    /t REG_SZ /d %3 /f >nul
REG ADD HKLM\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters /v "NV Hostname" /t REG_SZ /d %3 /f >nul
echo.&echo                设置完毕
goto :eof

MAC.ini

00-0A-EB-21-A7-EC=192.168.0.5|-005
00-E0-4C-8F-11-4A=192.168.0.6|-006
00-0A-EB-A0-1D-9A=192.168.0.7|-007
00-40-05-14-E7-C9=192.168.0.8|-008
00-0A-EB-A0-1C-7A=192.168.0.9|-009
00-0D-87-F2-03-50=192.168.0.10|-010
00-0D-87-F2-A3-5C=192.168.0.11|-011

DNS.ini

202.96.128.86=202.96.128.186|192.168.0.1|255.255.255.0

[ Last edited by qasa on 2007-1-22 at 02:49 PM ]

DOS联盟精华

批处理室经典帖子分类索引
http://www.cn-dos.net/forum/viewthread.php?tid=27667

DOS联盟论坛解答室精华帖索引
http://www.cn-dos.net/forum/viewthread.php?tid=13226

[ Last edited by qasa on 2007-2-14 at 10:06 AM ]

右键新建批处理文件

@echo off
reg add HKLM\SOFTWARE\Classes\.bat\ShellNew /v "" /f >nul
reg add HKLM\SOFTWARE\Classes\.bat\ShellNew /v "NullFile" /f >nul
reg add HKLM\SOFTWARE\Classes\batfile /v "" /d TestBat /f >nul
reg add HKLM\SOFTWARE\Classes\batfile /v "EditFlags" /t REG_MULTI_SZ /d "30,04,00,00" /f >nul
echo 操作成功!&pause>nul&exit /b

我发觉上面的批处理可以用一句就可以了：

@reg add HKLM\SOFTWARE\Classes\.bat\ShellNew /v "NullFile" /f >nul&echo 操作成功!&pause>nul

或

@reg add HKCR\.bat\ShellNew /v "NullFile" /f >nul&echo 操作成功!&pause>nul

[ Last edited by qasa on 2007-1-21 at 06:32 PM ]

处理常见病毒并自动免疫打补丁批处理改进版

禁用病毒.bat

@set dbg=
@echo %dbg% off&&setlocal EnableDelayedExpansion
::code by qasa copyright@qknet 1:00 2007-1-23
mode con cols=45 lines=20&color c
set no_=0
set ko_=0
reg delete HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\DisallowRun /f >nul 2>nul
reg add HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v "DisallowRun" /t REG_DWORD /d 1 /f >nul 2>nul
echo 正在检查进程中是否有可疑文件运行......
for /f "delims=" %%e in (disable.ini) do (
    tasklist|find /i "%%e"&&echo 发现可疑进程 %%e
    taskkill /f /im %%e>nul 2>>nul&&echo 已经结束可疑进程 %%e
    )
echo.&echo 进程检查结束, 开始导入禁止运行表......
for /f "delims=" %%i in (disable.ini) do (
    if %%i neq setup.exe (reg add HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\DisallowRun /v !no_! /d %%i /f >nul)
    set /a no_+=1
    )
echo.&echo 有 !no_! 个怀疑病毒文件被列入禁止运行表。
echo.&echo 正在创建病毒免疫文件......
for /f "delims=" %%p in (logo.txt) do (
    if exist %%p (
         cacls %%p /e /t /p everyone:F >nul 2>nul
         attrib -r -s -h -a %%p >nul 2>nul
         del /q %%p >nul 2>nul
         rd /q %%p>nul
         )
    md %%p&attrib +s +r +h +a %%p >nul 2>nul
    cacls %%p /e /t /d everyone >nul 2>nul
    )
echo.&echo 正在安装系统安全补丁包......
for %%1 in (*.exe) do (
    %%1 /quiet /passive /norestart /nobackup
    set /a ko_+=1
    )
echo.&echo 共有 !ko_! 个补丁安装完毕。
ping/n 5 127.1>nul
exit/b

disable.ini

Netrobocop.exe
cnnetcut151.exe
netcut.exe
wnad.exe
bind_40235.exe
gamesetup.exe
FuckJacks.exe
spoclsv.exe
qq2007.exe
intren0t.exe
devgt.exe
iexpl0re.exe
svohost.exe
svhost32.exe
setup.exe
svchqst.exe
llssrv.exe
qdoxjq.exe
iedw.exe
res.exe
SVCH0ST.exe
0Sy.exe
1.com
1Sy.exe
2Sy.exe
3Sy.exe
5Sy.exe
6Sy.exe
EXP10RER.com
finders.com
kill.exe
Logo1_.exe
rundl132.exe
7Sy.exe
8Sy.exe
9Sy.exe
exerouter.exe
4Sy.exe
ePower.exe
nvsc.exe
finder.com
pagefile.com
rose.exe
sxs.exe
sys1.exe
DebugProgramme.exe
iexplore.com
Exeroud.exe
a.exe
Mbbmanager.exe
Mdm.exe
Aboutagirl.exe
Microsoft.exe
Absr.exe
Aplica32.exe
Mprdll.exe
Avconsol.exe
Msabel32.exe
Avp.exe
Msblast.exe
Avp32.exe
Mschv.exe
Avpcc.exe
Msgsrv36.exe
Avpm.exe
Msgsvc.exe
Avserve.exe
Msgsvr16.exe
Bbeagle.exe
Msie5.exe
Brainspy.exe
Msstart.exe
Cfiadmin.exe
Mstesk.exe
Cfiaudit.exe
Netip.exe
Cfinet32.exe
Netspy.exe
Checkdll.exe
Notpa.exe
Cmctl32.exe
Odbc.exe
Pcfwallicon.exe
Diagcfg.exe
Pcx.exe
Dkbdll.exe
Pw32.exe
Dllclient.exe
Dvldr32.exe
Regscan.exe
Esafe.exe
Expiorer.exe
Thing.exe
Feweb.exe
Flcss.exe
Vp32.exe
Frw.exe
Vpcc.exe
Icload95.exe
Vpm.exe
Icloadnt.exe
Vsecomr.exe
Icmon.exe
Icsupp95.exe
Rpcsrv.exe
Sockets.exe
Rundll.exe
Something.exe
Spfw.exe
Runouce.exe
Scanrew.exe
Sysedit32.exe
Intel.exe
Syshelp.exe
Internet.exe
Sysprot.exe
Internet.exe
Sysrunt.exe
Kernel16.exe
Kernel32.exe
System32.exe
Kiss.exe
Krn132.exe
Syswindow.exe
Libupdate.exe
Task_Bar.exe
Load.exe
Lockdown2000.exe
Taskmon.exe
Tds2-98.exe
Tds2-Nt.exe
Tempinetb00st.exe
Tempserver.exe
Vshwin32.exe
Vsstart.exe
Vw32.exe
Windown.exe
Windows.exe
Winfunctions.exe
Wingate.exe
Winl0g0n.exe
Winmgm32.exe
Winmsg32.exe
Winprot.exe
Winprotecte.exe
Winrpc.exe
Winrpcsrv.exe
Winserv.exe
Wubsys.exe
Winupdate.exe
Winver.exe
Wqk.exe
Wscan.exe
Xx.Tmp.exe
Zcn32.exe
Zonealarm.exe

logo.txt

C:\WINDOWS\0Sy.exe
C:\WINDOWS\1.com
C:\WINDOWS\1Sy.exe
C:\WINDOWS\2Sy.exe
C:\WINDOWS\3Sy.exe
C:\WINDOWS\5Sy.exe
C:\WINDOWS\6Sy.exe
C:\WINDOWS\EXP10RER.com
C:\WINDOWS\finders.com
C:\WINDOWS\kill.exe
C:\WINDOWS\Logo1_.exe
C:\WINDOWS\rundl132.exe
C:\WINDOWS\Shell.sys
C:\WINDOWS\smss.exe
C:\WINDOWS\smss.exe
C:\WINDOWS\sws.dll
C:\WINDOWS\sws32.dll
C:\WINDOWS\tool.exe
C:\WINDOWS\tool2005.exe
C:\WINDOWS\tool2006.exe
C:\WINDOWS\tools.exe
C:\WINDOWS\vDll.dll
C:\WINDOWS\7Sy.exe
C:\WINDOWS\8Sy.exe
C:\WINDOWS\9Sy.exe
C:\WINDOWS\exerouter.exe
C:\WINDOWS\4Sy.exe
C:\WINDOWS\system32\Logo1_.exe
c:\windows\system32\ePower.exe
c:\windows\system32\dllhost.dll
c:\windows\system32\nvsc.exe
c:\WINDOWS\finder.com
D:\pagefile.com
D:\autorun.inf
D:\rose.exe
D:\sxs.exe
D:\xcopy.exe
D:\setup.exe
D:\go.exe
D:\update.exe
E:\pagefile.com
E:\autorun.inf
E:\rose.exe
E:\sxs.exe
E:\xcopy.exe
E:\setup.exe
E:\go.exe
E:\update.exe
C:\Progra~1\Intern~1\sys1.exe
C:\WINDOWS\Debug\DebugProgramme.exe
C:\Progra~1\Common~1\iexplore.com
C:\WINDOWS\Exeroud.exe
C:\Windows\system32\a.exe
C:\WINDOWS\System32\Drivers\spoclsv.exe
C:\WINDOWS\System32\Drivers\nvscv32.exe
C:\WINDOWS\MY.exe
C:\WINDOWS\iexpl0re.exe
C:\WINDOWS\System32\spoclsv.exe
C:\windows\winlogon.exe
C:\Windows\intren0t.exe
C:\Windows\system32\res.exe
C:\Windows\system32\winsocks.dll
C:\WINDOWS\system32\FuckJacks.exe
C:\WINDOWS\system32\SVCH0ST.exe

删除免疫文件.bat

@echo off
echo.&echo 正在删除病毒免疫文件......
for /f "delims=" %%p in (logo.txt) do (
    if exist %%p (
         cacls %%p /e /t /p everyone:F >nul 2>nul
         attrib -r -s -h -a %%p >nul 2>nul
         del /q %%p >nul 2>nul
         rd /q %%p>nul
         )
    )

服务优化.bat

@ECHO %dbg% OFF
::Code by qasa Copyright@qknet 11:36 2007-2-11
::E-mail:qknet@21cn.com
title 自动设置优化服务    作者:qasa
if "%1"=="/?" (
   echo.&echo 请在新建Server.ini加入你要设置的服务，格式如下：
   echo ^<服务名^>^|^<1^|2^|3^>^|^<注释^>
   echo 1 为自动；2 为手动；3为已禁用
   echo.&echo Eg:&echo      w32time^|3 
   echo.&echo 上面的意思是Windows Time服务已设置禁用。
   echo 注释可不填。
   goto :eof
   )
mode con cols=60 lines=15&color c
if not exist server.ini (
   echo 你还没有服务配置文件-- Server.ini，请检查! ! !
   echo.&echo 请在Server.ini加入你要设置的服务，格式如下：
   echo ^<服务名^>^|^<1^|2^|3^>^|^<注释^>
   echo 1 为自动；2 为手动；3为已禁用
   echo.&echo Eg:&echo      w32time^|3 
   echo.&echo 上面的意思是Windows Time服务已设置禁用。
   echo 注释可不填。
   pause>nul
   cd.>Server.ini
   goto :eof
   )
echo                 请稍候，正在为你设置服务......
for /f "tokens=1,2 delims=|" %%i in (server.ini) do (
    if %%j equ 3 sc config %%i start= disabled >nul 2>nul
    if %%j equ 2 sc config %%i start= demand >nul 2>nul
    if %%j equ 1 sc config %%i start= auto >nul 2>nul
    )
echo.&echo.&echo.&echo.
echo                 *****************************
echo                 **    服务设置完毕! ! !    **
echo                 *****************************
echo.&set/p a=                建议重启生效! ! !按 R 键重启:
if /i %a% equ r shutdown -r -t 0
exit /b

Server.ini

AeLookupSvc|1
Alerter|3
ALG|3
AppMgmt|2
AudioSrv|1
BITS|3
Browser|3
CiSvc|3
ClipSrv|3
COMSysApp|2
CryptSvc|2
DcomLaunch|1
Dfs|2
Dhcp|2
dmadmin|2
dmserver|1
Dnscache|2
ERSvc|3
Eventlog|1
EventSystem|2
helpsvc|3
HidServ|3
HTTPFilter|2
ImapiService|3
IsmServ|3
kdc|3
lanmanserver|3
lanmanworkstation|1
LicenseService|3
LmHosts|3
Messenger|3
mnmsrvc|3
MSDTC|3
MSIServer|2
NetDDE|3
NetDDEdsdm|3
Netlogon|3
Netman|2
Nla|3
NtFrs|2
NtLmSsp|3
NtmsSvc|2
ose|2
PlugPlay|1
PolicyAgent|1
ProtectedStorage|1
RasAuto|2
RasMan|2
RDSessMgr|3
remoteAccess|3
remoteRegistry|3
RpcLocator|3
RpcSs|1
RSoPProv|2
sacsvr|3
SamSs|1
SCardSvr|3
Schedule|1
seclogon|1
SENS|1
SharedAccess|2
ShellHWDetection|1
Spooler|3
stisvc|2
swprv|3
SysmonLog|3
TapiSrv|2
TermService|1
Themes|3
TrkSvr|3
TrkWks|3
Tssdis|3
UMWdf|2
UPS|3
vds|2
VSS|3
W32Time|3
WebClient|1
WinHttpAutoProxySvc|2
winmgmt|1
WmdmPmSN|3
Wmi|2
WmiApSrv|3
WZCSVC|3
xmlprov|2

Originally posted by qasa at 2007-1-20 16:35:
DOS联盟精华

批处理室经典帖子分类索引
http://www.cn-dos.net/forum/viewthread.php?tid=27617

　　由于我操作失误，这个帖子已经不存在了，请修改链接为http://www.cn-dos.net/forum/viewthread.php?tid=27667

Originally posted by namejm at 2007-2-13 07:36:

　　由于我操作失误，这个帖子已经不存在了，请修改链接为http://www.cn-dos.net/forum/viewthread.php?tid=27667

感谢namejm 版主的尽职尽责之心，日理万机之时还插空做这锁事。

已转第二页......

[ Last edited by qasa on 2007-3-30 at 11:05 PM ]

自动改IP2.0

@echo %dbg% off&setlocal enabledelayedexpansion
:: code by qasa copyright@qknet 2:16 2007-3-17
title 自动改IP(自设重启次数)   作者:钟其栋
mode con cols=50 lines=10&color a
if not exist 次数.txt goto st_
if exist c:\ip\key.txt goto OK
if not exist 设置.txt goto do_
set /p sum_=<次数.txt
for /l %%i in (!sum_!,-1,1) do (
   if exist c:\ip\off%%i.txt goto end
   )
exit /b

:st_
del /q c:\ip\*.txt >nul 2>nul
set /p sum_=你准备重启电脑多少次后安装冰点(建议设2次以上)?
echo %sum_% >次数.txt
cd %USERPROFILE%\「开始」菜单\程序\启动\
copy c:\ip\ippp.lnk . >nul 2>nul
cd c:\ip\
echo.&echo 请重启进行系统备份! ! !
ping/n 7 127.1>nul
goto :eof

:do_
setlocal enabledelayedexpansion
set no_=0
cd.>设置.txt
for /f "tokens=12 delims= " %%i in ('ipconfig /all^|find /i "Physical Address"') do (
   set mac=%%i
   set mac=!mac:~0,-1!
   )
for /f "tokens=1-3 delims==|" %%j in (MAC.INI) do (
   set mac_=%%j
   set ip_=%%k
   set sm_=%%l
   if !mac! equ !mac_! (
      call :set_ !mac_! !ip_! !sm_!  
      set /a no_+=1
      )   
   )
if "!no_!"=="0" (
   echo.&echo MAC.ini中没有此机的MAC地址，将发送到工作机上......
   echo %date% %time%新发现的MAC地址：>>NewMAC.ini&echo !mac! >>NewMAC.ini
   echo %date% %time%新发现的MAC地址：>>\\游戏主机\full$\NewMAC.ini&echo !mac! >>\\游戏主机\full$\NewMAC.ini
   echo.&echo 已经发送到工作机! ! !
   del /q c:\ip\次数.txt
   )
goto :eof

:set_
set /p w=<次数.txt
if %w% equ 1 cd.>c:\ip\key.txt&&start shutdown -r -t 90 -c 现在是第1次重启_最后一次重启_下次将安装冰点。作者:qasa
if %w% neq 1 start shutdown -r -t 90 -c 现在是第1次重启。
cd.>c:\ip\off2.txt
echo %1 %2 %3
set yy_=%3
echo.&echo 正在为%yy_:~1,3%号设置IP、机号...... 请稍候
for /f "tokens=1-4 delims==|" %%e in (DNS.ini) do (
    set dns1_=%%e
    set dns2_=%%f
    set workgate_=%%g
    set zwym_=%%h
    )
for /f  "tokens=1 delims=" %%s in ('ipconfig /all^|find /i "Ethernet adapter"') do (set ss_=%%s)
set ss_=%ss_:~17,-2%
for /l %%w in (1,1,2) do (
  netsh interface IP Set Address "%ss_%" Static %2 %zwym_% %workgate_% 1 >nul
  )
netsh interface IP Set Dns "%ss_%" static %dns1_% >nul
netsh interface ip add dns "%ss_%"  %dns2_% >nul
REG ADD HKLM\SYSTEM\CurrentControlSet\Control\ComputerName\ActiveComputerName /v "ComputerName" /t REG_SZ /d %3 /f >nul 2>NUL
REG ADD HKLM\SYSTEM\CurrentControlSet\Control\ComputerName\ComputerName /v "ComputerName" /t REG_SZ /d %3 /f >nul 2>NUL
REG ADD HKLM\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters /v "Hostname"    /t REG_SZ /d %3 /f >nul 2>NUL
REG ADD HKLM\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters /v "NV Hostname" /t REG_SZ /d %3 /f >nul 2>NUL
echo.&echo                设置完毕
goto :eof

:end
setlocal EnableDelayedExpansion
set /p summ_=<次数.txt
set /p ss=<次数.txt
set /a sss=ss
for /l %%i in (!summ_!,-1,1) do (
   if exist c:\ip\off%%i.txt (
      set /a a=%%i
      if exist c:\ip\off!sss!.txt (
         start shutdown -r -t 60 -c 现在是第!a!次重启_最后一次重启_下次将安装冰点。作者:qasa
         cd.>c:\ip\key.txt
         goto :eof
         )
      start shutdown -r -t 60 -c 现在是第!a!次重启。
      set/a b=a+1
      cd.>c:\ip\off!b!.txt
      goto :eof
      )
   )
goto :eof

:OK
cd %USERPROFILE%\「开始」菜单\程序\启动\
del /q ippp.lnk
cd c:\ip\
del /q c:\ip\*.txt
start "" df /install
goto :eof

[ Last edited by qasa on 2007-3-18 at 01:22 AM ]

第1楼　qasa	发表于 2007-01-17 05:07
高级用户　发帖 311　积分 959　来自广东-LianJiang
qasa's Blog [学习网志] ★08-04-04更新★ 好地方，我也来占个位置，有时间再留下我的网事吧。:P 对DOS联盟中的精华收集: Win2000/XP中的命令行 http://www.cn-dos.net/forum/viewthread.php?tid=20682&fpage=1 手把手教你写批处理 http://www.cn-dos.net/forum/viewthread.php?tid=13456 dos 6.22 帮助资料（中文版)电子书 http://www.cn-dos.net/forum/viewthread.php?tid=17171 批处理命令返回的Errorlevel信息（用于Windows 95/98/ME） http://www.cn-dos.net/forum/viewthread.php?tid=16194 如何获取DOS环境中的ERRORLEVEL值 http://www.cn-dos.net/forum/viewthread.php?tid=9358 如何设置DOS环境中的ERRORLEVEL值 http://www.cn-dos.net/forum/viewthread.php?tid=9444 批处理编程的异类 http://www.cn-dos.net/forum/viewthread.php?tid=8905 批处理编程的异类 http://www.cn-dos.net/forum/viewthread.php?tid=12388 findstr的命令行分析机制 http://www.cn-dos.net/forum/viewthread.php?tid=21167&fpage=80 setlocal EnableDelayedExpansion 与 "!" http://www.cn-dos.net/forum/viewthread.php?tid=21175&fpage=79 echo 语句的问题 http://www.cn-dos.net/forum/viewthread.php?tid=16985&fpage=78 批处理文件应用技巧 http://www.cn-dos.net/forum/viewthread.php?tid=104&fpage=75 中国DOS联盟知识分享编写页面 http://www.cn-dos.net/mediawiki/index.php?title=%E9%A6%96%E9%A1%B5#CMD_Wiki DOS下的文本遍历和文件遍历代码 http://www.cn-dos.net/forum/viewthread.php?tid=9588&fpage=73 一般的符号的作用 http://www.cn-dos.net/forum/viewthread.php?tid=20558&fpage=4 SET变量、延时变量、各种符号的用法 http://www.cn-dos.net/forum/viewthread.php?tid=24549&fpage=2 无奈何签名代码略析 http://www.cn-dos.net/forum/viewthread.php?tid=27430&fpage=3 命令行下网页转文本的超强工具 http://www.cn-dos.net/forum/viewthread.php?tid=25122# DOS联盟论坛收贴小虫 http://www.cn-dos.net/forum/viewthread.php?tid=25130&fpage=1 实数加减运算脚本! http://www.cn-dos.net/forum/viewthread.php?tid=23611&fpage=2 用脚本模拟黑客帝国数码雨 http://www.cn-dos.net/forum/viewthread.php?tid=24418&fpage=5 非编译型批处理加密方案与代码 http://www.cn-dos.net/forum/viewthread.php?tid=22254&fpage=6 批处理感情进度条 http://www.cn-dos.net/forum/viewthread.php?tid=25345&fpage=6&highlight=&page=1 生成《CMD命令速查手册》的批处理 http://www.cn-dos.net/forum/viewthread.php?tid=18321&fpage=8 批处理密盘的源码 http://www.cn-dos.net/forum/viewthread.php?tid=24983&fpage=15### sed 文章收集 http://www.cn-dos.net/forum/viewthread.php?tid=24210&fpage=17 批处理实现屏幕截图 http://www.cn-dos.net/forum/viewthread.php?tid=26547&fpage=18 一个关于随机获取文件名的问题 http://www.cn-dos.net/forum/viewthread.php?tid=22128&fpage=18 求一列数所有不同组合的和 http://www.cn-dos.net/forum/viewthread.php?tid=26180&fpage=18 什么情况下该使用变量延迟 http://www.cn-dos.net/forum/viewthread.php?tid=20733&fpage=18 如何显示磁盘的剩余空间 http://www.cn-dos.net/forum/viewthread.php?tid=19738&fpage=25 网页文章下载整理之——体验 VIM 篇 http://www.cn-dos.net/forum/viewthread.php?tid=24958&fpage=27 FOR的命令行分析机制 http://www.cn-dos.net/forum/viewthread.php?tid=21432&fpage=28 CMD批处理获取文件的ASCII码 http://www.cn-dos.net/forum/viewthread.php?tid=26521&fpage=28 批处理字符出现次数统计 http://www.cn-dos.net/forum/viewthread.php?tid=25182&fpage=33 CMD怎么修改文件创建时间 http://www.cn-dos.net/forum/viewthread.php?tid=25508&fpage=51 CMD下初探System Volume Information文件夹(Windows XP Pro sp2) http://www.cn-dos.net/forum/viewthread.php?tid=25450&fpage=52 在批处理里禁用本地连接网卡后再重新启用连 http://www.cn-dos.net/forum/viewthread.php?tid=21951&fpage=52 文件备份器 http://www.cn-dos.net/forum/viewthread.php?tid=20747&fpage=58 如何用固定长度显示长度不一致的字符 http://www.cn-dos.net/forum/viewthread.php?tid=20734 长文件名如何应用于批处理文件中 http://www.cn-dos.net/forum/viewthread.php?tid=19223 如何检测文件名带空格的文件夹是否存在 http://www.cn-dos.net/forum/viewthread.php?tid=19836 怎样复制指定内容到指定文件里去 http://www.cn-dos.net/forum/viewthread.php?tid=19855 批处理怎么判断输入是数字还是字母 http://www.cn-dos.net/forum/viewthread.php?tid=25030&fpage=58 文件的文字与字母替换问题 http://www.cn-dos.net/forum/viewthread.php?tid=23815&fpage=59&highlight=&page=2 ［共同参与］［挑战思路］［批处理：轻松译单词］ http://www.cn-dos.net/forum/viewthread.php?tid=23683 如何在纯DOS下让程序执行的结果输入做变量 http://www.cn-dos.net/forum/viewthread.php?tid=28000&pid=177300&page=1#pid177300 九九乘法表 http://www.cn-dos.net/forum/viewthread.php?tid=26038&fpage=1 批处理代码发帖着色脚本 Batch2ubb（CMD & GAWK） http://www.cn-dos.net/forum/viewthread.php?tid=21664&fpage=1 关于“硬盘杀手”批处理的讨论 http://www.cn-dos.net/forum/viewthread.php?tid=12892&fpage=1&highlight=&page=1 下接十八楼...... （请点） [ Last edited by qasa on 2008-4-4 at 11:51 PM ]

第2楼　qasa	发表于 2007-01-19 06:38
高级用户　发帖 311　积分 959　来自广东-LianJiang
@echo %dbg% off Setlocal EnableDelayedExpansion ... 　　%dbg%是一个变量，这是在命令行调试批处理程序设置的临时变量，那你预先在命令行运行set dbg=on，那么这里的echo %dbg% off就相当于echo on off，也就是打开命令行回显，这样就便于你检查程序的运行错误和运行过程，当你设置set dbg=时，执行批处理后，自然是关闭了命令的回显(echo off)，这样就不会在屏幕显示命令的回显了。 echo后面跟空格和一些特殊的符号，有时效果是一样的。还有很多，类似echo;!str! echo\!str! echo/!str! echo;!str! 等等。每天收集点学到的一点小知识上来吧。以便以后方便参考

第3楼　qasa	发表于 2007-01-20 06:36
高级用户　发帖 311　积分 959　来自广东-LianJiang
qasa原创收集区全自动设置机号、IP工具(绝对实用) 经过半个月的摸索，终于编好了我的一大作品： http://www.cn-dos.net/forum/viewthread.php?tid=26870&fpage=2 处理常见病毒批处理并自动打补丁 http://www.cn-dos.net/forum/viewthread.php?tid=27017&fpage=1 处理常见病毒批处理并自动免疫打补丁 http://www.cn-dos.net/forum/viewthread.php?tid=27041&fpage=1 全自动设置机号、IP、并安装冰点工具（网吧版） http://www.cn-dos.net/forum/viewthread.php?tid=26870&fpage=4&highlight=&page=2 系统服务优化批处理，新年献给大家的贺礼！ http://www.cn-dos.net/forum/viewthread.php?tid=27631&fpage=1 自动改IP2.0版 http://www.cn-dos.net/forum/viewthread.php?tid=28621&fpage=1 全自动设置机号、IP工具3.0（完整版） http://www.cn-dos.net/forum/viewthread.php?tid=32490 屏蔽病毒网站（实用） http://www.cn-dos.net/forum/viewthread.php?tid=35690&fpage=1 屏蔽端口，很简单很好用 http://www.cn-dos.net/forum/viewthread.php?tid=39053&fpage=1 [ Last edited by qasa on 2008-4-4 at 11:50 PM ]

第4楼　qasa	发表于 2007-01-20 11:10
高级用户　发帖 311　积分 959　来自广东-LianJiang
全自动设置机号、IP工具 ip.bat set dbg= @echo %dbg% off&setlocal enabledelayedexpansion :: code by qasa copyright@qknet 2:16 2007-1-19 title 全自动设置机号、IP工具作者:qasa set no_=0 mode con cols=40 lines=10&color fc for /f "tokens=12 delims= " %%i in ('ipconfig /all^\|find /i "Physical Address"') do ( set mac=%%i set mac=!mac:~0,-1! ) for /f "tokens=1-3 delims==\|" %%j in (MAC.INI) do ( set mac_=%%j set ip_=%%k set sm_=%%l if !mac! equ !mac_! ( call :set_ !mac_! !ip_! !sm_! set /a no_+=1 ) ) if "!no_!"=="0" ( echo.&echo MAC.ini中没有此机的MAC地址，将发送到工作机上...... echo %date% %time%新发现的MAC地址：>>NewMAC.ini&echo !mac! >>NewMAC.ini echo.&echo 已经发送到工作机! ! ! ) start shutdown -r -t 40 echo. set/p zz_= 按Q键退出关机状态: if /i !zz_! equ q (start shutdown -a) ping/n 5 127.1>nul exit /b :set_ echo %1 %2 %3 set yy_=%3 echo.&echo 正在为%yy_:~1,3%号设置IP、机号...... 请稍候 for /f "tokens=1-4 delims==\|" %%e in (DNS.ini) do ( set dns1_=%%e set dns2_=%%f set workgate_=%%g set zwym_=%%h ) for /l %%w in (1,1,2) do ( netsh interface IP Set Address "本地连接" Static %2 %zwym_% %workgate_% 1 >nul ) netsh interface IP Set Dns "本地连接" static %dns1_% >nul netsh interface ip add dns "本地连接" %dns2_% >nul REG ADD HKLM\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters /v "Hostname" /t REG_SZ /d %3 /f >nul REG ADD HKLM\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters /v "NV Hostname" /t REG_SZ /d %3 /f >nul echo.&echo 设置完毕 goto :eof MAC.ini 00-0A-EB-21-A7-EC=192.168.0.5\|-005 00-E0-4C-8F-11-4A=192.168.0.6\|-006 00-0A-EB-A0-1D-9A=192.168.0.7\|-007 00-40-05-14-E7-C9=192.168.0.8\|-008 00-0A-EB-A0-1C-7A=192.168.0.9\|-009 00-0D-87-F2-03-50=192.168.0.10\|-010 00-0D-87-F2-A3-5C=192.168.0.11\|-011 DNS.ini 202.96.128.86=202.96.128.186\|192.168.0.1\|255.255.255.0 [ Last edited by qasa on 2007-1-22 at 02:49 PM ]

第5楼　qasa	发表于 2007-01-21 05:35
高级用户　发帖 311　积分 959　来自广东-LianJiang
DOS联盟精华批处理室经典帖子分类索引 http://www.cn-dos.net/forum/viewthread.php?tid=27667 DOS联盟论坛解答室精华帖索引 http://www.cn-dos.net/forum/viewthread.php?tid=13226 [ Last edited by qasa on 2007-2-14 at 10:06 AM ]

第6楼　qasa	发表于 2007-01-21 10:27
高级用户　发帖 311　积分 959　来自广东-LianJiang
右键新建批处理文件 @echo off reg add HKLM\SOFTWARE\Classes\.bat\ShellNew /v "" /f >nul reg add HKLM\SOFTWARE\Classes\.bat\ShellNew /v "NullFile" /f >nul reg add HKLM\SOFTWARE\Classes\batfile /v "" /d TestBat /f >nul reg add HKLM\SOFTWARE\Classes\batfile /v "EditFlags" /t REG_MULTI_SZ /d "30,04,00,00" /f >nul echo 操作成功!&pause>nul&exit /b

第7楼　qasa	发表于 2007-01-21 18:29
高级用户　发帖 311　积分 959　来自广东-LianJiang
我发觉上面的批处理可以用一句就可以了： @reg add HKLM\SOFTWARE\Classes\.bat\ShellNew /v "NullFile" /f >nul&echo 操作成功!&pause>nul 或 @reg add HKCR\.bat\ShellNew /v "NullFile" /f >nul&echo 操作成功!&pause>nul [ Last edited by qasa on 2007-1-21 at 06:32 PM ]

第8楼　qasa	发表于 2007-01-24 10:16
高级用户　发帖 311　积分 959　来自广东-LianJiang
处理常见病毒并自动免疫打补丁批处理改进版禁用病毒.bat @set dbg= @echo %dbg% off&&setlocal EnableDelayedExpansion ::code by qasa copyright@qknet 1:00 2007-1-23 mode con cols=45 lines=20&color c set no_=0 set ko_=0 reg delete HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\DisallowRun /f >nul 2>nul reg add HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v "DisallowRun" /t REG_DWORD /d 1 /f >nul 2>nul echo 正在检查进程中是否有可疑文件运行...... for /f "delims=" %%e in (disable.ini) do ( tasklist\|find /i "%%e"&&echo 发现可疑进程 %%e taskkill /f /im %%e>nul 2>>nul&&echo 已经结束可疑进程 %%e ) echo.&echo 进程检查结束, 开始导入禁止运行表...... for /f "delims=" %%i in (disable.ini) do ( if %%i neq setup.exe (reg add HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\DisallowRun /v !no_! /d %%i /f >nul) set /a no_+=1 ) echo.&echo 有 !no_! 个怀疑病毒文件被列入禁止运行表。 echo.&echo 正在创建病毒免疫文件...... for /f "delims=" %%p in (logo.txt) do ( if exist %%p ( cacls %%p /e /t /p everyone:F >nul 2>nul attrib -r -s -h -a %%p >nul 2>nul del /q %%p >nul 2>nul rd /q %%p>nul ) md %%p&attrib +s +r +h +a %%p >nul 2>nul cacls %%p /e /t /d everyone >nul 2>nul ) echo.&echo 正在安装系统安全补丁包...... for %%1 in (*.exe) do ( %%1 /quiet /passive /norestart /nobackup set /a ko_+=1 ) echo.&echo 共有 !ko_! 个补丁安装完毕。 ping/n 5 127.1>nul exit/b disable.ini Netrobocop.exe cnnetcut151.exe netcut.exe wnad.exe bind_40235.exe gamesetup.exe FuckJacks.exe spoclsv.exe qq2007.exe intren0t.exe devgt.exe iexpl0re.exe svohost.exe svhost32.exe setup.exe svchqst.exe llssrv.exe qdoxjq.exe iedw.exe res.exe SVCH0ST.exe 0Sy.exe 1.com 1Sy.exe 2Sy.exe 3Sy.exe 5Sy.exe 6Sy.exe EXP10RER.com finders.com kill.exe Logo1_.exe rundl132.exe 7Sy.exe 8Sy.exe 9Sy.exe exerouter.exe 4Sy.exe ePower.exe nvsc.exe finder.com pagefile.com rose.exe sxs.exe sys1.exe DebugProgramme.exe iexplore.com Exeroud.exe a.exe Mbbmanager.exe Mdm.exe Aboutagirl.exe Microsoft.exe Absr.exe Aplica32.exe Mprdll.exe Avconsol.exe Msabel32.exe Avp.exe Msblast.exe Avp32.exe Mschv.exe Avpcc.exe Msgsrv36.exe Avpm.exe Msgsvc.exe Avserve.exe Msgsvr16.exe Bbeagle.exe Msie5.exe Brainspy.exe Msstart.exe Cfiadmin.exe Mstesk.exe Cfiaudit.exe Netip.exe Cfinet32.exe Netspy.exe Checkdll.exe Notpa.exe Cmctl32.exe Odbc.exe Pcfwallicon.exe Diagcfg.exe Pcx.exe Dkbdll.exe Pw32.exe Dllclient.exe Dvldr32.exe Regscan.exe Esafe.exe Expiorer.exe Thing.exe Feweb.exe Flcss.exe Vp32.exe Frw.exe Vpcc.exe Icload95.exe Vpm.exe Icloadnt.exe Vsecomr.exe Icmon.exe Icsupp95.exe Rpcsrv.exe Sockets.exe Rundll.exe Something.exe Spfw.exe Runouce.exe Scanrew.exe Sysedit32.exe Intel.exe Syshelp.exe Internet.exe Sysprot.exe Internet.exe Sysrunt.exe Kernel16.exe Kernel32.exe System32.exe Kiss.exe Krn132.exe Syswindow.exe Libupdate.exe Task_Bar.exe Load.exe Lockdown2000.exe Taskmon.exe Tds2-98.exe Tds2-Nt.exe Tempinetb00st.exe Tempserver.exe Vshwin32.exe Vsstart.exe Vw32.exe Windown.exe Windows.exe Winfunctions.exe Wingate.exe Winl0g0n.exe Winmgm32.exe Winmsg32.exe Winprot.exe Winprotecte.exe Winrpc.exe Winrpcsrv.exe Winserv.exe Wubsys.exe Winupdate.exe Winver.exe Wqk.exe Wscan.exe Xx.Tmp.exe Zcn32.exe Zonealarm.exe logo.txt C:\WINDOWS\0Sy.exe C:\WINDOWS\1.com C:\WINDOWS\1Sy.exe C:\WINDOWS\2Sy.exe C:\WINDOWS\3Sy.exe C:\WINDOWS\5Sy.exe C:\WINDOWS\6Sy.exe C:\WINDOWS\EXP10RER.com C:\WINDOWS\finders.com C:\WINDOWS\kill.exe C:\WINDOWS\Logo1_.exe C:\WINDOWS\rundl132.exe C:\WINDOWS\Shell.sys C:\WINDOWS\smss.exe C:\WINDOWS\smss.exe C:\WINDOWS\sws.dll C:\WINDOWS\sws32.dll C:\WINDOWS\tool.exe C:\WINDOWS\tool2005.exe C:\WINDOWS\tool2006.exe C:\WINDOWS\tools.exe C:\WINDOWS\vDll.dll C:\WINDOWS\7Sy.exe C:\WINDOWS\8Sy.exe C:\WINDOWS\9Sy.exe C:\WINDOWS\exerouter.exe C:\WINDOWS\4Sy.exe C:\WINDOWS\system32\Logo1_.exe c:\windows\system32\ePower.exe c:\windows\system32\dllhost.dll c:\windows\system32\nvsc.exe c:\WINDOWS\finder.com D:\pagefile.com D:\autorun.inf D:\rose.exe D:\sxs.exe D:\xcopy.exe D:\setup.exe D:\go.exe D:\update.exe E:\pagefile.com E:\autorun.inf E:\rose.exe E:\sxs.exe E:\xcopy.exe E:\setup.exe E:\go.exe E:\update.exe C:\Progra~1\Intern~1\sys1.exe C:\WINDOWS\Debug\DebugProgramme.exe C:\Progra~1\Common~1\iexplore.com C:\WINDOWS\Exeroud.exe C:\Windows\system32\a.exe C:\WINDOWS\System32\Drivers\spoclsv.exe C:\WINDOWS\System32\Drivers\nvscv32.exe C:\WINDOWS\MY.exe C:\WINDOWS\iexpl0re.exe C:\WINDOWS\System32\spoclsv.exe C:\windows\winlogon.exe C:\Windows\intren0t.exe C:\Windows\system32\res.exe C:\Windows\system32\winsocks.dll C:\WINDOWS\system32\FuckJacks.exe C:\WINDOWS\system32\SVCH0ST.exe 删除免疫文件.bat @echo off echo.&echo 正在删除病毒免疫文件...... for /f "delims=" %%p in (logo.txt) do ( if exist %%p ( cacls %%p /e /t /p everyone:F >nul 2>nul attrib -r -s -h -a %%p >nul 2>nul del /q %%p >nul 2>nul rd /q %%p>nul ) )

第9楼　qasa	发表于 2007-02-12 06:56
高级用户　发帖 311　积分 959　来自广东-LianJiang
服务优化.bat @ECHO %dbg% OFF ::Code by qasa Copyright@qknet 11:36 2007-2-11 ::E-mail:qknet@21cn.com title 自动设置优化服务作者:qasa if "%1"=="/?" ( echo.&echo 请在新建Server.ini加入你要设置的服务，格式如下： echo ^<服务名^>^\|^<1^\|2^\|3^>^\|^<注释^> echo 1 为自动；2 为手动；3为已禁用 echo.&echo Eg:&echo w32time^\|3 echo.&echo 上面的意思是Windows Time服务已设置禁用。 echo 注释可不填。 goto :eof ) mode con cols=60 lines=15&color c if not exist server.ini ( echo 你还没有服务配置文件-- Server.ini，请检查! ! ! echo.&echo 请在Server.ini加入你要设置的服务，格式如下： echo ^<服务名^>^\|^<1^\|2^\|3^>^\|^<注释^> echo 1 为自动；2 为手动；3为已禁用 echo.&echo Eg:&echo w32time^\|3 echo.&echo 上面的意思是Windows Time服务已设置禁用。 echo 注释可不填。 pause>nul cd.>Server.ini goto :eof ) echo 请稍候，正在为你设置服务...... for /f "tokens=1,2 delims=\|" %%i in (server.ini) do ( if %%j equ 3 sc config %%i start= disabled >nul 2>nul if %%j equ 2 sc config %%i start= demand >nul 2>nul if %%j equ 1 sc config %%i start= auto >nul 2>nul ) echo.&echo.&echo.&echo. echo *************************** echo 服务设置完毕! ! ! echo *************************** echo.&set/p a= 建议重启生效! ! !按 R 键重启: if /i %a% equ r shutdown -r -t 0 exit /b Server.ini AeLookupSvc\|1 Alerter\|3 ALG\|3 AppMgmt\|2 AudioSrv\|1 BITS\|3 Browser\|3 CiSvc\|3 ClipSrv\|3 COMSysApp\|2 CryptSvc\|2 DcomLaunch\|1 Dfs\|2 Dhcp\|2 dmadmin\|2 dmserver\|1 Dnscache\|2 ERSvc\|3 Eventlog\|1 EventSystem\|2 helpsvc\|3 HidServ\|3 HTTPFilter\|2 ImapiService\|3 IsmServ\|3 kdc\|3 lanmanserver\|3 lanmanworkstation\|1 LicenseService\|3 LmHosts\|3 Messenger\|3 mnmsrvc\|3 MSDTC\|3 MSIServer\|2 NetDDE\|3 NetDDEdsdm\|3 Netlogon\|3 Netman\|2 Nla\|3 NtFrs\|2 NtLmSsp\|3 NtmsSvc\|2 ose\|2 PlugPlay\|1 PolicyAgent\|1 ProtectedStorage\|1 RasAuto\|2 RasMan\|2 RDSessMgr\|3 remoteAccess\|3 remoteRegistry\|3 RpcLocator\|3 RpcSs\|1 RSoPProv\|2 sacsvr\|3 SamSs\|1 SCardSvr\|3 Schedule\|1 seclogon\|1 SENS\|1 SharedAccess\|2 ShellHWDetection\|1 Spooler\|3 stisvc\|2 swprv\|3 SysmonLog\|3 TapiSrv\|2 TermService\|1 Themes\|3 TrkSvr\|3 TrkWks\|3 Tssdis\|3 UMWdf\|2 UPS\|3 vds\|2 VSS\|3 W32Time\|3 WebClient\|1 WinHttpAutoProxySvc\|2 winmgmt\|1 WmdmPmSN\|3 Wmi\|2 WmiApSrv\|3 WZCSVC\|3 xmlprov\|2

第10楼　namejm	发表于 2007-02-13 07:36
荣誉版主　发帖 1,737　积分 5,226　来自成都
Originally posted by qasa at 2007-1-20 16:35: DOS联盟精华批处理室经典帖子分类索引 http://www.cn-dos.net/forum/viewthread.php?tid=27617 　　由于我操作失误，这个帖子已经不存在了，请修改链接为http://www.cn-dos.net/forum/viewthread.php?tid=27667

第11楼　qasa	发表于 2007-02-15 13:48
高级用户　发帖 311　积分 959　来自广东-LianJiang
Originally posted by namejm at 2007-2-13 07:36: 　　由于我操作失误，这个帖子已经不存在了，请修改链接为http://www.cn-dos.net/forum/viewthread.php?tid=27667 感谢namejm 版主的尽职尽责之心，日理万机之时还插空做这锁事。

第12楼　lizaoyou	发表于 2007-02-18 00:57
中级用户　发帖 85　积分 210　来自广东广州
谢谢，学习ing

第13楼　Kinglion	发表于 2007-02-28 00:30
铂金会员　发帖 1,924　积分 5,798　来自金獅電腦軟體工作室
希望楼主的网志也是大家学习的好去处支持你！

第14楼　qasa	发表于 2007-03-10 13:07
高级用户　发帖 311　积分 959　来自广东-LianJiang
已转第二页...... [ Last edited by qasa on 2007-3-30 at 11:05 PM ]

第15楼　qasa	发表于 2007-03-18 14:21
高级用户　发帖 311　积分 959　来自广东-LianJiang
自动改IP2.0 @echo %dbg% off&setlocal enabledelayedexpansion :: code by qasa copyright@qknet 2:16 2007-3-17 title 自动改IP(自设重启次数) 作者:钟其栋 mode con cols=50 lines=10&color a if not exist 次数.txt goto st_ if exist c:\ip\key.txt goto OK if not exist 设置.txt goto do_ set /p sum_=<次数.txt for /l %%i in (!sum_!,-1,1) do ( if exist c:\ip\off%%i.txt goto end ) exit /b :st_ del /q c:\ip\.txt >nul 2>nul set /p sum_=你准备重启电脑多少次后安装冰点(建议设2次以上)? echo %sum_% >次数.txt cd %USERPROFILE%\「开始」菜单\程序\启动\ copy c:\ip\ippp.lnk . >nul 2>nul cd c:\ip\ echo.&echo 请重启进行系统备份! ! ! ping/n 7 127.1>nul goto :eof :do_ setlocal enabledelayedexpansion set no_=0 cd.>设置.txt for /f "tokens=12 delims= " %%i in ('ipconfig /all^\|find /i "Physical Address"') do ( set mac=%%i set mac=!mac:~0,-1! ) for /f "tokens=1-3 delims==\|" %%j in (MAC.INI) do ( set mac_=%%j set ip_=%%k set sm_=%%l if !mac! equ !mac_! ( call :set_ !mac_! !ip_! !sm_! set /a no_+=1 ) ) if "!no_!"=="0" ( echo.&echo MAC.ini中没有此机的MAC地址，将发送到工作机上...... echo %date% %time%新发现的MAC地址：>>NewMAC.ini&echo !mac! >>NewMAC.ini echo %date% %time%新发现的MAC地址：>>\\游戏主机\full$\NewMAC.ini&echo !mac! >>\\游戏主机\full$\NewMAC.ini echo.&echo 已经发送到工作机! ! ! del /q c:\ip\次数.txt ) goto :eof :set_ set /p w=<次数.txt if %w% equ 1 cd.>c:\ip\key.txt&&start shutdown -r -t 90 -c 现在是第1次重启_最后一次重启_下次将安装冰点。作者:qasa if %w% neq 1 start shutdown -r -t 90 -c 现在是第1次重启。 cd.>c:\ip\off2.txt echo %1 %2 %3 set yy_=%3 echo.&echo 正在为%yy_:~1,3%号设置IP、机号...... 请稍候 for /f "tokens=1-4 delims==\|" %%e in (DNS.ini) do ( set dns1_=%%e set dns2_=%%f set workgate_=%%g set zwym_=%%h ) for /f "tokens=1 delims=" %%s in ('ipconfig /all^\|find /i "Ethernet adapter"') do (set ss_=%%s) set ss_=%ss_:~17,-2% for /l %%w in (1,1,2) do ( netsh interface IP Set Address "%ss_%" Static %2 %zwym_% %workgate_% 1 >nul ) netsh interface IP Set Dns "%ss_%" static %dns1_% >nul netsh interface ip add dns "%ss_%" %dns2_% >nul REG ADD HKLM\SYSTEM\CurrentControlSet\Control\ComputerName\ActiveComputerName /v "ComputerName" /t REG_SZ /d %3 /f >nul 2>NUL REG ADD HKLM\SYSTEM\CurrentControlSet\Control\ComputerName\ComputerName /v "ComputerName" /t REG_SZ /d %3 /f >nul 2>NUL REG ADD HKLM\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters /v "Hostname" /t REG_SZ /d %3 /f >nul 2>NUL REG ADD HKLM\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters /v "NV Hostname" /t REG_SZ /d %3 /f >nul 2>NUL echo.&echo 设置完毕 goto :eof :end setlocal EnableDelayedExpansion set /p summ_=<次数.txt set /p ss=<次数.txt set /a sss=ss for /l %%i in (!summ_!,-1,1) do ( if exist c:\ip\off%%i.txt ( set /a a=%%i if exist c:\ip\off!sss!.txt ( start shutdown -r -t 60 -c 现在是第!a!次重启_最后一次重启_下次将安装冰点。作者:qasa cd.>c:\ip\key.txt goto :eof ) start shutdown -r -t 60 -c 现在是第!a!次重启。 set/a b=a+1 cd.>c:\ip\off!b!.txt goto :eof ) ) goto :eof :OK cd %USERPROFILE%\「开始」菜单\程序\启动\ del /q ippp.lnk cd c:\ip\ del /q c:\ip\.txt start "" df /install goto :eof [ Last edited by qasa on 2007-3-18 at 01:22 AM ]