[文件操作] 【已解决】批处理如何循环判断打开正确的路径并复制当前文件夹到指定路径下？

aabout2008

start "" "C:\Program Files (x86)\CorelDRAW Graphics Suite 2020\Programs64\Addons" "" 
start "" "D:\Program Files (x86)\CorelDRAW Graphics Suite 2020\Programs64\Addons" "" 
start "" "E:\Program Files (x86)\CorelDRAW Graphics Suite 2020\Programs64\Addons" "" 
start "" "F:\Program Files (x86)\CorelDRAW Graphics Suite 2020\Programs64\Addons" "" 
start "" "G:\Program Files (x86)\CorelDRAW Graphics Suite 2020\Programs64\Addons" "" 

start "" "C:\Program Files \CorelDRAW Graphics Suite 2020\Programs64\Addons" "" 
start "" "D:\Program Files \CorelDRAW Graphics Suite 2020\Programs64\Addons" "" 
start "" "E:\Program Files \CorelDRAW Graphics Suite 2020\Programs64\Addons" "" 
start "" "F:\Program Files \CorelDRAW Graphics Suite 2020\Programs64\Addons" "" 
start "" "G:\Program Files \CorelDRAW Graphics Suite 2020\Programs64\Addons" ""  

rem  打开Coredraw2020插件目录 
rem  将批处理所在文件夹，复制到Addons 目录下
复制代码

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

aabout2008

回复 27# aloha20200628
对了，您这个代码把bat文件一起复制过去了，要排除bat文件。

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

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%"&start "" "%%d\%%~p\%_d%"
		xcopy /s/f/y "." "%%d\%%~p\%_d%\"
	)
)) 2>nul
pause&exit/b
复制代码

我想请问一下，如果不是复制文件夹过去，只是复制bat目录下的文件过去。代码应该如何修改。

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

aabout2008

回复 24# aloha20200628 您这个经测试，同样完美。。。

在哪里加个语句，实现：打开前面判断出来的目录，确认一下文件是否复制过去？

aabout2008

回复 23# 77七    堪称完美，完结撒花。。。

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

77七

回复 21# aabout2008


   写在pause 上一行就行

aabout2008

@77七 写出来的批处理，执行最稳定。不论是在桌面上执行，还是在DEF盘中执行。

其余的测试，总是出点小问题。

aabout2008

回复 19# 77七

start "" "%_str%"
复制代码

加入这个语句，打开的是当前批处理的目录。

我想打开的是前面判断出来的目录，打开后可以确认下文件有没有复制过去。
应该添加到哪里？实在是有点不好意思，太麻烦您了。

原来的批处的代码是这样的：

%1 mshta vbscript:CreateObject("Shell.Application").ShellExecute("cmd.exe","/c ""%~s0"" ::","","runas",1)(window.close)&&exit
@echo off
cd /d "%~dp0"
set str=CorelDRAW Graphics Suite 2020\Programs64\Addons
for %%a in (c d e f g) do (
	if exist "%%a:\Program Files (x86)\%str%" (
		set "_str=%%a:\Program Files (x86)\%str%"
	) else if exist "%%a:\Program Files \%str%" (
		set _str=%%a:\Program Files \%str%
	)
)
for %%a in (.) do (
	robocopy . "%_str%\%%~nxa" /e /xf "%~f0"
)
pause
复制代码

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

77七

回复 18# aabout2008


  

start "" "%_str%"
复制代码

aabout2008

回复 11# 77七      效果已经实现了。我想请问一下，您这个批处理复制文件过去了。能否在最后把那个目录打开呢。

aabout2008

回复 16# aabout2008   我想请问一下，您这个批处理复制文件过去了。能否在最后把那个目录打开呢。