aloha20200628

回复 13# aabout2008
把当前目录（批处理脚本所在目录）整个复制过去...

@echo off
set "p86=Program Files (x86)\CorelDRAW Graphics Suite 2020\Programs64\Addons"
set "p64=Program Files\CorelDRAW Graphics Suite 2020\Programs64\Addons"
set "_d=%~p0"
set "_d=%_d:~,-1%"
(for %%d in (c: d: e: f: g:) do (
	for %%p in ("%p86%" "%p64%") do if /i exist "%%d\%%~p" (
		md "%%d\%%~p%_d%"
		xcopy /s/q/y "%_d%" "%%d\%%~p%_d%"
	)
)) 2>nul
exit/b
复制代码

aloha20200628

回复 15# aabout2008

再加一步目录提纯...订正代码如下

@echo off
set "p86=Program Files (x86)\CorelDRAW Graphics Suite 2020\Programs64\Addons"
set "p64=Program Files\CorelDRAW Graphics Suite 2020\Programs64\Addons"
set "_d=%~p0"
for %%p in ("%_d:~,-1%") do set "_d=%%~nxp"
(for %%d in (c: d: e: f: g:) do (
	for %%p in ("%p86%" "%p64%") do if /i exist "%%d\%%~p" (
		md "%%d\%%~p%_d%"
		xcopy /s/q/y "%_d%" "%%d\%%~p%_d%"
	)
)) 2>nul
exit/b
复制代码

aloha20200628

回复 15# aabout2008

根据楼主的最新回复，订正代码如下...应该能给一个圆满的解答了

@echo off
set "p86=Program Files (x86)\CorelDRAW Graphics Suite 2020\Programs64\Addons"
set "p64=Program Files\CorelDRAW Graphics Suite 2020\Programs64\Addons"
set "_d=%~p0"
for %%p in ("%_d:~,-1%") do set "_d=%%~nxp"
(for %%d in (c: d: e: f: g:) do (
	for %%p in ("%p86%" "%p64%") do if /i exist "%%d\%%~p" (
		xcopy /s/f/i/y "." "%%d\%%~p\%_d%\"
	)
)) 2>nul
pause&exit/b
复制代码

aloha20200628

24楼代码可以实时屏显xcopy过程简报，如楼主还觉不过瘾，再加一步，改用以下代码可以逐个开启每个目标盘的p86和p64新建子目录，跟跑其复制过程...

@echo off
set "p86=Program Files (x86)\CorelDRAW Graphics Suite 2020\Programs64\Addons"
set "p64=Program Files\CorelDRAW Graphics Suite 2020\Programs64\Addons"
set "_d=%~p0"
for %%p in ("%_d:~,-1%") do set "_d=%%~nxp"
(for %%d in (c: d: e: f: g:) do (
	for %%p in ("%p86%" "%p64%") do if /i exist "%%d\%%~p" (
		md "%%d\%%~p\%_d%"&start "" "%%d\%%~p\%_d%"
		xcopy /s/f/y "." "%%d\%%~p\%_d%\"
	)
)) 2>nul
pause&exit/b
复制代码

aloha20200628

回复 28# aabout2008

又跟楼主回到了原点...用以下代码吧，顺便再把复制过去的批处理文件铲了

@echo off
set "p86=Program Files (x86)\CorelDRAW Graphics Suite 2020\Programs64\Addons"
set "p64=Program Files\CorelDRAW Graphics Suite 2020\Programs64\Addons"
(for %%d in (c: d: e: f: g:) do (
	for %%p in ("%p86%" "%p64%") do if /i exist "%%d\%%~p" (
		start "" "%%d\%%~p"
		xcopy /s/f/y "." "%%d\%%~p\"
		del /q "%%d\%%~p\%~nx0"
	)
)) 2>nul
pause&exit/b
复制代码