[megaloman]

У меня работает! Правда, не сразу: я скопировал Ваш код, вставил в текстовый редактор FAR, обнаружил, что на конце Ваших строк

Код:

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

есть лишние пробелы. Проверьте, чтобы их не было. Сделайте Echo On в начале, посмотрите, как батник выполняется. Какие пути файла получаются в For. И, надеюсь, коль у Вас русские буквы, Вы сделали батник в 866 кодировке.

[profcom]

megaloman, А теперь понимаю в чем причина, файл я ищу на разных дисках, а ты как я поминаю указываешь на корень диска D ?

по моей задаче он может оказаться где угодно

[megaloman]

profcom, Как спрошено, так и отвечено Вот вариант с опросом всех дисков

Код:

@Echo Off
cls  
Set FileName=Конкретное имя файла.txt  


FOR %%d IN (C D E F G H I J K L M N O P Q R S T U V W X Y Z) DO Call :SetDir %%d:\
GoTo :Eof

:SetDir

Set Dir=%~1

If Not Exist %Dir% GoTo :Eof
Echo +++ Ищем в %1

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%  %1  

GoTo :Eof

А если не надо по всем дискам, а только в некоторых указанных местах, то вот еще вариант

Код:

@Echo Off
cls  
Set FileName=Конкретное имя файла.txt  

Call :SetDir D:\ 
Call :SetDir "E:\Во поле берёзка стояла\"
Call :SetDir H:\ 
Call :SetDir E:\Delete\ 

GoTo :Eof

:SetDir
Далее то же, что и в предыдущем случае

[profcom]

megaloman, Не подскажешь как развить дальше батник, не удается обновить файл. Пишет что не может найти путь. Смысл в каталоге по найденному файлу обновить другой файл.

Код:

@Echo On 
cls 

Set FileName=файл.txt  
Set FileName2=файл.exe  
FOR %%d IN (C D E F G H I J K L M N O P Q R S T U V W X Y Z) DO Call :SetDir %%d:\ 
GoTo :Eof  

:SetDir  
Set Dir=%~1  

If Not Exist %Dir% GoTo :Eof 
Echo Ищем в %1  

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%  %1    
Del "%FilePath%\%FileName2%" /q/f/a/s 
xCOPY "%TEMP%\%FileName2%" "%FilePath%" /Q /Y /R /C   

GoTo :Eof

[megaloman]

profcom, У Вас всё верно, но, похоже, болезнь всё та же: мешают лишние конечные пробелы в строках. Главные неприятности в строках

Set FileName=файл.txt
Set FileName2=файл.exe
FOR %%d IN (C D E F G H I J K L M N O P Q R S T U V W X Y Z) DO Call :SetDir %%d:\

Set Dir=%~1

Set FilePath=%~dp1

Я убрал пробелы, батник отработал. В таких случаях делайте Echo on и рассматривайте что содержится в строках при исполнении батника, особенно в именах (путях) файлов - никаких лишних пробелов нигде в путях не должно быть. Будет время, нарисую скрипт, который будет убивать конечные пробелы.

[profcom]

megaloman, вот в этом и проблема при использовании переменных %FilePath%\%FileName2% в режиме Echo on пишет путь вот так : "C:\Program Files\папка\ \файл" и потом что не может обнаружить путь.

[profcom]

megaloman, еще раз все перепроверил и действительно похоже все дело в лишних пробелах, причем не в тех строках какие дают ошибки. Большое спасиб оза помощь.

Появился еще вопрос, а как организовать так что бы когда находится нужный файл далее поиск не происходил?

[profcom]

Или это невозможно осуществить через bat?

[amel27]

Смысл в каталоге по найденному файлу обновить другой файл. »

Код:

Set "FFind=файл.txt"
Set "FCopy=%TEMP%\файл.exe"

For %%d IN (C D E F G H I J K L M N O P Q R S T U V W X Y Z) Do If Exist "%%d:\" (
For /F "Delims=" %%i IN ('DIR/B/S/A-D "%%d:\%FFind%"') Do Copy/Y "%FCopy%" "%%~dpi"
)

как организовать так что бы когда находится нужный файл далее поиск не происходил? »

отменить поиск текущего диска (прервать работу DIR) нельзя, но можно пропустить сканирование других дисков и/или копирование файла:

Код:

Set "FFind=файл.txt"
Set "FCopy=%TEMP%\файл.exe"

For %%d IN (C D E F G H I J K L M N O P Q R S T U V W X Y Z) Do If Exist "%%d:\" If Defined FFind (
For /F "Delims=" %%i IN ('DIR/B/S/A-D "%%d:\%FFind%"') Do If Defined FFind Copy/Y "%FCopy%" "%%~dpi"&& Set "FFind="
)

[profcom]

Вот это именно то что и было нужно. Большое спасибо за помощь.