标题: 合并文件夹的疑问？ [打印本页]
作者: q1a2z3q1a2z3 时间: 2008-8-16 00:06 标题: 合并文件夹的疑问？
合并 D盘下 若干文件夹，因为文件夹的名字经常变动，所以感觉无从下手。
不知怎样把这些文件夹合并成一个文件夹。
作者: HAT 时间: 2008-8-16 22:44
不要重复发帖
http://www.cn-dos.net/forum/viewthread.php?tid=42191&fpage=1###
@echo off
set mypath=E:
if not exist "%mypath%\合并" (
md "%mypath%\合并"
)
for /f "tokens=*" %%a in ('dir /s /b /ad "%mypath%"') do (
if "%%a" neq "%mypath%\合并" (
for /f "tokens=*" %%b in ('dir /s /b /a-d "%%a" 2^>nul') do (
if exist "%mypath%\合并\%%~nxb" (
ren "%mypath%\合并\%%~nxb" "%%~nb.old">nul 2>nul
)
move "%%b" "%mypath%\合并">nul 2>nul
)
)
)
set mypath=E:
if not exist "%mypath%\合并" (
md "%mypath%\合并"
)
for /f "tokens=*" %%a in ('dir /s /b /ad "%mypath%"') do (
if "%%a" neq "%mypath%\合并" (
for /f "tokens=*" %%b in ('dir /s /b /a-d "%%a" 2^>nul') do (
if exist "%mypath%\合并\%%~nxb" (
ren "%mypath%\合并\%%~nxb" "%%~nb.old">nul 2>nul
)
move "%%b" "%mypath%\合并">nul 2>nul
)
)
)