[已解决]求助批处理根据清单创建文件夹并复制文件

77七

回复 30# feiyan


   
我刚测试了一下，代码正常，1.txt是否是代码中要求的格式？

1. a|1.pdf|2*.pdf

复制代码

877

回复 31# 77七


    大佬在吗？看一下我的最新帖吧~求助您

feiyan

回复 31# 77七
这个我试了下，不知道为什么，就是1.txt 里面，如果我的文件夹和文件名多一些，第二个文件夹和之后文件夹就没有显示。当我只是个文件夹和单个文件就没有这个问题。
举例：
A|1*|2*|3*|
B|1*|2*|
C|3*|*00*|
这样也不行
A|1*||2*||3*|
B|1*||2*|
C|3*||*00*|
下面这这个模式没问题
A|1*|
B|1*|
C|3*|

77七

回复 33# feiyan


  

1. A|1*|2*|3*|

复制代码

尽量不要修改格式，虽然这样也没错，就怕把代码也随意改了，格式中包括含有空格的文件名等等，不需要加引号了。
上一个代码，我用你的格式，测试也没发现问题，
可以试试点击上一个代码的 copy 按钮 复制代码，不要选中复制。
或者试试以下的

1. @echo off
   
2. rem 文本格式 a|1.pdf|2*.pdf
   
3. rem 批处理保存为ansi编码格式
   
4. cd /d "C:\Users\Administrator\Desktop\test1"
   
5. for /f "tokens=1* delims=|" %%a in ('type "1.txt"') do (
   
6.         echo 创建文件夹 "%%a"
   
7.         md "%%a" 2>nul
   
8.         set "folder=%%a"
   
9.         set "str="
   
10.         call :1 "%%b"
    
11.         echo=
    
12. )
    
13. pause & exit
    
14. 
    
15.         :1
    
16.         if not defined str (
    
17.                 set "str=%~1"
    
18.         )
    
19.         for /f "tokens=1* delims=|" %%x in ("%str%") do (
    
20.                 echo 查找文件 "%%x"
    
21.                 if exist "D:\文件数据库\%%x" (
    
22.                         copy "D:\文件数据库\%%x" "%folder%"
    
23.                 ) else (
    
24.                         >>log.txt echo %%x
    
25.                 )
    
26.                 if "%%y" neq "" (
    
27.                         set "str=%%y"
    
28.                         goto :1
    
29.                 ) else (
    
30.                         exit /b
    
31.                 )
    
32.         )

复制代码

feiyan

回复 34# 77七 这个程序完美

feiyan

回复 34# 77七 hi 77,非常感谢，想你喝杯咖啡，给我个支付宝的二维码吧。

77七

回复 36# feiyan




谢谢！请以你的名义捐助到论坛吧！
http://bbs.bathome.net/thread-10403-1-1.html

feiyan

回复 37# 77七 如君所愿，已经向论坛捐助50元。祝77中秋快乐。

feiyan

回复 34# 77七 七七，能帮忙把添加个功能，希望能遍历查找D:文件数据库的多层子文件夹，因为有些文件在子文件夹或孙文件夹内。文件夹可能有好几层的。

77七

回复 39# feiyan


  

1. @echo off
   
2. rem 文本格式 a|1.pdf|2*.pdf
   
3. rem 批处理保存为ansi编码格式
   
4. cd /d "C:\Users\Administrator\Desktop\test1"
   
5. for /f "tokens=1* delims=|" %%a in ('type "1.txt"') do (
   
6.         echo 创建文件夹 "%%a"
   
7.         md "%%a" 2>nul
   
8.         set "folder=%%a"
   
9.         set "str="
   
10.         call :1 "%%b"
    
11.         echo=
    
12. )
    
13. pause & exit
    
14. 
    
15.         :1
    
16.         if not defined str (
    
17.                 set "str=%~1"
    
18.         )
    
19.         for /f "tokens=1* delims=|" %%x in ("%str%") do (
    
20.                 echo 查找文件 "%%x"
    
21.                 (for /f "delims=" %%i in ('dir /b /s /a-d "d:\文件数据库\%%x" 2^>nul') do (
    
22.                         copy "%%i" "%folder%"
    
23.                 )) || (
    
24.                         >>log.txt echo %%x
    
25.                 )
    
26.                 if "%%y" neq "" (
    
27.                         set "str=%%y"
    
28.                         goto :1
    
29.                 ) else (
    
30.                         exit /b
    
31.                 )
    
32.         )

复制代码

feiyan

回复 40# 77七 感谢，完美。