Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Пользователь


Сообщения: 139
Благодарности: 49

Профиль | Отправить PM | Цитировать


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

Последний раз редактировалось profcom, 16-06-2011 в 17:18.


Отправлено: 17:12, 16-06-2011 | #14