批处理之家 - Powered by Discuz! Board

标题: [文件操作] 批处理怎么根据文件名中的字符串将多个文件移动到同一文件夹 [打印本页]

作者: wyx567 时间: 2017-10-18 17:08 标题: 批处理怎么根据文件名中的字符串将多个文件移动到同一文件夹

怎么样让每5个文件移动到一个文件夹里

让文件夹内文件5个为一组移动到一个新文件夹里呢

作者: wyx567 时间: 2017-10-18 17:09

有几百个这样的文件

作者: Blitz 时间: 2017-10-18 18:22

本帖最后由 Blitz 于 2017-10-18 18:26 编辑

使用前先备份好自己的文件，以免造成损失

@echo off
for /f "tokens=2,3 delims=-" %%a in ('dir *.doc /b') do echo %%a-%%b>>mulu
for /f "delims=" %%i in (mulu) do if not defined %%i set %%i=A & echo %%i>>xmulu
del mulu
for /f "delims=" %%n in (xmulu) do md %%n
del xmulu
for /f "tokens=1-4 delims=-" %%f in ('dir *.doc /b') do move "%%f-%%g-%%h-%%i" "%%g-%%h"
pause
复制代码

作者: wyx567 时间: 2017-10-18 18:58

回复 3# Blitz

您好,运行后效果:

作者: wyx567 时间: 2017-10-18 19:03

文件夹不需要设置成这样,用简单的数字或者字母来做文件夹都行

非常感谢~

作者: slore 时间: 2017-10-18 19:28

其实按-分隔，取出中间40，41这种数字，按这个名字见文件夹存放就行吧，和5个没关系

作者: Blitz 时间: 2017-10-18 19:34

回复 4# wyx567

请问那些由这个批处理创建的文件夹里有没有文件？

作者: wyx567 时间: 2017-10-18 19:52

回复 7# Blitz

有,而且也是正确的文件~

作者: wyx567 时间: 2017-10-18 19:53

回复 6# slore

这样也行,就是把每个人名相同的文件放一起就好
只是正好都是5个文件而已

作者: Blitz 时间: 2017-10-18 19:59

回复 8# wyx567

那就是有一部分文件没有弄到咯，等晚上我再看看吧，现在不在电脑前

作者: wyx567 时间: 2017-10-18 20:54

回复 10# Blitz

好的,麻烦您了

作者: Blitz 时间: 2017-10-18 23:44

本帖最后由 Blitz 于 2017-10-19 07:46 编辑

回复 11# wyx567

应该可以了

@echo off&setlocal enabledelayedexpansion
for /f %%a in ('dir *.doc *.dot /b') do (
	set wj=%%~na
	set wjm=!wj:-=.!
	echo !wjm!>>mulu
)
for /f %%b in (mulu) do (
	set wj=%%~nb
	echo !wj!>>xmulu
)
del mulu
for /f %%c in (xmulu) do (
	set wj=%%~xc
	echo !wj:.=!>>cmulu
)
del xmulu
for /f "delims=" %%i in (cmulu) do if not defined %%i set %%i=A & echo %%i>>dmulu
del cmulu
for /f "delims=" %%n in (dmulu) do md %%n
for /f "delims=" %%d in (dmulu) do (
	for /f "delims=" %%e in ('dir *.doc *.dot /b^|find "%%d"') do (
		move "%%e" "%%d"
		)
)
del dmulu
pause
复制代码

作者: wyx567 时间: 2017-10-19 08:54

回复 12# Blitz

您好,测试了,还是有文件没划进去,
文件夹里有的还剩下几个文件没进去,14文件夹进去了6个文件

剩下的文件我手工弄了,还是非常感谢您
如果您有兴趣有空再编辑答案,我留了文件可以继续测试

非常感谢!

作者: lifei259 时间: 2017-10-19 09:48

本帖最后由 lifei259 于 2017-10-20 17:04 编辑

@echo off
for /f "tokens=1-4 delims=-." %%a in ('dir /b /a-d *.do*') do (
if not exist "%%c" md "%%c"
move "%%a-%%b-%%c*" "%%c"
)
pause
复制代码

作者: Blitz 时间: 2017-10-19 10:25

本帖最后由 Blitz 于 2017-10-19 10:27 编辑

回复 13# wyx567

再看看这样会不会好一点，14那个文件夹里进了6个应该是这6个文件名有一处是相同的吧，主要是这些文件的命名不统一。。。

@echo off&setlocal enabledelayedexpansion
for /f %%a in ('dir *.doc *.docx *.dot /b') do (
	set wj=%%~na
	set wjm=!wj:-=.!
	echo !wjm!>>mulu
)
for /f %%b in (mulu) do (
	set wj=%%~nb
	echo !wj!>>xmulu
)
del mulu
for /f %%c in (xmulu) do (
	set wj=%%~xc
	echo !wj:.=!>>cmulu
)
del xmulu
for /f "delims=" %%i in (cmulu) do if not defined %%i set %%i=A & echo %%i>>dmulu
del cmulu
for /f "delims=" %%n in (dmulu) do md %%n
for /f "delims=" %%d in (dmulu) do (
	for /f "delims=" %%e in ('dir *.doc *.docx *.dot /b^|find "%%d"') do (
		move "%%e" "%%d"
		)
)
del dmulu
pause
复制代码

欢迎光临批处理之家 (http://bbs.bathome.net/)