[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

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

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

来位大神帮我修改一下代码

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

回复 6# aa77dd@163.com


    可以了

TOP

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

TOP

回复 4# aa77dd@163.com


    你好,可以用了,但是必须我的文件命名规范,如果我的文件是DSN\LD\RC207+D2-P1101中国-LD座背分离.DSN
那样执行后变成DSN\LD\P1101中国\RC207+D2-P1101中国-LD座背分离.DSN
所以帮忙修改一下,只取5位

TOP

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

TOP

回复 2# Batcher


    重复执行的话会,变成DSN\LD\P1101\P1101\RC207+D2-P1101-LD座背分离.DSN
重复建文件夹

TOP

  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. )
复制代码
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

返回列表