Installations verzeichnis eines Programmes finden

@echo off &setlocal

set Datei=Programm.exe
::        ^^^^^^^^^^^^^^^^^^^-hier die zu suchende Datei eintragen

set Laufwerke=C D
::            ^^^^^^^^^^^^^^^^^^^-hier die möglichen Laufwerke eintragen (Leerzeichen-getrennt!)

for %%i in (%Laufwerke%) do (
 for /f "tokens=3" %%j in ('dir %%i:\ 2^>nul^|findstr "%%i:\\"') do (  
  for %%k in (%%j) do (
   if defined FullName goto weiter else (
    call :Sub %%k
    for /f "tokens=*" %%l in ('dir /a: r a /b /s \ ^| findstr /e /i "%Datei%"') do set "FullName=%%l"  
    popd
   )
  )
 )
)
:weiter
if not defined FullName (
 echo  %Datei% konnte nicht gefunden werden!
 echo.
 echo  Folgende Laufwerke konnten durchsucht werden:
 if defined dLW (
  echo  %LW%
 ) else (
  echo   keine
 )
 echo  von Vorgabe:
 echo   %Laufwerke%
 echo.
 pause
 goto :eof
)
echo %FullName%
echo.
pause
goto :eof

:Sub
pushd %1 2>nul
if not errorlevel 1 set "LW=%LW% %1"  
goto :eof