@echo on
:: 注意：所讀取的txt文本文件編碼必須為ANSI，其它格式（含UTF-8）顯示為亂碼。
:: Attention: The encoding of the read txt text file must be ANSI, other formats (including UTF-8) will display as garbled text.

:: 將當前目錄下所有txt文件重命名為dept_list.txt
:: Rename all txt files in the current directory to dept_list.txt
Ren *.txt dept_list.txt

@echo off
:: 關閉命令回顯，使界面更整潔
:: Turn off command echoing for cleaner output

:: 跳轉到Note標簽（注意：此處Goto Note會跳過后續(xù)代碼）
:: Jump to the Note label (Note: this Goto Note will skip subsequent code)
Goto Note

:: 以下為被跳過的注釋說明（實際不會執(zhí)行）
:: The following are skipped comments (not actually executed)
新文件名前不可以加上盤符和路徑，因為該命令只能對同一盤上的文件更換文件名;
允許使用通配符更改一組文件名或擴展名;
不能為要修改的目標文件指定新的盤符和文件夾;

:note
:: 定義標簽，作為代碼跳轉的目標位置
:: Define a label as the target position for code jumping

:: 循環(huán)讀取dept_list.txt文件中的每一行
:: Loop through each line in dept_list.txt file
for /f "delims=" %%a in (dept_list.txt) do (
    :: 開啟局部環(huán)境變量，避免變量污染
    :: Start local environment variables to avoid variable pollution
    setlocal
    
    :: 將當前行內容賦值給變量str
    :: Assign the current line content to variable str
    set "str=%%a"
    
    :: 使用當前行內容作為文件夾名創(chuàng)建目錄
    :: Create directory using current line content as folder name
    md "%%a"
    
    :: 結束局部環(huán)境變量，恢復原始環(huán)境
    :: End local environment variables, restore original environment
    endlocal
)

:: 暫停并顯示"請按任意鍵繼續(xù)..."，然后退出腳本
:: Pause and display "Press any key to continue..." then exit the script
Pause&Exit

:: 以下代碼不會被執(zhí)行，因為前面已經退出
:: The following code will not be executed because of previous exit
Goto Note

:: 關于setlocal和endlocal的詳細說明：
:: Detailed explanation about setlocal and endlocal:
:: setlocal與endlocal相當于一個局部變量，只不過它繼承了原來老的變量中的值。
:: setlocal就是開啟環(huán)境變量本地化，其實就是說當開啟這個命令后，所有新設置的環(huán)境變量都只在本次運行時有效，
:: 而endlocal則是結束環(huán)境變量本地化，當然必須先是開啟了才會起作用，當運行endlocal后，先前設置的所有變量將會被清空。

:: setlocal 或 endlocal 的情況是：
:: The situations for setlocal or endlocal are:
:: 1、變量延遲開關
::    Variable delayed expansion switch
::    setlocal enabledelayedexpansion
::    開啟變量延遲
::    Enable variable delayed expansion
::    setlocal disabledelayedexpansion
::    關閉變量延遲
::    Disable variable delayed expansion
:: 2、變量本地化 如：
::    Variable localization example:

set v=123
echo %v%
pause
setlocal
set v=abc
echo %v%
pause
endlocal
echo %v%

:Note
:: 另一個標簽，用于代碼組織
:: Another label for code organization

for /f "options" %%variable in (file) do command

@echo off
setlocal enabledelayedexpansion
set var=初始值
for /l %%i in (1,1,3) do (
    set var=新值%%i
    echo 循環(huán)內: !var!
    echo 循環(huán)內(傳統(tǒng)): %var%
)
echo 循環(huán)外: %var%
endlocal

@echo off
chcp 65001 >nul
:: 設置代碼頁為UTF-8以支持中文

:: 檢查是否存在txt文件
if not exist *.txt (
    echo 錯誤：當前目錄下沒有找到txt文件！
    pause
    exit /b 1
)

:: 重命名第一個找到的txt文件
for %%f in (*.txt) do (
    if not exist dept_list.txt (
        ren "%%f" dept_list.txt
        echo 已將"%%f"重命名為dept_list.txt
    ) else (
        echo dept_list.txt已存在，跳過重命名
    )
    goto :file_renamed
)

:file_renamed
:: 檢查目標文件是否存在
if not exist dept_list.txt (
    echo 錯誤：dept_list.txt文件不存在！
    pause
    exit /b 1
)

:: 讀取文件并創(chuàng)建文件夾
set counter=0
for /f "usebackq delims=" %%a in ("dept_list.txt") do (
    setlocal enabledelayedexpansion
    set "folderName=%%a"
    
    :: 移除可能的空白字符
    set "folderName=!folderName: =!"
    set "folderName=!folderName:    =!"
    
    if not "!folderName!"=="" (
        if not exist "!folderName!" (
            md "!folderName!"
            if exist "!folderName!" (
                echo 成功創(chuàng)建文件夾: "!folderName!"
                set /a counter+=1
            ) else (
                echo 警告：創(chuàng)建文件夾失敗: "!folderName!"
            )
        ) else (
            echo 文件夾已存在: "!folderName!"
        )
    )
    endlocal
)

echo.
echo 操作完成！共創(chuàng)建/處理 %counter% 個文件夾。
pause

:: 檢測文件編碼并轉換
certutil -f -decodehex "dept_list.txt" temp.hex >nul
findstr /c:"EF BB BF" temp.hex >nul
if %errorlevel% equ 0 (
    echo 檢測到UTF-8編碼，正在轉換...
    powershell -Command "Get-Content 'dept_list.txt' | Out-File 'dept_list_ansi.txt' -Encoding ASCII"
    move /y dept_list_ansi.txt dept_list.txt >nul
)
del temp.hex >nul 2>nul

set "logFile=create_folders_%date:~0,4%%date:~5,2%%date:~8,2%.log"
echo ===== 文件夾創(chuàng)建日志 %date% %time% ===== > "%logFile%"
echo. >> "%logFile%"

:: 在循環(huán)中添加日志記錄
md "!folderName!" 2>> "%logFile%"
if exist "!folderName!" (
    echo [成功] %date% %time% 創(chuàng)建文件夾: "!folderName!" >> "%logFile%"
) else (
    echo [失敗] %date% %time% 創(chuàng)建文件夾: "!folderName!" >> "%logFile%"
)