77七

把文件另存为 csv格式

@echo off
setlocal enabledelayedexpansion
for /f "useback tokens=1-5 delims=," %%a in ("1.csv") do (
	set /a n+=1
	set m=%%b
	call :1 !n!
	md "%%a%%b%%c%%d%%e"
	for /l %%l in (%%b,1,!m!) do (
		set k=00%%l
		move "!k:~-3!.jpg" "%%a%%b%%c%%d%%e"
	)
)
pause & exit

	:1
	for /f "useback skip=%~1 tokens=1-5 delims=," %%a in ("1.csv") do (
		set /a m=%%b-1
		exit /b
	)
	exit /b
复制代码

77七

回复 5# liaoguinan


这样改没错的，是不是遗漏了一处？一共有两处需要修改。
   路径如果有中文，批处理需要保存为ansi编码格式。

77七

回复 9# liaoguinan


  

@echo off
if not exist "C:\Users\Administrator\Desktop\1.csv" (
	echo 找不到文件
)
pushd "C:\Users\Administrator\Desktop"
dir /b /s /a-d 1.csv
pause
复制代码

确定1.csv在desktop下吗

77七

回复 11# liaoguinan


   10楼代码，试了吗，找得到文件吗？

77七

回复 14# liaoguinan


   
那就别修改csv文件了。

@echo off
setlocal enabledelayedexpansion
for /f "useback tokens=1-5 delims=," %%a in ("1.csv") do (
	set /a n+=1
	set m=999
	call :1 !n!
	md "%%a%%b%%c%%d%%e"
	for /l %%l in (%%b,1,!m!) do (
		set k=00%%l
		if exist "!k:~-3!.jpg" (
			move "!k:~-3!.jpg" "%%a%%b%%c%%d%%e"
		)
	)
)
pause & exit

	:1
	for /f "useback skip=%~1 tokens=1-5 delims=," %%a in ("1.csv") do (
		set /a m=%%b-1
		exit /b
	)
	exit /b
复制代码

77七

回复 13# liaoguinan


   估计你的桌面文件夹要求权限？比较特殊？会修改就自己再试试，隔着屏幕实在不知道咋回事了。比如管理员运行，或者先进入路径，或者用type 试下

77七

满足14楼需要，也可以少写一个for循环。

@echo off
setlocal enabledelayedexpansion
for /f "useback tokens=1-4* delims=," %%a in (`type "1.csv" ^& echo 1^,1000`) do (
	if defined n (
		set /a m=%%b-1
		md "!f!"
		for /l %%l in (!n!,1,!m!) do (
			set k=00%%l
			if exist "!k:~-3!.jpg" (
				move "!k:~-3!.jpg" "!f!"
			)
		)
	)
	set n=%%b
	set f=%%a%%b%%c%%d%%e
)
pause & exit
复制代码