[文件操作] 批处理怎样移动文件到第一层文件夹？

comicguests

下面的代码能移动文件到根目录，但我想移动到第一层文件夹...应该如何修改呢？
感谢关注！！

@echo off
echo 移动文件中...
for /f "delims=" %%i in ('dir *.* /a-d /s /b') do (
    if not "%%~dpi"=="%~dp0" call :movefile "%%i"
)
echo 移动文件完成！
exit
:movefile
if exist "%~dp0%~nx1" set "n="&goto renfile
move %1 "%~dp0">nul 2>nul||(attrib -r -h -s %1& move %1 "%~dp0">nul)
goto :eof
:renfile
set/a n+=1
if exist "%~dp0%~n1(%n%)%~x1" goto renfile
move %1 "%~dp0%~n1(%n%)%~x1">nul 2>nul||(
 attrib -r -h -s %1& move %1 "%~dp0%~n1(%n%)%~x1">nul)
goto :eof
复制代码

嗯，1楼所言甚是，那么，将e:\a\b\c\*里的文件，全移到e:\a里(包含b、c中全部文件）

comicguests

所以我就怀疑是不是系统的个别差异...

FOR

我也是 win7 32位旗舰版
19、24楼的代码我这里都能成功
12楼的代码能正常运行，怎么24楼的就会不行呢？？

comicguests

回复 24# FOR


    多次劳烦您，真是十分感谢，但还是只显示移动，但没有移动...是我系统问题么？
win732位旗舰版
ps：实在不行就只能放弃了...

comicguests

回复 22# powerbat

系统找不到指定的文件。
系统找不到指定的文件。
系统找不到指定的文件。
系统找不到指定的文件。
系统找不到指定的文件。
系统找不到指定的文件。
系统找不到指定的文件。
系统找不到指定的文件。
系统找不到指定的文件。
系统找不到指定的文件。
系统找不到指定的文件。
系统找不到指定的文件。
系统找不到指定的文件。
系统找不到指定的文件。
系统找不到指定的文件。
请按任意键继续. . .
复制代码

汇报结果！
执拗么...我倒是感觉自己性格不好...

FOR

再试试这个

@echo off&set /a n=1
call :Loop "%cd%"
:loop
for /f "tokens=1* delims=\" %%i in ("%~1") do (
	set /a n+=1
	if not "%%j"=="" call :Loop "%%j"
)
for /f "delims=" %%I in ('dir/b/s/a-d') do (
	for /f "tokens=%n%* delims=\" %%a in ("%%I") do (
		if not "%%b"=="" move "%%I" "%cd%\%%a"
	)
)
pause
复制代码

FOR

19楼代码我实际测试是成功的。

powerbat

@echo off
for /f "delims=" %%i in ('dir /a-d/b/s') do move "%%a"
pause
复制代码

powerbat

回复 13# comicguests


无语，没见过这么执拗的人。

comicguests

回复 19# FOR


   没有，试了一下，还是不行...

FOR

多打了个括弧，你那里没提示“以达到最大递归层”吗？

@echo off
for /f "delims=" %%i in ('dir/b/s/a-d') do (
        set "str=%%i"
        setlocal enabledelayedexpansion
        set "str=!str:*%cd%=!"
        for /f "tokens=1 delims=\" %%a in ("!str!") do (
                if not "%%i"=="!cd!\%%~nxi"  move "%%i" "!cd!\%%a"
        )
        endlocal
)
pause
复制代码

comicguests

回复 17# FOR

移动了         1 个文件。
移动了         1 个文件。
移动了         1 个文件。
移动了         1 个文件。
移动了         1 个文件。
移动了         1 个文件。
移动了         1 个文件。
移动了         1 个文件。
移动了         1 个文件。
移动了         1 个文件。
移动了         1 个文件。
请按任意键继续. . .
复制代码

运行后显示以上内容，但文件实际未移动...
但感谢帮助！！

FOR

@echo off
for /f "delims=" %%i in ('dir/b/s/a-d') do (
	set "str=%%i"
	setlocal enabledelayedexpansion
	set "str=!str:*%cd%=!"
	for /f "tokens=1 delims=\" %%a in ("!str!") do (
		if not "%%i"=="!cd!\%%~nxi" move "%%i" "!cd!\%%a"
	)
	endlocal
)
pause
复制代码

comicguests

回复 15# forfiles


    试了一下，原来是这样，感谢！！

forfiles

回复 13# comicguests


比如，你要查看C:\test的目录结构：
开始
运行
cmd
tree /f "C:\test"