Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

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

Ветеран


Contributor


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

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


Перепевка этого скрипта
Код: Выделить весь код
@Echo Off
cls
	Set "FileIn=Z:\Box_In\run.ini"
	Set "Fsprav=Z:\Box_In\setup.ini"

rem	Set "WordInExe={src}\"
	Set "WordInExe=Start /W "

rem	Set "WordInMsi=msiexec.exe /i {src}\"
	Set "WordInMsi=Start /W msiexec.exe /i "

	>nul 2>&1 Find "%WordInExe%" "%FileIn%" &&(Echo File "%FileIn%" has already been processed &Pause &Exit /B)
	>nul 2>&1 Find "%WordInMsi%" "%FileIn%" &&(Echo File "%FileIn%" has already been processed &Pause &Exit /B)

	FOR /F "usebackq tokens=1* delims= " %%i In ("%Fsprav%") DO (
		If /I "%%~xi"==".exe" Set "%%i=%WordInExe%%%i %%j"  
		If /I "%%~xi"==".msi" Set "%%i=%WordInMsi%%%i %%j"  
	)
	Set /A N=1000000
	(Set /P @@@1000000=<"%FileIn%")
	FOR /F "usebackq skip=1 tokens=1* delims==" %%i In ("%FileIn%") DO (
		Call Set /A N+=%%i
		Call Set "@@@%%N%%=%%%%j%%"
		Call :Missing "%%%%j%%" "@@@%%N%%" "%%i=%%j" 
	)
	
	>"%FileIn%" (
		Call :Begin
		FOR /F "usebackq tokens=1* delims==" %%i In (`Set "@@@"`) DO (Echo %%j)
		Call :End
	)
pause
Exit /B

:Missing
	If "%~1"=="" (Set %~2=)
Exit /B

:Begin
	(Echo What animal can jump)
	(Echo higher than a house?)
Exit /B

:End
	(Echo Any animal.)
	(Echo Houses can't jump.)
Exit /B

-------
Даже самая сложная проблема обязательно имеет простое, лёгкое для понимания, неправильное решение. Каждое решение плодит новые проблемы.


Отправлено: 11:01, 11-12-2022 | #23