zxar520 当前离线
列兵
@echo off setlocal enabledelayedexpansion :: 设置父目录路径 set "ParentDir=D:\Desktop\新建文件夹" :: 清除任何可能存在的旧目录 rd /s /q "%ParentDir%\*" 2>nul :: 循环创建200个主目录,每个目录对应一个编号范围 for /l %%i in (0,1,12) do ( :: 计算子目录编号的起始值 set /a "startNumber=%%i*1000" :: 创建主目录 mkdir "%ParentDir%\%%i" 2>nul :: 如果成功创建主目录,则进入该目录并创建子目录 if exist "%ParentDir%\%%i" ( cd /d "%ParentDir%\%%i" :: 在该目录下创建从startNumber到startNumber+999的子目录 for /l %%j in (%startNumber%,1,%startNumber%+999) do ( set "subdirName=%%j" mkdir "!subdirName!" 2>nul ) :: 返回上一级目录 cd /d "%ParentDir%" ) else ( echo 无法创建主目录 "%ParentDir%\%%i" ) ) echo 创建完成。 pause复制代码
评分人数
77七 当前离线
中校
@echo off rem 批处理保存为ansi编码格式 set "ParentDir=D:\新建文件夹" rd /s /q "%ParentDir%" 2>nul md "%ParentDir%" pushd "%ParentDir%" setlocal enabledelayedexpansion for /l %%l in (0,1,100) do ( set /a n=%%l*1000,m=n+999 for /l %%k in (!n!,1,!m!) do ( md "%%l\%%k" ) ) endlocal popd pause复制代码
TOP
Five66 当前离线
上尉
aloha20200628 当前离线
rd /s /q "%ParentDir%\*" 2>nul复制代码
:: 清除任何可能存在的旧目录 cd /d "%ParentDir%" (for /f "delims=" %d in ('dir/b/ad') do rd /s/q "%~d") 2>nul复制代码