找回密码
 注册
搜索
[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
查看: 31364|回复: 6

[文件操作] [已解决]求一个批量移动的文件的批处理

[复制链接]
发表于 2015-6-30 15:08:05 | 显示全部楼层 |阅读模式
本帖最后由 511182890 于 2015-7-6 08:11 编辑

DSN\KD\RC207+D2-P1101-KD座背分离无刀眼.DSN
DSN\LD\RC207+D2-P1101-LD座背分离.DSN
DSN\test.bat

test.bat的代码
  1. @echo off
  2. setlocal enabledelayedexpansion
  3. for /f "tokens=1,2* delims=-" %%i in ('dir /a-d /b /s *.DSN') do (
  4. set "n=%%j"
  5. md "!n:~,5!" 2>nul
  6. move "%%i-%%j-%%k" "!n:~,5!"
  7. )
复制代码
执行批处理,要的结果是
DSN\KD\P1101\RC207+D2-P1101-KD座背分离无刀眼.DSN
DSN\LD\P1101\RC207+D2-P1101-LD座背分离.DSN

来位大神帮我修改一下代码
发表于 2015-6-30 17:28:58 | 显示全部楼层
  1. @echo off
  2. setlocal enabledelayedexpansion
  3. for /f "tokens=1,2* delims=-" %%i in ('dir /a-d /b /s *.DSN') do (
  4.     set "n=%%j"
  5.     if not exist "!n:~,5!" (
  6.         md "%%~dpi!n:~,5!"
  7.     )
  8.     move "%%i-%%j-%%k" "%%~dpi!n:~,5!"
  9. )
复制代码
 楼主| 发表于 2015-7-1 08:10:17 | 显示全部楼层
回复 2# Batcher


    重复执行的话会,变成DSN\LD\P1101\P1101\RC207+D2-P1101-LD座背分离.DSN
重复建文件夹
发表于 2015-7-1 09:30:49 | 显示全部楼层
本帖最后由 aa77dd@163.com 于 2015-7-1 10:28 编辑

WIN7 64位 和 WIN 2003 下测试通过
  1. @echo off
  2. for /f "delims=" %%i in ('dir /a-d /b /s *.DSN') do (
  3.     for /f "tokens=2 delims=-" %%a in ("%%~nxi") do (
  4.         for %%d in ("%%~dpi\.") do (
  5.             if not "%%~nxd"=="%%a" (
  6.                 if not exist "%%~dpi%%a" md "%%~dpi%%a"
  7.                 move "%%i" "%%~dpi%%a"
  8.             )
  9.         )
  10.     )
  11. )
复制代码
 楼主| 发表于 2015-7-1 13:49:02 | 显示全部楼层
回复 4# aa77dd@163.com


    你好,可以用了,但是必须我的文件命名规范,如果我的文件是DSN\LD\RC207+D2-P1101中国-LD座背分离.DSN
那样执行后变成DSN\LD\P1101中国\RC207+D2-P1101中国-LD座背分离.DSN
所以帮忙修改一下,只取5位
发表于 2015-7-1 15:28:40 | 显示全部楼层
回复 5# 511182890

你的问题是否还会有变化, 能否一次性作出完整而清晰的描述
  1. @echo off
  2. setlocal enabledelayedexpansion
  3. for /f "delims=" %%i in ('dir /a-d /b /s *.DSN') do (
  4.     for /f "tokens=2 delims=-" %%a in ("%%~nxi") do (
  5.         set "t=%%a" & set "t=!t:~0,5!"
  6.         for %%d in ("%%~dpi\.") do (
  7.             if not "%%~nxd"=="!t!" (
  8.                 if not exist "%%~dpi!t!" md "%%~dpi!t!"
  9.                 move "%%i" "%%~dpi!t!"
  10.             )
  11.         )
  12.     )
  13. )
复制代码
 楼主| 发表于 2015-7-1 17:26:33 | 显示全部楼层
本帖最后由 511182890 于 2015-7-1 17:27 编辑

回复 6# aa77dd@163.com


    可以了
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|批处理之家 ( 渝ICP备10000708号 )

GMT+8, 2026-3-18 21:38 , Processed in 0.019331 second(s), 8 queries , File On.

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

快速回复 返回顶部 返回列表