不用xcopy如何将目录下的文件及文件夹复制到别处？

wolfan

不用xcopy如何将目录下的文件及文件夹复制到别处？
用copy怎么实现呢？
还有其它方法实现吗？
求示例~

DAIC

试试 robocopy

CrLf

写了一个 :xcopy 来模拟 xcopy 的主要功能，仅粗略实现了 /s /t /y /h 四个常用选项：

1. @echo off
   
2. call :xcopy /h
   
3. rem 显示 usage
   
4. call :xcopy /t "d:\tmp" e:\test\
   
5. rem 将 d:\tmp 目录下的目录结构复制到 e:\test\ 路径下
   
6. call :xcopy /s /y "d:\tmp" e:\test\
   
7. rem 将 d:\tmp 目录下的所有文件和文件夹复制到 e:\test\ 路径下，不显示提示
   
8. pause&exit
   
9. 
   
10. :xcopy [/s] [/t] [/y] [/h] 源文件夹 目标文件夹
    
11. setlocal disabledelayedexpansion
    
12. set n=0
    
13. for %%a in (源文件夹 目标文件夹 开关[/s] 开关[/y] 开关[/t] 开关[/h]) do set "%%a="
    
14. rem 环境初始化
    
15. 
    
16. for %%a in (%*) do (
    
17.         set "开关="
    
18.         if %%a gtr / if %%a lss : set 开关=true
    
19.         if defined 开关 (
    
20.                 set 开关[%%a]=true
    
21.         ) else (
    
22.                 if not defined 源文件夹 (
    
23.                         set "源文件夹=%%~dpa"&set "源文件名=%%~nxa"
    
24.                         if exist %%~a\nul (
    
25.                                 set "源文件夹=%%~a"&set "源文件名=*"
    
26.                         )
    
27.                 ) else (
    
28.                         set "目标文件夹=%%~fa"
    
29.                         set "目标文件夹=%%~dpa"&set "目标文件名=%%~nxa"
    
30.                         if exist %%~a\nul (
    
31.                                 set "目标文件夹=%%~fa"&set "目标文件名="
    
32.                         )
    
33.                 )
    
34.         )
    
35. )
    
36. rem 解析开关和源文件夹、目标文件夹
    
37. 
    
38. if defined 开关[/h] echo call :xcopy [/s] [/t] [/y] [/h] 源文件夹 目标文件夹&exit /b
    
39. if defined 开关[/y] (set 开关[/y]=/y) else (set 开关[/y]=/-y)
    
40. if defined 开关[/s] set 开关[/s]=/r /d
    
41. if defined 开关[/t] set 开关[/s]=/r /d&set 开关[/t]=rem
    
42. rem 为各开关设置宏
    
43. 
    
44. if not defined 源文件夹 exit /b 1
    
45. if not defined 源文件名 set "源文件名=*"
    
46. if not defined 目标文件夹 set "目标文件夹=."
    
47. if not exist %目标文件夹% md "%目标文件夹%"||exit /b 1
    
48. rem 为未指定的 源文件夹 与 目标文件夹 变量做默认操作
    
49. 
    
50. for /f "tokens=31 delims=" %%a in (
    
51.         "%源文件夹%\30\29\28\27\26\25\24\23\22\21\20\19\18\17\16\15\14\13\12\11\10\9\8\7\6\5\4\3\2\1\0"
    
52. ) do set 源文件夹深度=%%a
    
53. rem 获取目标文件夹深度
    
54. 
    
55. pushd "%源文件夹%"
    
56. rem 切换路径
    
57. 
    
58. (for %开关[/s]% %%a in (%源文件名%) do (
    
59.                 for /f "tokens=%源文件夹深度%* delims=" %%b in ("%%a") do (
    
60.                         md "%目标文件夹%%%c" >nul
    
61.                         %开关[/t]% copy %开关[/y]%  "%源文件夹%%%c\%源文件名%"  "%目标文件夹%%%c\%目标文件名%"
    
62.                 )
    
63. )) 2>nul
    
64. rem 核心代码
    
65. 
    
66. popd
    
67. exit /b

复制代码

wolfan

回复 3# CrLf


     (●′▽｀●) (゜∀゜ノノ゛☆ 必需点个赞啊。