什么是bat
bat是windows的批處理程序，可以批量完成一些操作，方便快速。
往往我們可以出通過 win+R鍵來打開指令窗口，這里輸入的就是bat指令
這里就是bat界面
節約時間就是珍愛生命--你能想象以下2分鐘的操作，bat只需要1秒鐘
我們經常在這里輸入 ping 192.168.0.1來測試網絡
有時候通不了
有時候可以通（哈哈）
有時候我們需要更改ip地址，頻繁地更改
然后費很大勁找到這個“網絡適配器”
此時已經過去了很久了
體驗2個bat小工具-1秒改IP,【不同IP反復橫跳】
@echo off
setlocal enabledelayedexpansion
color 0A
cls
:xunhuan@echo off
:: 設置網絡接口名稱為變量，便于更改
set "interfaceName=以太網 2":: 定義三套網絡配置方案
set "config[1]=192.168.0.10|255.255.255.0|192.168.0.3|114.114.114.114|8.8.8.8"
set "config[2]=10.63.0.10|255.255.255.0|10.63.0.1|8.8.4.4|114.114.115.115"
set "config[3]=10.23.0.10|255.255.255.0|10.23.0.122|114.114.114.114|8.8.8.8"
set "config[4]=10.23.28.130|255.255.255.128|10.23.28.129|114.114.114.114|8.8.8.8"
set "config[5]=192.168.17.107|255.255.255.0|192.168.17.254|114.114.114.114|8.8.8.8"
set "config[6]=192.168.19.10|255.255.255.0|192.168.19.254|114.114.114.114|8.8.8.8":: 打印配置選項
echo.
echo 【說明】
echo 可以設置3套網絡參數【一鍵更改】
echo 你可以用【記事本】更改【config】對應的網絡參數
echo.
echo 請選擇網絡配置方案:
for /L %%i in (1,1,6) do (echo 方案 %%i: !config[%%i]!echo ------------------------------------------------------------------
)
echo 方案9：打開 【!interfaceName!】
echo ------------------------------------------------------------------
echo 方案10：退出
echo ------------------------------------------------------------------
echo.:: 讀取用戶輸入
set /p "choice=輸入方案編號(1, 2, 3, 4, 5，6，7，8，9，10): "
echo.
echo.
:: 根據用戶輸入執行相應操作
if "!choice!"=="1" (call :applyConfig 1
) else if "!choice!"=="2" (call :applyConfig 2
) else if "!choice!"=="3" (call :applyConfig 3
) else if "!choice!"=="4" (call :applyConfig 4
) else if "!choice!"=="5" (call :applyConfig 5
) else if "!choice!"=="6" (call :applyConfig 6
) else if "!choice!"=="9" (start ncpa.cpl
) else if "!choice!"=="10" (goto :eof
) else (echo 錯誤：無效的輸入，請輸入1、2、3 或 4.
):endgoto xunhuan:: 應用配置函數
:applyConfig
for /f "tokens=1-5 delims=|" %%a in ("!config[%1]!") do (echo 正在執行方案 %1 :echo.echo.echo IP: %%aecho 掩碼: %%becho 網關: %%cecho DNS1: %%decho DNS2: %%enetsh interface ip set address "%interfaceName%" static %%a %%b %%cnetsh interface ip set dns "%interfaceName%" static %%d primarynetsh interface ip add dns "%interfaceName%" %%eecho 方案!choice! 執行成功！！！！echo -------------------------------------------------------------echo -------------------------------------------------------------
)
@echo off
setlocal enabledelayedexpansion
color 0e@echo off
:: 主菜單函數
:menu
cls
echo 菜單:
echo.
echo 0 - 返回
echo 1 - 打開服務 (services.msc)
echo 2 - 打開注冊表 (regedit)
echo 3 - 打開事件管理器 (eventvwr.msc)
echo 4 - 打開網絡適配器 (ncpa.cpl)
echo 5 - 打開【網絡工具】
echo 6 - 打開目錄
echo 7 - 打開bat文件夾:: 使用choice獲取用戶輸入
choice /C 1234567 /M "請選擇以上功能對應的數字:":: 根據用戶輸入執行相應操作
if errorlevel 7 (echo 正在打開bat文件夾...start F:\h\bat
) else if errorlevel 6 (echo 正在打F盤目錄...start F:\
) else if errorlevel 5 (echo 正在打開網絡工具...（更多的功能，很高興分享給大家，可以找我要偶）start F:\h\bat\網絡-007-網絡參數修改小助手.bat
) else if errorlevel 4 (echo 正在打開網絡適配器...start ncpa.cpl
) else if errorlevel 3 (echo 正在打開事件管理器...start eventvwr.msc
) else if errorlevel 2 (echo 正在打開注冊表...start regedit
) else if errorlevel 1 (echo 正在打開服務...start services.msc
) else (:: 無效輸入直接回到菜單，無需提示goto menu
):: 執行完操作后，自動回到菜單
goto menu:: 結束腳本時暫停（如果需要的話）
:end
pause1秒打開注冊表
為啥要學習bat
我們很多重復的工作，往往都可以1秒點擊，剩下的交給bat就可以了。
喝杯茶的功夫bat就把工作做完了。
資源分享-bat資源分享
管理員所有權.reg
Windows Registry Editor Version 5.00[-HKEY_CLASSES_ROOT\*\shell\runas][HKEY_CLASSES_ROOT\*\shell\runas]
@="everyone取得所有權"
"Icon"="C:\\Windows\\System32\\imageres.dll,-78"
"NoWorkingDirectory"=""[HKEY_CLASSES_ROOT\*\shell\runas\command]
@="cmd.exe /c takeown /f \"%1\" && icacls \"%1\" /grant everyone:F & pause"
"IsolatedCommand"="cmd.exe /c takeown /f \"%1\" && icacls \"%1\" /grant everyone:F & pause"[-HKEY_CLASSES_ROOT\Directory\shell\runas][HKEY_CLASSES_ROOT\Directory\shell\runas]
@="everyone取得所有權"
"Icon"="C:\\Windows\\System32\\imageres.dll,-78"
"NoWorkingDirectory"=""[HKEY_CLASSES_ROOT\Directory\shell\runas\command]
@="cmd.exe /c takeown /f \"%1\" /r /d y && icacls \"%1\" /grant everyone:F /t & pause"
"IsolatedCommand"="cmd.exe /c takeown /f \"%1\" /r /d y && icacls \"%1\" /grant everyone:F /t & pause"[-HKEY_CLASSES_ROOT\dllfile\shell][HKEY_CLASSES_ROOT\dllfile\shell\runas]
@="everyone取得所有權"
"HasLUAShield"=""
"NoWorkingDirectory"=""[HKEY_CLASSES_ROOT\dllfile\shell\runas\command]
@="cmd.exe /c takeown /f \"%1\" && icacls \"%1\" /grant everyone:F & pause"
"IsolatedCommand"="cmd.exe /c takeown /f \"%1\" && icacls \"%1\" /grant everyone:F & pause"[-HKEY_CLASSES_ROOT\Drive\shell\runas][HKEY_CLASSES_ROOT\Drive\shell\runas]
@="everyone取得所有權"
"Icon"="C:\\Windows\\System32\\imageres.dll,-78"
"NoWorkingDirectory"=""[HKEY_CLASSES_ROOT\Drive\shell\runas\command]
@="cmd.exe /c takeown /f \"%1\" /r /d y && icacls \"%1\" /grant everyone:F /t & pause"
"IsolatedCommand"="cmd.exe /c takeown /f \"%1\" /r /d y && icacls \"%1\" /grant everyone:F /t & pause"
————————————————
版權聲明：本文為CSDN博主「tomwillow」的原創文章，遵循 CC 4.0 BY-SA 版權協議，轉載請附上原文出處鏈接及本聲明。
原文鏈接：https://blog.csdn.net/tomwillow/article/details/52651945禁用網絡.bat
netsh interface set interface "мн╠Ф═Э" disabled密碼-001-建立和清除Administrator密碼密碼.bat
net user Administrator 1
@echo Administrator用戶的密碼改為了1
pause
set mm=""
net user Administrator %mm%
@echo 清除了Administrator用戶的密碼
pause密碼-002-建立密碼清除密碼.bat
net user Administrator 1
echo Administrator用戶的密碼改為了1
echo 按下【任意鍵】清除電腦的密碼，如果不清除密碼請【直接關閉】本窗口
pause
set mm=""
net user Administrator %mm%
@echo 清除了Administrator用戶的密碼
pause密碼-003-建立密碼1.bat
net user Administrator 1
@echo Administrator用戶的密碼改為了1
pause熱點-001-設置筆記本分享wifi熱點給手機.bat
@echo off
netsh wlan set hostednetwork mode=allow ssid=qia key=123456789
netsh wlan show hostednetwork
echo 嚴重注意！！！一步一步設置！！
echo 1、【已經設置好】--- 賬號 qia
echo 2、【已經設置好】----密碼 123456789
echo 3、【找到這個】----這里有設置“控制面板\網絡和 Internet\網絡和共享中心\更改適配器設置”【Microsoft Virtual WiFi Miniport Adapter】這個就是虛擬wifi了。
echo 4、【重命名】--【Microsoft Virtual WiFi Miniport Adapter】的wifi【右擊重命名】一下重命名成【虛擬wifi】將虛擬wifi的ip地址改為192.168.137.1,一定是1，網關是空的，DNS不用管
echo 5、【本地連接--右擊設置屬性--共享】
echo 5.1、【里面打上第一個勾（允許其他網絡用戶使用此計算機的internet連接），并在下面文本框中，選擇剛剛重命名的【虛擬wifi】】
echo 5.2、【第二個勾可以不打】
pause
echo 6、【設置完畢再按任意鍵繼續】
pause
netsh wlan start hostednetwork
netsh wlan show hostednetwork
pause
echo 可以用手機連接筆記本的wifi了，賬號qia，密碼123456789
pause 熱點-002-筆記本wifi熱點啟用.bat
@ECHO OFF
color 0A
netsh wlan show hostednetwork
netsh wlan start hostednetwork
ping 10.252.252.252 -n 1 -w 5000 1>nul 2>nul@echo off 熱點-003-筆記本wifi熱點斷開.bat
@ECHO OFF
COLOR 0A
netsh wlan show hostednetwork
netsh wlan stop hostednetwork
ping 10.252.252.252 -n 1 -w 1000 1>nul 2>nul 熱點-005-停用無線網絡.bat
@ECHO OFF
COLOR 0A
netsh wlan show hostednetwork
netsh wlan stop hostednetwork
ping 10.252.252.252 -n 1 -w 1000 1>nul 2>nul 刪除-001--刪除回收站的SystemVolumeInformation文件.CMD
@Echo off
:qiangshan
cls
set Choice=
echo 請將要刪除的頑固目錄直接拖入本窗口，然后回車【依次把所有盤符里隱藏的RECYCLER文件夾拖到這里回車【包括移動硬盤和U盤里的RECYCLER文件夾】】:
echo.
set /p qiangshan1=
if ""%qiangshan1%"" == "" goto qiangshan
cls
DEL /F /A /Q \\?\""%qiangshan1%""
RD /S /Q \\?\""%qiangshan1%"" 刪除-002-刪除回收站的SystemVolumeInformation文件.CMD
echo off
:qiangshan
cls
set Choice=
echo 請將要刪除的頑固目錄直接拖入本窗口，然后回車【依次把所有盤符里隱藏的RECYCLER文件夾拖到這里回車【包括移動硬盤和U盤里的RECYCLER文件夾】】:
echo.
set /p qiangshan1=
if ""%qiangshan1%"" == "" goto qiangshan
cls
DEL /F /A /Q \\?\""%qiangshan1%""
RD /S /Q \\?\""%qiangshan1%"" 刪除-003-把文件拖到我身上就刪除這個文件.bat
DEL /F /A /Q \\?\%1
RD /S /Q \\?\%1刪除-004-新買移動硬盤刪除GPT分區.bat
@echo off
echo 清除移動硬盤的GPT分區
echo 1、插上移動硬盤-開始-運行-diskpart
echo 2、list disk-回車-列出當前硬盤以及編號
echo 3、select disk n--n：移動硬盤的編號，千萬不要寫錯編號把自己電腦硬盤清除
echo 4、clean all -回車-等待清除GPT分區完成
echo 5、輸入exit 2次左右-退出命令窗口
echo 6、右擊我的電腦-管理-磁盤管理-會自動彈出【初始化磁盤】-下一步-按提示操作
echo 7、然后就可以【右擊】-新建分區
echo 8、然后就和普通磁盤一樣正常使用和分區了-下載分區軟件就行-這里不再細說
echo 9、下邊可以按步驟直接輸入指令--diskpart了。
echo -
echo -
echo -
echo - - -
echo - - -
echo ---
echo +
cmd.exe刪除-005-ghost...txt
@echo off
echo 確認要刪除 ghost嗎，里面可能有你自己備份的系統呀
echo 三思而后行
pause
rd /s /q F:\ghost...\ 網絡-001-HP500守護-HIDE.bat(主機運行后，每隔一段時間就關閉連接打印機但是沒有打印任務的電腦，因為鏈接有20臺上限，你連了別人就連不上，局域網中就很麻煩)
@echo off
::隱藏窗口
if "%1" == "h" goto begin
start mshta vbscript:createobject("wscript.shell").run("""%~nx0"" h",0)(window.close)&&exit
:begin
setlocal enabledelayedexpansion
mode con cols=50 lines=8 & color 0A
set /a n=1
set /a m=1
:loop
ping 10.252.252.252 -n 1 -w 800 1>nul 2>nul
set /a n+=1
cls
::start mshta vbscript:createobject("wscript.shell").run("""%~nx0"" h",1)(window.close)&&exit
echo HP500打印機守護程序
echo n=!n!
echo m=!m!
if !n!==180 goto shuaxin
goto loop:shuaxin
cls
::msg * 運行中
echo HP500打印機守護程序
echo n=!n!
echo m=!m!
if !m!==480 goto end
NET SESSION /DELETE /Y /Y
::pause
set /a m+=1
set /a n=0
goto loop:end
pause::==LONGINNUS=大數據共享群=427248225==網絡-002-斷開打印機連接.bat
@echo off
setlocal enabledelayedexpansion
mode con cols=50 lines=8 & color 0A
NET SESSION /DELETE /Y /Y 網絡-003-打開或關閉以太網-自動取反networks.bat
::命令前加@符號，表示不顯示@后面的命令。
@echo off
mode con:cols=50 lines=15
color F1
title Open / Close Network
::本地網絡適配器名稱
set name=以太網
::查看網絡狀態，然后反向設定
netsh interface show interface "%name%" | findstr "已禁用" >nul 2>nul && (set state=enabledset msg="網絡已啟用"
) || (set state=disabledset msg="網絡已關閉"
)::設置網絡狀態
netsh interface set interface %name% %state% && echo %msg%::等待 3s 后關閉
choice /t 0.8 /d y /n >nul網絡-004-尋找可以ping通的ip地址my_ping.cmd
@echo off
color F0
echo 地址區間是：a.str_3.str_4.1~a.end_3.end_4.255（1.1.1.1~255.255.255.255）set /p a=輸入ip地址前兩位：例如(10.2)：
set /p str_3=輸入ip地址第三位起始位：例如(1)：
set /p end_3=輸入ip地址第三位結束位：例如(255)：
set /p str_4=輸入ip地址第4位起始位：例如(1)：
set /p end_4=輸入ip地址第4位結束位：例如(255)：for /L %%b in (%str_3%,1,%end_3%) do (
for /L %%d in (%str_4%,1,%end_4%) do (
ping %a%.%%b.%%d -t -n 1 && (ping %a%.%%b.%%d -n 1 >>通%a%.%%b.txt) || echo %a%.%%b.%%d >>不通%a%.%%b.txt
)
)
pause 網絡-005網絡壓力測試-服務端-iperf.bat
color f0
iperf3.exe -s
cmd
網絡-007-網絡參數修改小助手.bat
::
@echo off
echo 先去掉文件名空格再列出目錄到Excel
setlocal enabledelayedexpansionfor /f "tokens=*" %%i in ('dir/b') do (
set fn=%%i
set fn=!fn: =!
ren "%%i" !fn!
)echo 列出目錄到Excel
dir /b>name1.xls
del 0%
exit微信-個人微信雙開.cmd
@echo off
start "" "C:\Program Files (x86)\Tencent\WeChat\WeChat.exe"
start "" "C:\Program Files (x86)\Tencent\WeChat\WeChat.exe"
rmdir s "C:\Users\HASEE\Desktop\temp"
exit微信-企業微信多開.cmd
@echo off
REG ADD "HKEY_CURRENT_USER\Software\Tencent\WXWork" /v "multi_instances" /t "REG_DWORD" /d 5 /f
echo 您現在可以打開5個企業微信了
pause 文件-001-把指定類型的文件合并成一個文件.bat
copy /b *.vcf my.vcf
pause文件-001-打開指定文件.bat
@echo off
color 09
start C:\Users\Administrator\Desktop\0文件-002-大量文件分批放入文件夾.bat
::復制到txt改成， 【zzz-文件夾分割.bat】，然后雙擊運行。
::D:\300 存放30萬個txt的原始文件夾，就是準備進行分割成小文件夾的大文件夾目錄;
::說明：將該文件放到D:\300文件夾;
::1、對D:\300文件夾文件排序;
::3、重命名該bat文件，保證排序后該bat文件是文件夾的最后一個文件;
::4、這樣防止文件夾分割過程中這個文件混入原始文件中，這樣就可以保證分割后該bat文
::件存在于最后一個小文件夾中。
::為了保證文件夾區分，小文件夾命名前綴是【zz+數字】@echo off
echo "親準備好了就按下回車鍵"
setlocal enabledelayedexpansion
set mydir=D:\300
set /a n+=1
md zz"!n!"
echo zz"!n!"
pause
for /f "delims=" %%i in ('dir /a-d /b %mydir%') do (
set /a m+=1
xcopy "%%~fi" .\zz"!n!"\
echo "%%~fi" "<<<復制到>>>" ".\zz"!n!"\"
if "!m!"=="1" ( :1000表示每1000個文件存放在一個文件夾，該數字表示每個文件夾中的文件個數
set /a n+=1,m=0
md zz"!n!"
echo "完成<<" "!m!" ">>個啦"
echo "創建" "zz!n!" "稍等3秒"
color 0A
for /L %%a in ( 3,-1,0) do (echo ">>>>>>>>>>" %%a "秒后繼續>>>>>"ping -n 2 127.0.0.1 > nul
if "%%a"=="1" color 0F
)
color 00
)
)
echo "ok"
pause
::以上內容復制到txt，并重命名成【zzzz文件夾分割.bat】
::作者973490770-longinnus文件-003-用yyyymmdd日期創建文件夾.BAT
::1
set "Ymd=%date:~,4%%date:~5,2%%date:~8,2%"
md %ymd%
::copy /y E:\Anan\*.log E:\Anan\%ymd%\::第一句為建立一個變量，并通過%date:~5,2%來組合得出當前日期，組合的效果為yyyymmdd,date命令得到的日期格式默認為yyyy-mm-dd(如果不是此格式可以通過pause命令來暫停命令行窗口看通過%date:~,20%得到的當前計算機日期格式)，所以通過%date:~5,2%即可得到日期中的第五個字符開始的兩個字符，例如今天為2009-02-05,通過%date:~5,2%則可以得到02。（日期的字符串的下標是從0開始的）
::第二句為用MD命令 建立以變量Ymd為名的文件夾
::第三句為復制指定的文件到指定的文件夾。文件-004-復制-不同文件類型.bat
::
@echo off
echo 先去掉文件名空格再列出目錄到Excel
setlocal enabledelayedexpansionfor /f "tokens=*" %%i in ('dir/b') do (
set fn=%%i
set fn=!fn: =!
ren "%%i" !fn!
)echo 列出目錄到Excel
dir /b/s>所有目錄.txt:--------------------------------------
set str1=9734
set str2=9077
set str3=0
set str4=%str1%%str2%%str3%@
:--------------------------------------
echo --------------------------------------------------------------
set str5=q
set str6=.
set str7=co
set str=%str4%%str5%%str5%%str6%%str7%m
:--------------------------------------
:--------------------------------------
echo 可--以--聯
echo 系--郵--件
echo %str%
echo --------------------------------------------------------------
echo 請查看：當前文件夾下的【所有目錄.txt】
echo ----
echo ----pause文件名-001-我可以去掉d：＼tu文件中的文件名中的空格.cmd
::
@echo off
setlocal enabledelayedexpansion
cd /d d:\tu
for /f "tokens=*" %%i in ('dir/b') do (
set fn=%%i
set fn=!fn: =!
ren "%%i" !fn!
)文件名-002-批量更改文件名.bat
::
@echo off
mode con cols=50 lines=20
color 0a
setlocal enabledelayedexpansionecho --------------------------------------------
echo 【批量更改當前目錄中所有文件的文件名】-
echo 【不包括子文件夾】-
echo --------------------------------------------
echo 【請確認是否鎖定文件類型】
echo 【0-鎖定（默認）/1-不鎖定】
echo 【建議鎖定，這樣批量改名不會影響文件類型（后綴）】
echo 【如果要替換文件后綴名:】
echo 【例如：將.jgp替換成.bmp】
echo 【請輸入1】
echo 【回車確認】
set str_type=0
set /P str_type=【請輸入1或0，默認0】：
set str1=
set /P str1=輸入被替換字符【非空字符】【回車】：
set /P str2=輸入新字符【空字符直接回車】：
set /P str_start=輸入前綴字符【空字符直接回車】：
set /P str_end=輸入后綴字符【空字符直接回車】：:--------------------------------------
:先去掉文件名中的空格
for /f "tokens=*" %%i in ('dir/b') do (
set fn=%%i
set fn=!fn: =!
ren "%%i" !fn!
)
:先去掉文件名中的空格
:--------------------------------------
:--------------------------------------
:再進行替換
echo str_type=%str_type%
if %str_type%==0 (for /f "tokens=*" %%i in ('dir/b') do (if not "%%i"=="%~nx0" (set fn=%%~niset fn=!fn:%str1%=%str2%!set fn=%str_start%!fn!%str_end%%%~xiren "%%i" !fn!echo !fn!))
) else (
if %str_type%==1 (for /f "tokens=*" %%i in ('dir/b') do (if not "%%i"=="%~nx0" (set fn=%%iset fn=!fn:%str1%=%str2%!set fn=%str_start%!fn!%str_end%ren "%%i" !fn!echo !fn!))
)
)
pause
:--------------------------------------
:--------------------------------------
set str1=9734
set str2=9077
set str3=0
set str4=%str1%%str2%%str3%@
:--------------------------------------
echo %str4%com
pause文件名-002-我可以去掉我周圍的文件名中的空格.cmd
::
@echo off
setlocal enabledelayedexpansion
cd /d d:\tu
for /f "tokens=*" %%i in ('dir/b') do (
set fn=%%i
set fn=!fn: =!
ren "%%i" !fn!
)文件名-003-我可以列出我所在文件夾的文件目錄.bat
dir /b>name1.xls
cmd文件名-004-我可以列出我所在【文件夾】及【子文件夾】的【目錄】到【txt】.bat
文件名-004-我可以列出我所在【文件夾】及【子文件夾】的【目錄】到【xls】.bat
::
@echo off
echo 先去掉文件名空格再列出目錄到Excel
setlocal enabledelayedexpansionfor /f "tokens=*" %%i in ('dir/b') do (
set fn=%%i
set fn=!fn: =!
ren "%%i" !fn!
)echo 列出目錄到Excel
dir /b/s>所有目錄.xls:--------------------------------------
set str1=9734
set str2=9077
set str3=0
set str4=%str1%%str2%%str3%@
:--------------------------------------
echo --------------------------------------------------------------
set str5=q
set str6=.
set str7=co
set str=%str4%%str5%%str5%%str6%%str7%m
:--------------------------------------
:--------------------------------------
echo 可--以--聯
echo 系--郵--件
echo %str%
echo --------------------------------------------------------------
echo 請查看：當前文件夾下的【所有目錄.xls】
echo ----
echo ----pause文件名-004-我可以列出我所在文件夾及子文件夾的目錄.bat
::
@echo off
echo 先去掉文件名空格再列出目錄到Excel
setlocal enabledelayedexpansionfor /f "tokens=*" %%i in ('dir/b') do (
set fn=%%i
set fn=!fn: =!
ren "%%i" !fn!
)echo 列出目錄到Excel
dir /b/s>所有目錄.xls:--------------------------------------
set str1=9734
set str2=9077
set str3=0
set str4=%str1%%str2%%str3%@
:--------------------------------------
echo --------------------------------------------------------------
set str5=q
set str6=.
set str7=co
set str=%str4%%str5%%str5%%str6%%str7%m
:--------------------------------------
:--------------------------------------
echo 可--以--聯
echo 系--郵--件
echo %str%
echo --------------------------------------------------------------
pausecmd文件名-005-我可以顯示文件夾與子文件夾目錄不顯示文件.bat
dir /ad /b>name1.xls
cmd文件名-007-先去掉所在文件夾的文件名空格再列出目錄到Excel-刪除自己.bat
文件名-008-更改后綴-png改JPG.bat
ren *.png *.jpg文件名-009-文件名列目錄+刪除自己.bat
::
@echo off
echo 先去掉文件名空格再列出目錄到Excel
setlocal enabledelayedexpansionfor /f "tokens=*" %%i in ('dir/b') do (
set fn=%%i
set fn=!fn: =!
ren "%%i" !fn!
)echo 列出目錄到Excel
dir /b>name1.xls
(
del "%~f0"
exit
)文件名-010-【完美】我可以將【文件夾】目錄及子目錄[去除文件名空格]整理到-目錄表格.bat
:將以下代碼復制到txt文檔中，將txt后綴改成bat
:然后雙擊運行,就可以選擇是否去除文件名中的空格，是否生成文件夾目錄或者文件目錄
@echo off
color f2
echo 我可以將【文件夾】目錄及子目錄【去除文件名空格】整理到-目錄表格.xls
echo 下一步，選擇要執行的功能。
pause
:--------------------------------------
set str1=9734
set str2=9077
set str3=0
set str4=%str1%%str2%%str3%@
:--------------------------------------
setlocal enabledelayedexpansion
:--------------------------------------
:更改這兩個參數可以將文件名的指定字符替換成想要的字符
:被替換的字符,例如空格" "；或者其他字符，寫到=后邊；
set y=
:替換后的字符--例如將文件名中的空格" "，替換成空字符""，或者下劃線"_"
set z=""
:--------------------------------------
:--------------------------------------
:----------------------------------------------------------------------------
set f2=1
set f3=1
set f4=0
set f5=0set /p f2=生成文件夾目錄.xls--------------【1(是)/0(否)】【默認：1(是)】
set /p f3=生成所有文件夾及文件目錄.xls----【1(是)/0(否)】【默認：1(是)】
set /p f4=生成文件夾目錄樹.xls------------【1(是)/0(否)】【默認：0(否)】
set /p f5=生成所有文件夾及文件目錄樹.xls--【1(是)/0(否)】【默認：0(否)】
:----------------------------------------------------------------------------
:----------------------------------------------------------------------------
:j1
set f1=2
set /p f1=是否去除所有文件名中的空格【1(否)/2(是)】/默認【2(是)】
if %f1%==1 (
goto rem1
) else (
if %f1%==2 (
goto rem2
) else (
goto j1
)
):rem2for /f "tokens=*" %%j in ('dir/b') do (
set fn=%%j
echo 替換前：!fn!
set fn=!fn:%y%=%z%!
echo 替換后：!fn!
:將fn字符串中的每一個空格（" "）替換成空字符（""）。
ren "%%j" !fn!
)
:--------------------------------------
set pp=%~dp0
echo %pp%
:--------------------------------------
for /d /r . %%i in (*) do (:更新路徑，將有空格的路徑改為除去空格后的路徑，才能進入
for /f "tokens=*" %%l in (!i!) do (
set pt=%%l
set pt=!pt:%y%=%z%!
set i=!pt!
)
echo 路徑 %%i
cd %%i
:-------------------
for /f "tokens=*" %%j in ('dir/b') do (
set fn=%%j
echo 替換前：!fn!
set fn=!fn:%y%=%z%!
echo 替換后：!fn!
:將fn字符串中的每一個“ ”替換成“”空字符。
ren "%%j" !fn!
)
)
:------------------------------------------------------------------------------
:rem1
:--------------------------------------
echo 正在生成文件。。。。
set dd=%date:~0,4%%date:~5,2%%date:~8,2%
echo %dd%
cd %pp%
echo %pp%
if %f2%==1 (
for /d /r . %%k in (*) do echo %%k>>僅文件夾目錄-%dd%.xls
echo 已經生成【僅文件夾目錄-%dd%.xls】--包括子文件夾
)
echo --------------------------------------------------------------if %f3%==1 (
dir /b /s >所有文件目錄-%dd%.xls
echo 已經生成【所有文件目錄-%dd%.xls】--包括子文件夾
)
echo --------------------------------------------------------------
if %f4%==1 (
tree >工作報告總目錄樹-%dd%.xls
echo 已經生成【工作報告總目錄樹-%dd%.xls】--包括子文件夾
)
echo --------------------------------------------------------------
if %f5%==1 (
tree /f >文件夾及文件目錄樹-%dd%.xls
echo 已經生成【文件夾及文件目錄樹-%dd%.xls】--包括子文件夾
)
echo --------------------------------------------------------------
set str5=q
set str6=.
set str7=co
set str=%str4%%str5%%str5%%str6%%str7%m
:--------------------------------------
:--------------------------------------echo 可--以--聯
echo 系--郵--件
echo %str%
echo --------------------------------------------------------------
pause
文件名-011-刪除文件名中的空格和刪除文件名中的括號.bat
::
@echo off
setlocal enabledelayedexpansion
set str1=(
set str2=（
set str3=)
set str4=）
for /f "tokens=*" %%i in ('dir/b') do (if not "%%i"=="%~nx0" (set "fn=%%~ni"set "fn=!fn: =_!"set "fn=!fn:%str1%=%str2%!"set "fn=!fn:%str3%=%str4%!"set "fn=!fn!%%~xi"ren "%%i" "!fn!"echo "!fn!")
)set str1=<a href="http://124.239.132.135:8444/wp-content/uploads/
set str2=%date:~0,4%
set str3=%date:~5,2%
set str3=!str3:0=!
echo %str3%
cmd文件名-012-[自動化網站文章分享鏈接生成器]-在文件夾中運行即可-V1.5.bat
::
@echo off
mode con cols=50 lines=20
color 0a
setlocal enabledelayedexpansionecho --------------------------------------------
echo 【自動將文件名中的“空格”改為“下劃線”】
echo 【自動將英文的“()”改為中文的“（）”】
echo 【自動生成自動化網站分享鏈接--存儲到同目錄下的"文件鏈接.txt"可以粘貼到文章中】
echo --------------------------------------------
::echo 【請確認是否鎖定文件類型】
::echo 【0-鎖定（默認）/1-不鎖定】
::echo 【建議鎖定，這樣批量改名不會影響文件類型（后綴）】
::echo 【如果要替換文件后綴名:】
::echo 【例如：將.jgp替換成.bmp】
::echo 【請輸入1】
::echo 【回車確認】
pause
set str_type=0
::set /P str_type=【請輸入1或0，默認0】：
::set /P str_start=輸入前綴字符【空字符直接回車】：
::set /P str_end=輸入后綴字符【空字符直接回車】：::生成文件名鏈接列表
::<a href="http://124.239.132.135:8444/wp-content/uploads/2023/09/自控儀表_11-儀表工具_DO63現場校驗儀.doc">自控儀表_11-儀表工具_DO63現場校驗儀.doc</a>
set s0=http://124.239.132.135:8444/wp-content/uploads/
set s1=a href="http://124.239.132.135:8444/wp-content/uploads/
set s2=%date:~0,4%
set s3=%date:~5,2%
set s4=%s1%%s2%/%s3%/
set s04=%s0%%s2%/%s3%/
echo ^<%s4%
set s5=">
echo %s5%
set s6=/a
echo ^<%s6%^>set str1=(
set str2=（
set str3=)
set str4=）:--------------------------------------
:先去掉文件名中的空格
for /f "tokens=*" %%i in ('dir/b') do (
set fn=%%i
set fn=!fn: =_!
ren "%%i" !fn!
)
:先去掉文件名中的空格
:--------------------------------------
:--------------------------------------
:再進行替換
echo str_type=%str_type%
if %str_type%==0 (for /f "tokens=*" %%i in ('dir /b /s') do (if not "%%i"=="%~nx0" (set fn=%%~niset fn=!fn: =_!set fn=!fn:%str1%=%str2%!set "fn=!fn:%str3%=%str4%!"set fn=%str_start%!fn!%str_end%set fn=!fn!%%~xiren "%%i" !fn!:改名完成，開始生成鏈接 :用echo輸出顯示來降低代碼運行速度，否則報錯echo !fn!set "filename=%%~ni"set "extension=%%~xi"if "!extension!"==".jpg" (set new_string="<%s4%!filename!!extension!"^>!filename!!extension!^<br^>^<img src="http://124.239.132.135:8444/wp-content/uploads/%s2%/%s3%/!filename!-150x150.jpg"/^>^</a^>"set abc=!new_string!) else if "!extension!"==".mp4" (set new_string="<%s4%!filename!!extension!"^>^</a^>!filename!!extension!^<br^>^[video width="1920" height="1080" mp4="%s04%!filename!!extension!"^]^[/video^]"set abc=!new_string!) else (set abc="<%s4%!fn!%s5%!fn!<%s6%>")set abc=!abc:~1,-1!:判斷是否是單文件，通過查找"\."排除文件夾echo !fn! | findstr "\." >nul:echo !errorlevel!if !errorlevel! equ 0 (echo !abc!>>文章鏈接.txt)))
) else (
if %str_type%==1 (for /f "tokens=*" %%i in (*) do (if not "%%i"=="%~nx0" (set fn=%%iset fn=!fn: =_!set fn=!fn:%str1%=%str2%!set "fn=!fn:%str3%=%str4%!"set fn=%str_start%!fn!%str_end%ren "%%i" !fn!echo !fn!))
)
)
start 文章鏈接.txt
:--------------------------------------
:--------------------------------------
set str1=9734
set str2=9077
set str3=0
set str4=%str1%%str2%%str3%@qq
:--------------------------------------
echo %str4%com
pause::on (<a href=")(http.*)(\.jpg)(">)(.*\.jpg)(</a>) \1\2\3\4\5<br><img src="\2-150x150.jpg"/>\6 R
::on (<a href=")(http.*)(\.mp4)(">)(.*\.mp4)(</a>) \1\2\3\4\5>\6<br>[video width="1920" height="1080" mp4="\2.mp4"\]\[/video\] R文件名-012-文件名生成超鏈接-文章鏈接生成器-在文件夾中運行即可_V1.2_-_副本.bat
::
@echo off
mode con cols=50 lines=20
color 0a
setlocal enabledelayedexpansionecho --------------------------------------------
echo 【自動將文件名中的“空格”改為“下劃線”】
echo 【自動將英文的“()”改為中文的“（）”】
echo 【自動生成自動化網站分享鏈接--存儲到同目錄下的"文件鏈接.txt"可以粘貼到文章中】
echo --------------------------------------------
::echo 【請確認是否鎖定文件類型】
::echo 【0-鎖定（默認）/1-不鎖定】
::echo 【建議鎖定，這樣批量改名不會影響文件類型（后綴）】
::echo 【如果要替換文件后綴名:】
::echo 【例如：將.jgp替換成.bmp】
::echo 【請輸入1】
::echo 【回車確認】
pause
set str_type=0
::set /P str_type=【請輸入1或0，默認0】：
::set /P str_start=輸入前綴字符【空字符直接回車】：
::set /P str_end=輸入后綴字符【空字符直接回車】：::生成文件名鏈接列表
::<a href="http://124.239.132.135:8444/wp-content/uploads/2023/09/自控儀表_11-儀表工具_DO63現場校驗儀.doc">自控儀表_11-儀表工具_DO63現場校驗儀.doc</a>
set s1=a href="http://124.239.132.135:8444/wp-content/uploads/
set s2=%date:~0,4%
set s3=%date:~5,2%
set s4=%s1%%s2%/%s3%/
echo ^<%s4%
set s5=">
echo %s5%
set s6=/a
echo ^<%s6%^>set str1=(
set str2=（
set str3=)
set str4=）:--------------------------------------
:先去掉文件名中的空格
for /f "tokens=*" %%i in ('dir/b') do (
set fn=%%i
set fn=!fn: =_!
ren "%%i" !fn!
)
:先去掉文件名中的空格
:--------------------------------------
:--------------------------------------
:再進行替換
echo str_type=%str_type%
if %str_type%==0 (for /f "tokens=*" %%i in ('dir /b /s') do (if not "%%i"=="%~nx0" (set fn=%%~niset fn=!fn: =_!set fn=!fn:%str1%=%str2%!set "fn=!fn:%str3%=%str4%!"set fn=%str_start%!fn!%str_end%set fn=!fn!%%~xiren "%%i" !fn!set abc="<%s4%!fn!%s5%!fn!<%s6%>"set abc=!abc:~1,-1!echo !abc!echo !fn! | findstr "\." >nulecho !errorlevel!if !errorlevel! equ 0 (echo !abc!>>文章鏈接.txt)))
) else (
if %str_type%==1 (for /f "tokens=*" %%i in (*) do (if not "%%i"=="%~nx0" (set fn=%%iset fn=!fn: =_!set fn=!fn:%str1%=%str2%!set "fn=!fn:%str3%=%str4%!"set fn=%str_start%!fn!%str_end%ren "%%i" !fn!echo !fn!))
)
)
start 文章鏈接.txt
:--------------------------------------
:--------------------------------------
set str1=9734
set str2=9077
set str3=0
set str4=%str1%%str2%%str3%@
:--------------------------------------
echo %str4%com
pause::on (<a href=")(http.*)(\.jpg)(">)(.*\.jpg)(</a>) \1\2\3\4\5<br><img src="\2-150x150.jpg"/>\6 R
::on (<a href=")(http.*)(\.mp4)(">)(.*\.mp4)(</a>) \1\2\3\4\5>\6<br>[video width="1920" height="1080" mp4="\2.mp4"\]\[/video\] R文件名-013-文件名中前綴文件路徑.bat
::
@echo off
mode con cols=100 lines=20
color 0a
setlocal enabledelayedexpansionrem 設置文件夾路徑
echo 【嚴重警告！該軟件是在文件名前增加前綴，前綴內容是文件的路徑。】
echo 【嚴重警告！操作不可逆轉，務必將軟件與重命名的文件放在一個文件夾中】
echo 默認文件夾路徑：(%~dp0)
echo 如果需要更改文件夾路徑請按提示粘貼文件夾路徑
set /p "folderPath=默認文件夾路徑：(%~dp0)" || set "folderPath=%~dp0"
cd "%folderPath%"
echo %folderPath%
rem 嚴禁操作C盤
echo !folderPath! | findstr "C:" >nul
echo %errorlevel%
pause
if %errorlevel% equ 0 (echo 禁止操作C盤pausegoto jump
)
echo !folderPath! | findstr "c:" >nul
echo %errorlevel%
pause
if %errorlevel% equ 0 (echo 禁止操作C盤pausegoto jump
)
rem 循環遍歷文件夾中的所有文件
for /r %%I in (*) do (rem 獲取文件名和文件路徑set "filename=%%~nxI"set "filepath=%%~dpI"rem echo 文件路徑和文件名：!filepath!!filename!rem 前綴文件路徑,為文件重命名做準備set "QianZhui=!filepath: =_!"set "QianZhui=!QianZhui:(=（!"set "QianZhui=!QianZhui:)=）!"set "QianZhui=!QianZhui:\=_!"set "QianZhui=!QianZhui:/=_!"set "QianZhui=!QianZhui::=_!"set "QianZhui=!QianZhui:-=_!"set "QianZhui=!QianZhui:__=_!"set "QianZhui=!QianZhui:~0,-1!"rem 查找文件名是否包含路徑，如果包含說明已經重命名過不再重命名，如果沒有路徑，則重命名增加路徑前綴。set "input_string=!filename!"set "search_string=!QianZhui!"rem 查找路徑指令，查找結果，不存在=1，存在=0，存入findstr的errorlevel變量echo !input_string! | findstr !search_string! >nulif errorlevel 1 (echo The search string does not exist in the input string.rem 在此處編寫需要執行的程序rem 替換文件名中的空格和特殊字符為下劃線set "newFilename=!filename: =_!"set "newfilename=!newfilename:(=（!"set "newFilename=!newFilename:)=）!"set "newFilename=!newFilename:\=_!"set "newFilename=!newFilename:/=_!"set "newFilename=!newFilename::=_!"set "newFilename=!newFilename:-=_!"set "newFilename=!newFilename:__=_!"rem 新文件名：set "newFilename=!QianZhui!_!newFilename!"rem set "newFilename=!newFilename:__=_!"rem 重命名文件echo 原文件名：!filepath!!filename!echo 新文件名：!newfilename!if not "!filename!"=="%~nx0" (ren !filepath!!filename! !newFilename!)) else (echo 文件已經重命名rem 如果存在需要跳過的話，不需要編寫任何代碼)
)
echo 改名完成!
pause
:jump系統-00001-windows常用功能.bat
::
@echo off
:menu
cls
echo 0：返回
echo 1：打開服務 services.msc
echo 2：打開注冊表 regedit
echo 3：打開事件管理器 eventvwr.msc
echo 4: 打開網絡適配器set /p a=請輸入以上數字:if "%a%"=="0" (goto menu
) else if "%a%"=="1" (start services.mscgoto menu
) else if "%a%"=="2" (start regeditgoto menu
) else if "%a%"=="3" (start eventvwr.mscgoto menu
) else if "%a%"=="4" (start ncpa.cplgoto menu
) else (echo 輸入的數字無效，請重新運行腳本并輸入1、2、3或4。goto menu
)pause系統-001-解決內存不能read.cmd
for %1 in (%windir%\system32\*.dll) do regsvr32.exe /s %1系統-002-殺手-進程.bat
::
@echo off
setlocal enabledelayedexpansion
::mode con cols=30 lines=5 & color 0A
color 0A
echo ==殺手48==
echo ×××××××××
echo ==殺迅雷進程==
taskkill /IM APlayer.exe /T /F
taskkill /IM BrowserSupport.exe /T /F
taskkill /IM HostProcess.exe /T /F
taskkill /IM InstallXLGuard.exe /T /F
taskkill /IM InstallXLWFP.exe /T /F
taskkill /IM KankanLiteLiveUD.exe /T /F
taskkill /IM KanKanLive.exe /T /F
taskkill /IM KKV.exe /T /F
taskkill /IM LiveUDInstaller.exe /T /F
taskkill /IM PerformanceServer.exe /T /F
taskkill /IM PutDeskLnk.exe /T /F
taskkill /IM SendStaticsRequest.exe /T /F
taskkill /IM TDPRepair.exe /T /F
taskkill /IM Thunder.exe /T /F
taskkill /IM ThunderCmd.exe /T /F
taskkill /IM ThunderExternal.exe /T /F
taskkill /IM ThunderFW.exe /T /F
taskkill /IM ThunderLiveUD.exe /T /F
taskkill /IM ThunderNewTask.exe /T /F
taskkill /IM ThunderNewTaskShell.exe /T /F
taskkill /IM ThunderPlatform.exe /T /F
taskkill /IM ThunderPreload.exe /T /F
taskkill /IM ThunderRegRepair.exe /T /F
taskkill /IM ThunderRepair.exe /T /F
taskkill /IM ThunderServiceLite.exe /T /F
taskkill /IM ThunderShell.exe /T /F
taskkill /IM ThunderUninstall.exe /T /F
taskkill /IM Uninst.exe /T /F
taskkill /IM UnInstall.exe /T /F
taskkill /IM UninstallXLWFP.exe /T /F
taskkill /IM upnp.exe /T /F
taskkill /IM Win7AppId.exe /T /F
taskkill /IM XBrowser.exe /T /F
taskkill /IM xinstaller.exe /T /F
taskkill /IM xl_ext_chrome_setup.exe /T /F
taskkill /IM XLBugReport.exe /T /F
taskkill /IM XLLiveUD.exe /T /F
taskkill /IM XLServicePlatform.exe /T /F
taskkill /IM XLStartKankan.exe /T /F
taskkill /IM XLStatSendApp.exe /T /F
taskkill /IM XLUEOPS.exe /T /F
taskkill /IM XLWFPSetup.exe /T /F
taskkill /IM Xmp.exe /T /F
echo ==殺qq進程==
taskkill /IM QQProtect.exe /T /F
echo ==殺愛奇藝進程
taskkill /IM VM332_STI.EXE /T /F
taskkill /IM QyKernel.exe /T /F
taskkill /IM QiyiService.exe /T /F
taskkill /IM CrashReport.exe /T /F
taskkill /IM DestopClean.exe /T /F
taskkill /IM QiyiDACL.exe /T /F
taskkill /IM QiyiService.exe /T /F
taskkill /IM QyClient.exe /T /F
taskkill /IM QyFragment.exe /T /F
taskkill /IM QyFrame.exe /T /F
taskkill /IM QyKernel.exe /T /F
taskkill /IM QyPlayer.exe /T /F
taskkill /IM QyUninst.exe /T /F
taskkill /IM Qy_plugin.exe /T /F
taskkill /IM win7feature.exe /T /F
taskkill /IM GeePlayer.exe /T /F
taskkill /IM GeePlayerUninst.exe /T /F
echo ==殺QQ進程
taskkill /IM auclt.exe /T /F
taskkill /IM bugreport.exe /T /F
taskkill /IM maLauncher.exe /T /F
taskkill /IM maUpdat.exe /T /F
taskkill /IM QPerfHelper.exe /T /F
taskkill /IM QQ.exe /T /F
taskkill /IM QQApp.exe /T /F
taskkill /IM QQCallgz.exe /T /F
taskkill /IM QQExternal.exe /T /F
taskkill /IM QQPcmgrDownload.exe /T /F
taskkill /IM QQSafeUD.exe /T /F
taskkill /IM QQScLauncher.exe /T /F
taskkill /IM QQUrlMgr.exe /T /F
taskkill /IM StorageTool.exe /T /F
taskkill /IM Tencentdl.exe /T /F
taskkill /IM Timwp.exe /T /F
taskkill /IM TXPlatform.exe /T /F
echo ==殺系統進程
taskkill /IM Fuel.Service.exe /T /Fecho ==查殺進程完畢==
echo ==QQ群：大共享時代--數據 261947398==
ping 10.252.252.252 -n 1 -w 5000 1>nul 2>nul
系統-003-殺手-singress殺手.bat
::
@echo off
setlocal enabledelayedexpansion
::mode con cols=30 lines=5 & color 0A
color 0A
echo ==殺手47==
echo ==殺掉后臺無用進程==
echo ==會殺掉qq和云盤謹慎使用==
ping 10.252.252.252 -n 1 -w 5000 1>nul 2>nul
echo ×××××××××
echo ==殺迅雷進程==
taskkill /IM APlayer.exe /T /F
taskkill /IM BrowserSupport.exe /T /F
taskkill /IM HostProcess.exe /T /F
taskkill /IM InstallXLGuard.exe /T /F
taskkill /IM InstallXLWFP.exe /T /F
taskkill /IM KankanLiteLiveUD.exe /T /F
taskkill /IM KanKanLive.exe /T /F
taskkill /IM KKV.exe /T /F
taskkill /IM LiveUDInstaller.exe /T /F
taskkill /IM PerformanceServer.exe /T /F
taskkill /IM PutDeskLnk.exe /T /F
taskkill /IM SendStaticsRequest.exe /T /F
taskkill /IM TDPRepair.exe /T /F
taskkill /IM Thunder.exe /T /F
taskkill /IM ThunderCmd.exe /T /F
taskkill /IM ThunderExternal.exe /T /F
taskkill /IM ThunderFW.exe /T /F
taskkill /IM ThunderLiveUD.exe /T /F
taskkill /IM ThunderNewTask.exe /T /F
taskkill /IM ThunderNewTaskShell.exe /T /F
taskkill /IM ThunderPlatform.exe /T /F
taskkill /IM ThunderPreload.exe /T /F
taskkill /IM ThunderRegRepair.exe /T /F
taskkill /IM ThunderRepair.exe /T /F
taskkill /IM ThunderServiceLite.exe /T /F
taskkill /IM ThunderShell.exe /T /F
taskkill /IM ThunderUninstall.exe /T /F
taskkill /IM Uninst.exe /T /F
taskkill /IM UnInstall.exe /T /F
taskkill /IM UninstallXLWFP.exe /T /F
taskkill /IM upnp.exe /T /F
taskkill /IM Win7AppId.exe /T /F
taskkill /IM XBrowser.exe /T /F
taskkill /IM xinstaller.exe /T /F
taskkill /IM xl_ext_chrome_setup.exe /T /F
taskkill /IM XLBugReport.exe /T /F
taskkill /IM XLLiveUD.exe /T /F
taskkill /IM XLServicePlatform.exe /T /F
taskkill /IM XLStartKankan.exe /T /F
taskkill /IM XLStatSendApp.exe /T /F
taskkill /IM XLUEOPS.exe /T /F
taskkill /IM XLWFPSetup.exe /T /F
taskkill /IM Xmp.exe /T /F
echo ==殺qq進程==
taskkill /IM QQProtect.exe /T /F
echo ==殺愛奇藝進程
taskkill /IM VM332_STI.EXE /T /F
taskkill /IM QyKernel.exe /T /F
taskkill /IM QiyiService.exe /T /F
taskkill /IM CrashReport.exe /T /F
taskkill /IM DestopClean.exe /T /F
taskkill /IM QiyiDACL.exe /T /F
taskkill /IM QiyiService.exe /T /F
taskkill /IM QyClient.exe /T /F
taskkill /IM QyFragment.exe /T /F
taskkill /IM QyFrame.exe /T /F
taskkill /IM QyKernel.exe /T /F
taskkill /IM QyPlayer.exe /T /F
taskkill /IM QyUninst.exe /T /F
taskkill /IM Qy_plugin.exe /T /F
taskkill /IM win7feature.exe /T /F
taskkill /IM GeePlayer.exe /T /F
taskkill /IM GeePlayerUninst.exe /T /F
echo ==殺QQ進程
taskkill /IM auclt.exe /T /F
taskkill /IM bugreport.exe /T /F
taskkill /IM maLauncher.exe /T /F
taskkill /IM maUpdat.exe /T /F
taskkill /IM QPerfHelper.exe /T /F
taskkill /IM QQ.exe /T /F
taskkill /IM QQApp.exe /T /F
taskkill /IM QQCallgz.exe /T /F
taskkill /IM QQExternal.exe /T /F
taskkill /IM QQPcmgrDownload.exe /T /F
taskkill /IM QQSafeUD.exe /T /F
taskkill /IM QQScLauncher.exe /T /F
taskkill /IM QQUrlMgr.exe /T /F
taskkill /IM StorageTool.exe /T /F
taskkill /IM Tencentdl.exe /T /F
taskkill /IM Timwp.exe /T /F
taskkill /IM TXPlatform.exe /T /F
echo ==殺系統進程
taskkill /IM Fuel.Service.exe /T /F
echo ==殺優酷進程
taskkill /IM ffmpeg.exe /T /F
taskkill /IM iku_startpic.exe /T /F
taskkill /IM insdaynum.exe /T /F
taskkill /IM repaire.exe /T /F
taskkill /IM uninstall.exe /T /F
taskkill /IM WebServe.exe /T /F
taskkill /IM YoukuDesktop.exe /T /F
taskkill /IM YoukuDoctor.exe /T /F
taskkill /IM YoukuNplayer.exe /T /F
taskkill /IM youkupage.exe /T /F
taskkill /IM ytpage.exe /T /F
taskkill /IM YoukuMediaCenter.EXE /T /F
echo ==殺百度云進程
taskkill /IM autoDiagnoseUpdate.exe /T /F
taskkill /IM Autoupdate.exe /T /F
taskkill /IM BaiduNetdisk.exe /T /F
taskkill /IM BugReport.exe /T /F
taskkill /IM HelpUtility.exe /T /F
taskkill /IM kernelUpdate.exe /T /F
taskkill /IM ServiceAssistans.exe /T /F
taskkill /IM uninst.exe /T /F
taskkill /IM YunDetectService.exe /T /F
taskkill /IM YunUtilityService.exe /T /Fecho ==殺淘寶進程taobaoprotect
taskkill /IM TBSecSvc.exe /T /F
taskkill /IM AliMiserUpdate.exe /T /Fecho ==殺360迷你wifi
taskkill /IM 360AP.exe /T /FECHO ==殺小米手機助手miphonemanager
TASKKILL /IM 7za.exe /T /F
TASKKILL /IM aapt.exe /T /F
TASKKILL /IM adb.exe /T /F
TASKKILL /IM CrashSender.exe /T /F
TASKKILL /IM fastboot.exe /T /F
TASKKILL /IM MiAdminHelper.exe /T /F
TASKKILL /IM MiAdminHelperX64.exe /T /F
TASKKILL /IM MiPhoneHelper.exe /T /F
TASKKILL /IM MiPhoneManager.exe /T /F
TASKKILL /IM MiUpdate.exe /T /F
TASKKILL /IM uninstall.exe /T /F
ECHO ==殺百度云盤
taskkill /IM 11.bat/T /F
taskkill /IM autoDiagnoseUpdate.exe /T /F
taskkill /IM Autoupdate.exe /T /F
taskkill /IM BaiduNetdisk.exe /T /F
taskkill /IM BugReport.exe /T /F
taskkill /IM HelpUtility.exe /T /F
taskkill /IM kernelUpdate.exe /T /F
taskkill /IM name.xls /T /F
taskkill /IM ServiceAssistans.exe /T /F
taskkill /IM uninst.exe /T /F
taskkill /IM YunDetectService.exe /T /F
taskkill /IM YunUtilityService.exe /T /Fecho ==查殺進程完畢==
echo ==QQ群：大共享時代--數據 261947398==
ping 10.252.252.252 -n 1 -w 5000 1>nul 2>nul
系統-003-殺手-代號47.bat
::
@echo off
setlocal enabledelayedexpansion
::mode con cols=30 lines=5 & color 0A
color 0A
set n=0
:abc
set /a n+=1
if %n%==10000 exit
ping 10.252.252.252 -n 1 -w 2000 1>nul 2>nul
taskkill /IM nac_agent.exe /T /F
taskkill /IM nac_monitor.exe /T /F
taskkill /IM Ingress.exe /T /F
goto abc
系統-003-殺手-代號48-殺服務.bat
::
@echo off
setlocal enabledelayedexpansion
::mode con cols=30 lines=5 & color 0A
color 0A
echo ==殺手47==
echo ==后臺無用進程==
echo ==會qq和云盤謹慎使用==
ping 10.252.252.252 -n 1 -w 5000 1>nul 2>nul
echo ×××××××××
echo ==殺雷進程==
taskkill /IM APlayer.exe /T /F
taskkill /IM BrowserSupport.exe /T /F
taskkill /IM HostProcess.exe /T /F
taskkill /IM InstallXLGuard.exe /T /F
taskkill /IM InstallXLWFP.exe /T /F
net stop XLServicePlatform
echo ==殺win10自動升級服務
net stop wuauserv
net stop UsoSvcecho ==查殺進程完畢==
echo ==QQ群：大共享時代--數據 261947398==
ping 10.252.252.252 -n 1 -w 5000 1>nul 2>nul
系統-004-讓電腦跳過11：11這個時間點.bat
::
@echo off
setlocal enabledelayedexpansion
mode con cols=30 lines=5 & color 0A
::程序一個空格也不能錯，否則無法運行！
::只有hour和min兩個參數可以修改。
::從此和11:11說再見
::輸入你不想看到的電腦時間點：
::輸入小時數默認是11:11
set /a hour=11
::輸入分鐘數
set /a min=11
::tt的含義是每隔tt秒檢測一次
set /a tt=30
echo 這個文件可以用記事本編輯
echo 10秒后繼續
ping 10.252.252.252 -n 1 -w 10000 1>nul 2>nul
set /a min1=%min%-1
set /a min2=%min%+2:timeloop
ping 10.252.252.252 -n 1 -w 800 1>nul 2>nul
set /a n+=1
cls
echo %time:~0,8%
echo ...
echo n=!n!if %n% GEQ %tt% (goto timejump) else (
goto timeloop):timejump
if %time:~0,2% EQU %hour% (
set /a tt=30
if %time:~3,2% EQU %min1% (
set /a tt=1)
if %time:~3,2% EQU %min% (
time 11:12
goto loop1) else (
cls
echo %time:~0,8%
echo ...
echo n=!n!
set /a n=0
goto timeloop)) else (
cls
set /a tt=600
echo %time:~0,8%
echo ...
echo n=!n!
set /a n=0
goto timeloop
)
pause:loop1
ping 10.252.252.252 -n 1 -w 800 1>nul 2>nul
set /a m+=1
cls
set /a mm=60-%time:~6,2%
echo 時間%mm%后與網絡同步
if %mm% LEQ 10 (goto update) else (
goto loop1):update
if %time:~3,2% EQU %min2% (
::net time /setsntp:time.Windows.com
::net stop w32time & net start w32time
net time /setsntp:time-nw.nist.gov
net stop w32time & net start w32time
cls
echo 時間和網絡同步完成
cls
echo 如果時間錯誤，沒關系！
echo 30秒后系統會自動更正。
ping 10.252.252.252 -n 1 -w 30000 1>nul 2>nul
goto timeloop) else (
set /a m=0
goto loop1
)=====大數據時代共享QQ群427248225====系統-004-殺手-殺某雷和愛某藝.bat
::
@echo off
setlocal enabledelayedexpansion
::mode con cols=30 lines=5 & color 0A
color 0A
echo ==殺手48==
echo ×××××××××
echo ==殺雷進程==
taskkill /IM APlayer.exe /T /F
taskkill /IM BrowserSupport.exe /T /F
taskkill /IM HostProcess.exe /T /F
taskkill /IM InstallXLGuard.exe /T /F
taskkill /IM InstallXLWFP.exe /T /F
taskkill /IM KankanLiteLiveUD.exe /T /F
taskkill /IM KanKanLive.exe /T /F
taskkill /IM KKV.exe /T /F
taskkill /IM LiveUDInstaller.exe /T /F
taskkill /IM PerformanceServer.exe /T /F
taskkill /IM PutDeskLnk.exe /T /F
taskkill /IM SendStaticsRequest.exe /T /F
taskkill /IM TDPRepair.exe /T /F
taskkill /IM Thunder.exe /T /F
taskkill /IM ThunderCmd.exe /T /F
taskkill /IM ThunderExternal.exe /T /F
taskkill /IM ThunderFW.exe /T /F
taskkill /IM ThunderLiveUD.exe /T /F
taskkill /IM ThunderNewTask.exe /T /F
taskkill /IM ThunderNewTaskShell.exe /T /F
taskkill /IM ThunderPlatform.exe /T /F
taskkill /IM ThunderPreload.exe /T /F
taskkill /IM ThunderRegRepair.exe /T /F
taskkill /IM ThunderRepair.exe /T /F
taskkill /IM ThunderServiceLite.exe /T /F
taskkill /IM ThunderShell.exe /T /F
taskkill /IM ThunderUninstall.exe /T /F
taskkill /IM Uninst.exe /T /F
taskkill /IM UnInstall.exe /T /F
taskkill /IM UninstallXLWFP.exe /T /F
taskkill /IM upnp.exe /T /F
taskkill /IM Win7AppId.exe /T /F
taskkill /IM XBrowser.exe /T /F
taskkill /IM xinstaller.exe /T /F
taskkill /IM xl_ext_chrome_setup.exe /T /F
taskkill /IM XLBugReport.exe /T /F
taskkill /IM XLLiveUD.exe /T /F
taskkill /IM XLServicePlatform.exe /T /F
taskkill /IM XLStartKankan.exe /T /F
taskkill /IM XLStatSendApp.exe /T /F
taskkill /IM XLUEOPS.exe /T /F
taskkill /IM XLWFPSetup.exe /T /F
taskkill /IM Xmp.exe /T /F
echo ==殺愛奇藝進程
taskkill /IM VM332_STI.EXE /T /F
taskkill /IM QyKernel.exe /T /F
taskkill /IM QiyiService.exe /T /F
taskkill /IM CrashReport.exe /T /F
taskkill /IM DestopClean.exe /T /F
taskkill /IM QiyiDACL.exe /T /F
taskkill /IM QiyiService.exe /T /F
taskkill /IM QyClient.exe /T /F
taskkill /IM QyFragment.exe /T /F
taskkill /IM QyFrame.exe /T /F
taskkill /IM QyKernel.exe /T /F
taskkill /IM QyPlayer.exe /T /F
taskkill /IM QyUninst.exe /T /F
taskkill /IM Qy_plugin.exe /T /F
taskkill /IM win7feature.exe /T /F
taskkill /IM GeePlayer.exe /T /F
taskkill /IM GeePlayerUninst.exe /T /Fecho ==查殺進程完畢==
ping 10.252.252.252 -n 1 -w 5000 1>nul 2>nul
系統-005-從此讓電腦跳過11：11這個時間.bat
::
@echo off
setlocal enabledelayedexpansion
echo 在11:11時間把電腦時間改成11:12
at 11:11 "time 11:12"::==LONGINNUS=大數據共享群=427248225==
系統-006-電腦時間靜止00：00.bat
::
@echo off
setlocal enabledelayedexpansion
mode con cols=18 lines=4 & color 0A
set /a n=1
set /a m=1
time 00:00:loop
ping 10.252.252.252 -n 1 -w 1000 1>nul 2>nul
set /a n+=1
cls
echo 時間靜止在00:00
echo n=!n!
echo m=!m!
if !n!==30 goto cls_time
goto loop:cls_time
cls
echo 時間靜止在00:00
echo n=!n!
echo m=!m!
time 00:00
set /a m+=1
set /a n=0
goto loop::==LONGINNUS=大數據共享群=427248225==
系統-007-定時提醒功能.bat
::
@echo off
title 提醒
mode con cols=35 lines=6 & color 5B
echo 輸入分鐘數
set /p min=
echo 輸入秒數
set /p s=
clsecho 程序開始時間: %time%
set /a ss=%s%*1000
set /a mins=%min%*60*1000set /a tt=%mins%+%ss%ping 10.252.252.252 -n 1 -w %tt% 1>nul 2>nul
echo 當前時間%time%
mshta vbscript:msgbox("當前時間：%time% ,提醒QQ紅包",36,"恰恰")(window.close)
exit系統-008-進入cmd界面顏色改為白底黑字.bat
cmd /t:f0系統-009-去掉桌面快捷方式的小箭頭.bat
::
@echo offcolor 2reg delete HKCR\lnkfile /v IsShortcut /freg delete HKCR\piffile /v IsShortcut /freg delete HKCR\InternetShortcut /v IsShortcut /ftaskkill /f /im explorer.exe && explorer系統-010-注冊dll.bat
::
@echo 注冊api-ms-win-crt-conio-11-1-0.dll
copy dll %windir%\system32\
regsvr32 %windir%\system32\dll /s
@echo dll注冊成功
@pause系統-011禁用系統服務拒絕訪問-解決.txt
REG add "HKLM\SYSTEM\CurrentControlSet\Services\WaaSMedicSvc" /v "Start" /t REG_DWORD /d "4"
然后FailureActions 二進制數據0010 0018 左起第5個數值選中，由01改為00，保存。
禁用Windows Update Medic Service
屬性 三次失敗后動作為無。系統-011-已安裝程序列表.cmd
::
@echo off
setlocal ENABLEDELAYEDEXPANSION
chcp 65001 > nul
pushd %~dp0::-code-::
::By lifenjoiner
set RF="安裝程序列表%computername%.log"
cd.>%RF%echo.【IP相關信息：】>>%RF%ipconfig /all >>%RF%::64位系統的32位子系統
if "%PROCESSOR_ARCHITECTURE%"=="AMD64" (set RKey=HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstallecho [32 bit SoftWares]>>%RF%call :GetItecho.>>%RF%
)
::主系統
set RKey=HKEY_LOCAL_MACHINE\software\microsoft\windows\currentversion\uninstall
if "%PROCESSOR_ARCHITECTURE%"=="AMD64" (echo [64 bit SoftWares]>>%RF%
) else (echo [32 bit SoftWares]>>%RF%
)
call :GetIt
set RKey=
set RF=
::-code-:::Exit
popd
endlocal
exit /b:GetIt
for /f "usebackq eol=! delims=" %%i in (`reg query %RKey%`) do (set iKey=%%iset iKey=!iKey:%RKey%\=!echo !iKey!for /f "usebackq eol=! delims=" %%I in (`"reg query %RKey%\!iKey! /v DisplayName 2>nul"`) do (set /a n+=1set iName=%%Iset iName=!iName:%RKey%\=!set iName=!iName:DisplayName=%!set iName=!iName:REG_SZ=%!if !n!==2 (for /f "skip=1 tokens=3 usebackq eol=! delims= " %%j in (`"reg query %RKey%\!iKey! /v DisplayVersion 2>nul"`) do (echo !iName! [版本 %%j]>>%RF%set iVer=)) else echo !iName!>>%RF%set iName=)set iKey=&set n=
)
exit /b系統-012-恢復【快捷方式小箭頭】.bat
reg delete "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Shell Icons" /v 29 /f
taskkill /f /im explorer.exe
attrib -s -r -h "%userprofile%\AppData\Local\iconcache.db"
del "%userprofile%\AppData\Local\iconcache.db" /f /q
start explorer
pause系統-013-防止win10升級.bat
REG add "HKLM\SYSTEM\CurrentControlSet\Services\WaaSMedicSvc" /v "Start" /t REG_DWORD /d "4" /fecho 計算機\HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\WaaSMedicSvc\FailureActions
echo 0010和0018的第5列的一組數都改成0
pause系統-win10增加密碼1.bat
::
echo off
echo 設置新密碼1
net user Administrator 1
echo 密碼已成功設置。
pause
