Windows常用批处理文件

@echo off & color 0A
REM 指定起始文件夹：需要将此bat文件放在这些文件夹的同级
set MYDIR="%cd%"
echo 当前目录为：%MYDIR%
set src_dir=C:\Users\zfb\Desktop\test-bat\
set name1=%src_dir%Fig.m
set name2=%src_dir%c.m
set name3=%src_dir%e.m
REM set name4=%src_dir%x.m
REM set name5=%src_dir%y.m
REM set name6=%src_dir%z.m

REM dir /ad /b /s "%MYDIR%"
REM 此命令会递归子目录下的文件夹
for /f "delims=" %%i in ('dir /ad /b "%MYDIR%"') do (
    echo %%i
    echo 正在复制文件%name1%到文件夹%%i
    copy %name1% %%i
    echo 正在复制文件%name2%到文件夹%%i
    copy %name2% %%i
    echo 正在复制文件%name3%到文件夹%%i
    copy %name3% %%i
    md %%i\SpectralLine\6.6MHz\High
    md %%i\SpectralLine\6.6MHz\Low
    md %%i\SpectralLine\8.0MHz\High
    md %%i\SpectralLine\8.0MHz\Low
    md %%i\SpectralLine\9.4MHz\High
    md %%i\SpectralLine\9.4MHz\Low
    md %%i\SpectralLine\PL
    echo 已创建文件夹SpectralLine
)
pause

@echo off
set WinRAR="C:\Program Files\WinRAR\WinRAR.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"
    )
)

ren *.7z *.zip

@echo off
color 0A
setlocal enabledelayedexpansion
set exe_name="C:\Program Files\Matlab\Matlab.exe"
set WORK_DIR="%cd%"
set var="%cd%""\process_matrix.mat"
REM replace all " to null
set FINAL_FILE=%var:"=%
REM replace .mat to _normal.mat
set FINAL_NORMAL_FILE=%FINAL_FILE:.mat=_normal.mat%
set var="%cd%""\log.txt"
set LOGTXT=%var:"=%
set option_load_name=

REM check if replace anyway
set isfirst=y
for %%i in (%FINAL_FILE% %FINAL_NORMAL_FILE%) do (
    if exist %%i (
        set isFirst=n
        echo %%i exists.
    )
)
REM echo "!isFirst!"
if "!isFirst!"=="n" (
    :input
        echo Press y to continue and replace it, n to exit
        set /p op=
        if "!op!"=="n" (
            echo Leave and do nothing!
            REM pause
            exit
        ) else (
            if not "!op!"=="y" (
                echo You typed incorrect key!
                goto input
            ) else (
                echo Ready to process
            )
        )
)

REM /R : recursion all subfolder, otherwise you'd better use the following format
REM don't just delete /R
REM for %%i in (c:\softwares\VisualBat\*.url) do ( echo %%i )
for /R %WORK_DIR% %%f in (*.mat) do (
    if "%%f"=="%FINAL_FILE%" (
        echo Skip add %FINAL_FILE% to Matlab
    ) else (
        if "%%f"=="%FINAL_NORMAL_FILE%" (
            echo Skip add %FINAL_NORMAL_FILE% to Matlab
        ) else (
            REM use delay var to ensure op will become long and long
            set option_load_name=!option_load_name! -O "%%f"
            echo Add %%f to Matlab
        )
    )
)
echo !option_load_name!
pause

@echo off
>nul 2>&1 "%SYSTEMROOT%\system32\cacls.exe" "%SYSTEMROOT%\system32\config\system"
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_MACHINE\SOFTWARE\Policies\Microsoft\Windows\LanmanWorkstation] >> %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