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

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

Аватара для batyaPS

Ветеран


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

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


Цитата sLiDeR-X:
Убрать ее немедленно! »
это же только пример был . конечно я бы её убрал.

так верно ?
читать дальше »

REM this is PreSetup
@echo off


:: ================================== Конструкция для интерактивного выбора программ ==================================
:: --------------------------------------------------- НИЖЕ 1 часть --------------------------------------------------
for %%i 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 %%i:\WIN51 Set SrcDosPathTemp=%%i:
if not exist %SrcDosPathTemp%\I386\fSetup.ini Set SrcDosPath=%SrcDosPathTemp%
set DistrDir=%SrcDosPath%\I386\SVCPACK


:: ----- SetupHotfixes
if exist "%DistrDir%" (
copy /y "%DistrDir%\_SetupHotfixes.cmd" "%SystemDrive%\_SetupHotfixes.cmd"
call ::OnlyUpdate
CHGSTR "---------- %SystemDrive%\_SETUPHOTFIXES.CMD" "" "%SystemDrive%\_SetupHotfixes.cmd" /b
)


:: ----- Runss
if exist "%DistrDir%\Runss\Runss.exe" (
copy /y "%DistrDir%\Runss\Run*" "%SystemDrive%\"
for /f "delims=" %%i in (%DistrDir%\Runss\BEGIN.xml) do echo %%i>>%SystemDrive%\1.tmp
if not exist %SystemDrive%\WINDOWS\system32\fSetup.ini (
CHGSTR "%%SrcDosPath%%" "%SrcDosPath%" "%SystemDrive%\_SetupHotfixes.cmd" /b
for /f "skip=1 tokens=1-5,* delims=\. " %%a in (%SystemDrive%\_SetupHotfixes.cmd) do (
echo ^<Item Title="%%d" Program="%%a\%%b\%%c\%%d.%%e" Parameters="%%f"/^>>>%SystemDrive%\1.tmp
)
)
if exist %SystemDrive%\WINDOWS\system32\fSetup.ini (
for /f "tokens=1-5,* delims=\. " %%a in (%SystemDrive%\_SetupHotfixes.cmd) do (
echo ^<Item Title="%%d" Program="%%a\%%b\%%c\%%d.%%e" Parameters="%%f"/^>>>%SystemDrive%\1.tmp
)
)
for /f "delims=" %%i in (%DistrDir%\Runss\END.xml) do echo %%i>>%SystemDrive%\1.tmp
<Nul >%SystemDrive%\Runss.xml Set /P $VAR=яю
%DistrDir%\Runss\recode cp1251..utf16-le <%SystemDrive%\1.tmp >>%SystemDrive%\Runss.xml
del "%SystemDrive%\1.tmp"
echo %%SystemDrive%%\Runss.exe>%SystemDrive%\_SetupHotfixes.cmd
)


:: --------------------------------------------------- ВЫШЕ 1 часть ---------------------------------------------------
:: ================================== Конструкция для интерактивного выбора программ ==================================


:Finish
Exit


:: ================================== Конструкция для интерактивного выбора программ ==================================
:: --------------------------------------------------- НИЖЕ 2 часть ---------------------------------------------------


:OnlyUpdate
MSGBOX.EXE "Хотите установить дополнительные сторонние утилиты?" "MSGBOX" 3 3 10 && cmdow.exe MSGBOX /top
if "%errorlevel%"=="7" (
find "Flash.exe" "%SystemDrive%\_SetupHotfixes.cmd">>"%SystemDrive%\_SetupHotfixes.cmd.tmp"
find "MSXML4.exe" "%SystemDrive%\_SetupHotfixes.cmd">>"%SystemDrive%\_SetupHotfixes.cmd.tmp"
find "ROOTSUPD.exe" "%SystemDrive%\_SetupHotfixes.cmd">>"%SystemDrive%\_SetupHotfixes.cmd.tmp"
find "DNet1140.exe" "%SystemDrive%\_SetupHotfixes.cmd">>"%SystemDrive%\_SetupHotfixes.cmd.tmp"
find "ш т.ф. .......... .exe" "%SystemDrive%\_SetupHotfixes.cmd">>"%SystemDrive%\_SetupHotfixes.cmd.tmp"
move /y "%SystemDrive%\_SetupHotfixes.cmd.tmp" "%SystemDrive%\_SetupHotfixes.cmd"
)
goto :EOF


:: --------------------------------------------------- ВЫШЕ 2 часть ---------------------------------------------------
:: ================================== Конструкция для интерактивного выбора программ ==================================



в секции :: ----- SetupHotfixes в строке call ::OnlyUpdate может одно двоеточее ?
call :OnlyUpdate это же переадресация на блок :OnlyUpdate ? правильно ?

и в секции :OnlyUpdate в конце переадресация на :EOF - это верно ? не нашел больше в скрипте упоминания о EOF .

Последний раз редактировалось batyaPS, 13-09-2010 в 12:52.


Отправлено: 12:40, 13-09-2010 | #61