Board logo

标题: [文件操作] [已解决]求一个批量移动的文件的批处理 [打印本页]

作者: 511182890    时间: 2015-6-30 15:08     标题: [已解决]求一个批量移动的文件的批处理

本帖最后由 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

来位大神帮我修改一下代码
作者: Batcher    时间: 2015-6-30 17:28

  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. )
复制代码

作者: 511182890    时间: 2015-7-1 08:10

回复 2# Batcher


    重复执行的话会,变成DSN\LD\P1101\P1101\RC207+D2-P1101-LD座背分离.DSN
重复建文件夹
作者: aa77dd@163.com    时间: 2015-7-1 09:30

本帖最后由 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. )
复制代码

作者: 511182890    时间: 2015-7-1 13:49

回复 4# aa77dd@163.com


    你好,可以用了,但是必须我的文件命名规范,如果我的文件是DSN\LD\RC207+D2-P1101中国-LD座背分离.DSN
那样执行后变成DSN\LD\P1101中国\RC207+D2-P1101中国-LD座背分离.DSN
所以帮忙修改一下,只取5位
作者: aa77dd@163.com    时间: 2015-7-1 15:28

回复 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. )
复制代码

作者: 511182890    时间: 2015-7-1 17:26

本帖最后由 511182890 于 2015-7-1 17:27 编辑

回复 6# aa77dd@163.com


    可以了




欢迎光临 批处理之家 (http://www.bathome.net/) Powered by Discuz! 7.2