Windows常用批处理文件-复制、解压

内容转载自我的博客

目录

• 1. 批量复制文件
• 2. 批量解压文件
• 3. 批量重命名文件后缀
• 4. 解决Win10局域网共享问题（未测试）

1. 批量复制文件

创建文件copy_file.bat，内容如下，保存为ANSI编码，否则中文会乱码：

@echo off & color 0A
:: 指定起始文件夹：需要将此bat文件放在这些文件夹的同级
set DIR="%cd%"
echo 当前目录为：%DIR%
set src_dir=C:UserszfbDesktop	est
set name1=%src_dir%a.txt
set name2=%src_dir%b.txt

for /f "delims=" %%i in ('dir /ad /b /s "%DIR%"') do (
    echo 正在复制文件%name1%到文件夹%%i
    copy %name1% %%i
    echo 正在复制文件%name2%到文件夹%%i
    copy %name2% %%i
    md %%idir_new
)
pause

或者直接下载蓝奏云文件，双击即可实现功能。具体功能解释：目标文件夹的结构以及.bat文件放置如下：

|--test
|------copy_files.bat
|------file01
|------dir01
|----------dir01A
|----------dir01B
|------dir02
|----------dir01A
|----------dir01B
|----------dir01C
|------dir03
|----------file01

要将这两个文件C:UserszfbDesktop esta.txt、C:UserszfbDesktop est.txt复制到目标文件夹及其每个子目录下，另外再新建一个目录dir_new，最后效果如下：

|--test
|------copy_files.bat
|------file01
|------dir01
|----------a.txt
|----------b.txt
|----------dir_new
|----------dir01A
|--------------a.txt
|--------------b.txt
|--------------dir_new
|----------dir01B
|--------------a.txt
|--------------b.txt
|--------------dir_new
|------dir02
|----------a.txt
|----------b.txt
|----------dir_new
|----------dir01A
|--------------a.txt
|--------------b.txt
|--------------dir_new
|----------dir01B
|--------------a.txt
|--------------b.txt
|--------------dir_new
|----------dir01C
|--------------a.txt
|--------------b.txt
|--------------dir_new
|------dir03
|----------a.txt
|----------b.txt
|----------dir_new
|----------file01

2. 批量解压文件

经常会遇到下载的原始数据是按照特定规律的许多压缩包，它们可能分布在不同的文件夹下面，但是文件的扩展名是一致的。如果想要将每个压缩包解压到其所在的当前文件夹、覆盖已经解压过的文件（方便程序异常退出后重新运行）、删除解压成功的压缩包、保留解压失败的压缩包及其路径等操作，则可以新建unzip_all_files.bat文件，内容如下：

@echo off
set WinRAR="C:Program FilesWinRARWinRAR.exe"
set log_name="log.txt"
set log=%cd%%log_name%
for /r . %%a in (*.rar *.zip *.Z *.gz) do ( 
    cd "%%~pa" 
    rem auto replace files that exists
    rem x : extract
    rem -o+ : cover mode
    rem -ilog : error msg to file
    rem -inul : do not display error window
    rem -iback : run in the background
    rem -mt : thread num
    %WinRAR% x -o+ -ilog%log% -inul -iback -mt12 "%%a"
    rem last command run successfully
    if %errorlevel% == 0 (
        rem delete compress file
        del "%%a"
    )
)

或者直接下载蓝奏云文件，双击即可实现功能

3. 批量重命名文件后缀

新建文件rename_suffix.bat，内容如下：

ren *.7z *.zip

双击此文件，即可将当前目录下的所有.7z文件的扩展名修改为.zip

4. 解决Win10局域网共享问题（未测试）

创建文件fix_lan_share.bat，内容如下：

@echo off
>nul 2>&1 "%SYSTEMROOT%system32cacls.exe" "%SYSTEMROOT%system32configsystem"
setlocal enabledelayedexpansion
echo.
ver | find "10." > NUL && goto win10
 
:error
mshta vbscript:msgbox(" 脚本只适用Win10系统",vbSystemModal+64,"警告")(window.close) 
exit
 
:win10
::改写组策略
echo Windows Registry Editor Version 5.00 >%temp%smb.reg
echo. >> %temp%smb.reg
echo [HKEY_LOCAL_MACHINESOFTWAREPoliciesMicrosoftWindowsLanmanWorkstation] >> %temp%smb.reg
echo @=""  >> %temp%smb.reg
echo "AllowInsecureGuestAuth"=dword:00000001 >> %temp%smb.reg
regedit /s %temp%smb.reg
 
echo 添加smb访问组件
dism /online /format:table /get-features
dism /online /enable-feature /featurename:SMB1Protocol
 
mshta vbscript:msgbox(" 设置完成。电脑重启后生效！",vbSystemModal+64,"注意")(window.close) 
 
exit

或者直接下载蓝奏云文件，双击即可实现功能