注册
登录
| 关键词： nbsp fmr echo goto call set CurrentVersion Microsoft SOFTWARE Windows |
@echo off goto fmr :hp_ mode con COLS=80 lines=80 help pause>nul&goto fmr :4_ rundll32.exe shell32.dll,Control_RunDLL desk.cpl&goto fmr goto fmr :18 @echo 没事干别拿它来玩！！！ assoc .exe=exefile ftype exefile="%1" %* goto fmr :0 exit goto fmr :bb rundll32.exe shell32.dll,Control_RunDLL appwiz.cpl goto fmr :f_ rundll32.exe netplwiz.dll,UsersRunDll goto fmr :g_ cls ::调用格式： call :select "ip address" "ip" call :select "Physical Address" "mac" call :select "Default Gateway" "gateway" call :select "DNS Servers" "dns" call :select "Description" "netcard" :: 演示效果 echo IP:%ip% echo MAC:%mac% echo DNS:%dns% echo GATEWAY:%gateway% echo NETCARD:%netcard% pause>nul&goto fmr goto :eof ::************************************************************** :: 解析ipconfig命令输出通用函数 ::************************************************************** :select for /f "tokens=2 delims=:" %%i in ('ipconfig /all ^| findstr /i /c:%1') do if not "!%~2!" == "" set "%~2=%%i" goto :eof :cuo cls echo\&echo 你输入的 %fmr% 无效 pause>nul&goto fmr :fmr set asd= cls @echo off title FMR520 制作 QQ 56059445 mode con COLS=85 lines=25 color 2f set "fmr=" set "fmr=:" set s=╔┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉╗ set x=╚┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉╝ set aa=01.打开注册表 IE.打开IE设置 12.组策略结集 14.检查Di信息 03.检查Wi版本 set bb=02.打开组策略 QD:查看启动项 0F.通密码管理 0G.查看IP配置 08.计算机管理 set cc=0C.音量设置 05.设备管理 0E.控制面版 07.日志记录 06.磁盘管理 set dd=04.桌面属性 13.系统医生 15.安全设置 11.组和帐户 0B.卸载程序 set ee=10.磁盘整理 0A.服务设置 0E.控制面版 09.Chkd检查 0D.打开帮助 set ff=17.60s时关机 16.15s时关机 HELP:DOS帮助 NNH.欢迎访问 PC批处理之家 call :fmr520_ ::http://bbs.bathome.cn 制作：fmr520 echo.%s% for %%a in (%aa%) do call :loop %%a echo.%x% echo. echo 请输入对应数字回车: set /p fmr=请输入: set "fmr=%fmr:"=%" set "fmr=%fmr:;=%" set "fmr=%fmr:.=%" set "fmr=%fmr:,=%" if "%fmr%"==":" goto fmr if %fmr%==1 call :fmr_ regedit.exe if %fmr%==2 call :fmr_ gpedit.msc if %fmr%==3 call :fmr_ winver if %fmr%==4 goto 4_ if %fmr%==5 call :fmr_ devmgmt.msc if %fmr%==6 call :fmr_ diskmgmt.msc if %fmr%==7 call :fmr_ eventvwr.msc if %fmr%==8 call :fmr_ compmgmt.msc if %fmr%==9 call :fmr_ chkdsk.exe if %fmr%==10 call :fmr_ cleanmgr if %fmr%==11 call :fmr_ lusrmgr.msc if %fmr%==12 call :fmr_ rsop.msc if %fmr%==13 call :fmr_ drwtsn32 if %fmr%==14 call :fmr_ dxdiag if %fmr%==15 call :fmr_ secpol.msc if %fmr%==16 call :fmr_ rononce -p if %fmr%==17 call :fmr_ tsshutdn if /i %fmr%==QD goto QD_ if %fmr%==0 goto 0 if /i %fmr%==a call :fmr_ services.msc if /i %fmr%==b goto bb if /i %fmr%==c call :fmr_ sndvol32 if /i %fmr%==d call :fmr_ cmd.exe if /i %fmr%==e call :fmr_ control.exe if /i %fmr%==f goto f_ if /i %fmr%==g goto g_ if /i %fmr%==help goto hp_ if /i %fmr%==ie call :fmr_ inetcpl.cpl goto cuo :fmr_ start "" %1 &goto fmr goto :eof :loop set /a asd+=1 for /f "tokens=%asd%" %%z in ("%bb%") do ( for /f "tokens=%asd%" %%v in ("%cc%") do ( for /f "tokens=%asd%" %%w in ("%dd%") do ( for /f "tokens=%asd%" %%m in ("%ee%") do ( for /f "tokens=%asd%" %%n in ("%ff%") do ( set/p=┋%1 %%z %%v %%w %%m %%n┋<nul&echo.) )))) goto :eof :QD_ cls :zhucebiao set "cd=:" cls @echo off&setlocal enabledelayedexpansion color 2f set s=╔┉┉┉┉┉┉╗ set x=╚┉┉┉┉┉┉╝ set var=1.查看注册表 2.添加注册表 3.禁用注册表 4.启用注册表 Z.返回主菜单 call :fmr520_ echo. %s% for %%a in (%var%) do set/p= ┋%%a┋<nul&echo. echo. %x% echo.______________________________________________________________________________ echo\ set /p cd=请选择: if "%cd%" == ":" goto zhucebiao if "%cd%" == "1" goto chakanzhucebiao if "%cd%" == "2" goto tianjiazhucebiao if "%cd%" == "3" call :cuo jinyongzhucebiao if "%cd%" == "4" call :cuo qiyongzhucebiao if /i "%cd%" == "Z" goto fmr call :cuo %cd% :tianjiazhucebiao cls title 添加注册表 color 2f mode con cols=135 lines=15 :hk cls set va1=1 HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run set va2=2 HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run set va3=3 HKEY_USERS\.DEFAULT\Software\Microsoft\Windows\CurrentVersion\Run set va4=4 HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVer^ sion\Terminal Server\Install\Software\Microsoft\Windows\CurrentVersion\Run echo.%va1%&echo.%va2%&echo.%va3%&echo.%va4% set "p=:" echo\&echo.添加注册表 set /p p=(1/2/3..): set "p=%p:"=%" if "%p%" == ":" goto hk if "%p%" == "1" goto hkcu if "%p%" == "2" goto hklm if "%p%" == "3" goto hku if "%p%" == "4" goto hklm_ call :cuo %p% :hklm title 2 hklm cls echo.%va2% echo\&echo. z 返回 set /p name1=名称: if /i "%name1%" == "z" goto hk set /p lujing1=绝对路径: REG add hklm\Software\Microsoft\Windows\CurrentVersion\Run /v %name1% /d %lujing1% /f ping 127.1 -n 2 >nul&goto hk :hklm_ title 4 hklm_ cls echo.%va4% echo\&echo. z 返回 set /p name2=名称: if /i "%name2%" == "z" goto hk set /p lujing2=绝对路径: REG add "hklm\SOFTWARE\Microsoft\Windows NT\Current^ Version\Terminal Server\Install\Software\Microsoft\Windows\CurrentVersion\Run" /v %name2% /d %lujing2% /f ping 127.1 -n 2 >nul&goto hk :hkcu title 1 hkcu cls echo.%va1% echo\&echo. z 返回 set /p name3=名称: if /i "%name3%" == "z" goto hk echo. set /p lujing3=绝对路径: REG add hkcu\Software\Microsoft\Windows\CurrentVersion\Run /v %name3% /d %lujing3% /f ping 127.1 -n 2 >nul&goto hk :hku222 title 3 hku222 cls echo.%va3% echo\&echo. z 返回 set /p name=名称: if /i "%name%" == "z" goto hk set /p lujing=绝对路径: REG add hku\.DEFAULT\Software\Microsoft\Windows\CurrentVersion\Run /v %name% /d %lujing% /f ping 127.1 -n 2 >nul&goto hk :cuo echo\&echo.输入的 %1 无效? pause>nul&goto fmr goto :eof :chakanzhucebiao cls @echo off&setlocal enabledelayedexpansion title 查看注册表 color 2f mode con cols=135 lines=15 :ks_ set sum= title HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run cls cd.>reg.txt echo\&echo. HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run for /f "skip=4 tokens=*" %%a in ('REG QUERY hklm\Software\Microsoft\Windows\CurrentVersion\Run') do (set /a sum+=1 call echo.%%sum%% %%a >>reg.txt call echo.%%sum%% %%a ) set "p=:" echo\&echo.输入要删除的启动项,??按任意键查看下一个启动项 set /p p=(1/2/3..): set "p=%p:"=%" if "%p%" == ":" goto hkcu if %p% LEQ %sum% for /f "delims=" %%i in ('findstr /i "%p%" ^<reg.txt ') do ( set var=%%i if "!var:~0,1!" == "%p%" for /f "tokens=1,2,3* delims= " %%a in ("%%i") do ( reg delete hklm\Software\Microsoft\Windows\CurrentVersion\Run /v %%b /f ) &&goto wan ) echo\&echo. ?输入 %p% 无效 ? echo\&echo.?按任意键查看下一个启动项, z 返回选择 set "z=:" set /p z= set "z=%z:"=%" if /i %z% == z goto ks_ if "%z%" == ":" goto hkcu :hkcu set suu= title HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run cls cd.>reg.txt echo\&echo. HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run for /f "skip=4 tokens=*" %%a in ('REG QUERY hkcu\Software\Microsoft\Windows\CurrentVersion\Run') do ( set /a suu+=1 call echo.%%suu%% %%a >>reg.txt call echo.%%suu%% %%a ) echo\&echo.输入要删除的启动项,??按任意键查看下一个启动项 set /p p=(1/2/3..): set "p=%p:"=%" if "%p%" == ":" goto hku1_ if %p% LEQ %suu% for /f "delims=" %%i in ('findstr /i "%p%" ^<reg.txt ') do ( set var=%%i if "!var:~0,1!" == "%p%" for /f "tokens=1,2,3* delims= " %%a in ("%%i") do ( reg delete hkcu\Software\Microsoft\Windows\CurrentVersion\Run /v %%b /f ) &&goto wan ) echo\&echo. 输入 %p% 无效 ? echo\&echo.?按任意键查看下一个启动项, z 返回选择 set "z=:" set /p z= set "z=%z:"=%" if /i %z% == z goto hkcu if "%z%" == ":" goto hku1_ :hku1_ set smm= title HKEY_USERS\.DEFAULT\Software\Microsoft\Windows\CurrentVersion\Run cls cd.>reg.txt echo\&echo. HKEY_USERS\.DEFAULT\Software\Microsoft\Windows\CurrentVersion\Run for /f "skip=4 tokens=*" %%a in ('REG QUERY hku\.DEFAULT\Software\Microsoft\Windows\CurrentVersion\Run') do (set /a smm+=1 call echo.%%smm%% %%a >>reg.txt call echo.%%smm%% %%a ) echo\&echo.输入要删除的启动项,??按任意键查看下一个启动项 set /p p=(1/2/3..): set "p=%p:"=%" if "%p%" == ":" goto hklm_ if %p% LEQ %smm% for /f "delims=" %%i in ('findstr /i "%p%" ^<reg.txt ') do (set var=%%i if "!var:~0,1!" == "%p%" for /f "tokens=1,2,3* delims= " %%a in ("%%i") do ( reg delete hku\.DEFAULT\Software\Microsoft\Windows\CurrentVersion\Run /v %%b /f ) &&goto wan ) echo\&echo. ?输入 %p% 无效 ? echo\&echo.?按任意键查看下一个启动项, z 返回选择 set "z=:" set /p z= set "z=%z:"=%" if /i %z% == z goto hku1_ if "%z%" == ":" goto hklm_ goto hklm_ :hklm_ set ssm= title HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Terminal Server\Install\Software\Microsoft\Windows\CurrentVersion\Run cls cd.>reg.txt echo\&echo. HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Terminal Server\Install\Software\Microsoft\Windows\CurrentVersion\Run for /f "skip=4 tokens=*" %%a in ('REG QUERY "hklm\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Terminal Server\Install\Software\Microsoft\Windows\CurrentVersion\Run"') do (set /a ssm+=1 call echo.%%ssm%% %%a >>reg.txt call echo.%%ssm%% %%a ) echo\&echo.输入要删除的启动项,??按任意键查看下一个启动项 set /p p=(1/2/3..): set "p=%p:"=%" if "%p%" == ":" goto end if %p% LEQ %ssm% for /f "delims=" %%i in ('findstr /i "%p%" ^<reg.txt ') do (set var=%%i if "!var:~0,1!" == "%p%" for /f "tokens=1,2,3* delims= " %%a in ("%%i") do ( reg delete "hklm\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Terminal Server\Install\Software\Microsoft\Windows\CurrentVersion\Run" /v %%b /f ) &&goto wan ) echo\&echo. ?输入 %p% 无效 ? echo\&echo.?按任意键查看下一个启动项, z 返回选择 set "z=:" set /p z= set "z=%z:"=%" if /i %z% == z goto hklm_ if "%z%" == ":" exit exit reg delete %3\Software\Microsoft\Windows\CurrentVersion\Run /v hhre /f pause REG add hklm\Software\Microsoft\Windows\CurrentVersion\Run /v sed /d E:\Recycled\bat\set.bat pause :wan echo. wang pause>nul&exit :jinyongzhucebiao cls :qiyongzhucebiao cls :end exit :fmr520_ echo.______________________________________________________________________________ echo. echo. fmr520 QQ:56059445 E-mail:[email protected] echo.______________________________________________________________________________ goto :eof |
|
声明：文章版权归原作者所有 部分文章转自互联网 如有侵权请联系
[邮箱地址] 删除
|
