[megaloman]

Код:

@Echo Off

Set Dir=D:\
Set FileName=Конкретное имя файла.txt

FOR /F "usebackq delims=" %%i IN (`Dir /b /s /A:-D "%Dir%%FileName%"`) DO Call :PathFile "%%i"
GoTo :Eof

:PathFile
Set FilePath=%~dp1
Echo %FilePath%

GoTo :Eof

Смотрите выше замечание о кодировке