@echo off
attrib -s -h -r -a
for /f "delims=" %%i in ('dir /a:-d/b/s') do ( move /y "%%i" "%cd%" )
for /f "delims=" %%j in ('dir /a:d/b') do ( RD /s/q "%%j" )
exit
复制代码

@echo off
attrib -s -h -r -a
for /d %%a in (*) do (
   for /f "delims=" %%b in ('dir /a /b "%%a\"') do move /y "%%b" .\
   rd "%%a"
)
复制代码

echo d|xcopy /s /h /k e:\1\2 e:\1 /ey
rd /s /q 2
复制代码

@echo off
xcopy /e /h /k /y 2 %cd%&rd /s /q 2
复制代码

folderPath = "E:\1"
subfldName = "2"
On Error Resume Next
Set fso = CreateObject("Scripting.FileSystemObject")
fso.MoveFile folderPath & "\" & subfldName & "\*", folderPath & "\"
fso.MoveFolder folderPath & "\" & subfldName & "\*", folderPath & "\"
复制代码

folderPath = "E:\123456"
On Error Resume Next
Set fso = CreateObject("Scripting.FileSystemObject")
Set Folders = fso.GetFolder(folderPath).SubFolders
for each oFolder in Folders
    fso.MoveFile oFolder.Path & "\*", folderPath & "\"
    fso.MoveFolder oFolder.Path & "\*", folderPath & "\"
    if 0=oFolder.Files.Count and 0=oFolder.SubFolders.Count then
        oFolder.Delete true
    else
        WScript.Echo oFolder.Path & "中的某些文件（夹）移动失败"
    end if
next
WScript.Echo "Done"
复制代码

@echo off
for /d %%a in (*) do (   
for /f "delims=" %%b in ('dir /a /b "%%a"') do attrib -s -h "%%b"&&move /y "%%a\%%b" .\
rd "%%a"
)
pause
复制代码

@echo off
for /d %%a in (*) do (
pushd "%%a"
for /d %%b in (*) do (   
for /f "delims=" %%c in ('dir /a /b "%%b"') do attrib -s -h "%%c"&&move /y "%%b\%%c" .\
rd "%%b"
)
popd 
)
pause
复制代码