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

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

Новый участник


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

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


Цитата Darkar25:
Код: Выделить весь код
set NoTot=0 
set NoFil= 
for %%a in ( "file1.exe" "file2.exe" "file3.exe") do call :ChkFile %%a 
if %NoTot% == 0 тут команда если все файлы есть
echo FILES %NoFil% NOT EXISTS!(%NoTot% Files)
тут команда если какой-то из файлов отсутсвует
:ChkFile
if exist %1 goto :eof 
set NoFil=%NoFil% %1 
set /a NoTot=%NoTot%+1 
goto :eof
»
Не работает. Есть у кого то еще решения? На VBS возможен скрипт?

Цитата megaloman:
Код: Выделить весь код
@Echo Off
cls
Set "BoxIn=С:\update"
Set "Exe=С:\update\update.exe"
If Not Exist "%Exe%" (
 Echo Exe File "%Exe%" not found &Echo: &Pause &Exit /B 1
) 
Pushd "%BoxIn%"
If Not %Errorlevel%==0 (
 Echo Input folder "%BoxIn%" not found &Echo: &Pause &Exit /B 2
)
Set /A Nbeg=0
For /F "usebackq delims=:" %%i In (`"FINDSTR /B /L /I /N /C:":FilesSpisok" "%~dpnx0""`) DO Set /A Nbeg=%%i
If %Nbeg% EQU 0 Echo !!! No file list found &Pause &Exit /B 240
For /F "usebackq tokens=*" %%i In (`"more +%Nbeg% "%~dpnx0""`) DO (
 If /I "%%i"=="GoTo :Eof" (Popd &Exit /B 0)
 If Not Exist "%%i" (Echo File "%BoxIn%\%%i" not found &Echo Запускаем "%Exe%" &"%Exe%" &Popd &GoTo :Eof) 
)
GoTo :Eof
:FilesSpisok
update.exe
libavutil-55.dll
Всякая фигня.hlp
и так далее.jpg
GoTo :Eof
»
Этот скрипт требует подтверждения (для продолжения нажмите любую кнопку) , а мне надо без него.

Последний раз редактировалось Svnkill, 17-02-2018 в 20:20.


Отправлено: 20:07, 17-02-2018 | #7