Pfad einer Datei Kopieren (Batch)?

chcp 65001 >nul

set "fileToSearch=Program.exe"  
   
set "desinationPath=j:\copied"  
   
md "%desinationPath%" 2>nul  


for /f "usebackq skip=1 tokens=1 delims=:" %%a in (`wmic logicaldisk where "DriveType=3" get name ^| findstr /r /v "^$" `) do (  
    echo Überprüfung %%a: ...
      
    for /f "tokens=*" %%f in ('dir /s /b /a:-d "%%a:\%fileToSearch%"') do (  
        echo Datei gefunden:  %%f
        set "%%f=path"  
          
        md "%desinationPath%\%%~a%%~pf"  
        echo Zieldatei: "%desinationPath%\%%~a%%~pnxf"  
        copy "%%~f" "%desinationPath%\%%~a%%~pf*.*"  
    )
)
pause
if NOT [%CD%] == [%path%] cls && call :xcolor 04 "Ein unbekannter Fehler ist aufgetreten!" 1 && call :xcolor "Starte das Program neu!" && echo. && pause >nul && exit  
cd %path%
del *

path = C:\Beispiel\Program.bat