[Debugger]

XX - x86/x64 - СКРИПТ - 14.12.2011 - Скрипт для автоматической установки обновлений для Microsoft Office 2003 (положить в папку с загруженными обновлениями) »

Все обновы я ставлю из расшаренной папки на сетевом хранилище, поэтому батник для меня не канает. На основе скрипта сбацал скрипт для Auto-It с простеньким прогресс-баром. На оригинальность и информативность он не претендует поэтому если что не так исправляйте сами кому надо. Конвертер файлов ставлю оригинальный.

Посмотреть

Код:

ProgressOn("Установка обновлений", "Установка обновления KB907417", "", -1, -1, 16)
RunWait('msiexec /p "' & @ScriptDir & '\KB907417-OTKLOADR.msp" /qb-!')
ProgressSet(3, "", "Установка обновления KB943973")
RunWait('msiexec /p "' & @ScriptDir & '\KB943973-WORKS632.msp" /qb-!')
ProgressSet(6, "", "Установка обновления KB955439")
RunWait('msiexec /p "' & @ScriptDir & '\KB955439-SNAPVIEW.msp" /qb-!')
ProgressSet(9, "", "Установка обновления KB951535")
RunWait('msiexec /p "' & @ScriptDir & '\KB951535-MSXML5.msp" /qb-!')
ProgressSet(12, "", "Установка обновления KB949074")
RunWait('msiexec /p "' & @ScriptDir & '\KB949074-OSECA.msp" /qb-!')
ProgressSet(15, "", "Установка обновления KB924423-v2")
RunWait('msiexec /p "' & @ScriptDir & '\KB924423v2-OUTLHOL.msp" /qb-!')
ProgressSet(18, "", "Установка обновления KB974554")
RunWait('msiexec /p "' & @ScriptDir & '\KB974554-FM20.msp" /qb-!')
ProgressSet(21, "", "Установка обновления KB975051")
RunWait('msiexec /p "' & @ScriptDir & '\KB975051-MSCONV.msp" /qb-!')
ProgressSet(24, "", "Установка обновления KB972580")
RunWait('msiexec /p "' & @ScriptDir & '\KB972580-GDIPLUS.msp" /qb-!')
ProgressSet(27, "", "Установка обновления KB947319")
RunWait('msiexec /p "' & @ScriptDir & '\KB947319-OWC10.msp" /qb-!')
RunWait('msiexec /p "' & @ScriptDir & '\KB947319-OWC11.msp" /qb-!')
ProgressSet(30, "", "Установка обновления KB976382")
RunWait('msiexec /p "' & @ScriptDir & '\KB976382-VBE6.msp" /qb-!')
ProgressSet(33, "", "Установка обновления KB978551")
RunWait('msiexec /p "' & @ScriptDir & '\KB978551-IRMPRTIDNMinus1.msp" /qb-!')
ProgressSet(36, "", "Установка обновления KB980923")
RunWait('msiexec /p "' & @ScriptDir & '\KB980923-INFOPATH.msp" /qb-!')
ProgressSet(39, "", "Установка обновления KB981716")
RunWait('msiexec /p "' & @ScriptDir & '\KB981716-ACCWIZ.msp" /qb-!')
RunWait('msiexec /p "' & @ScriptDir & '\KB981716-MSACCESS.msp" /qb-!')
ProgressSet(42, "", "Установка обновления KB2293428")
RunWait('msiexec /p "' & @ScriptDir & '\KB2293428-OLKINTL.msp" /qb-!')
ProgressSet(45, "", "Установка обновления KB2288613")
RunWait('msiexec /p "' & @ScriptDir & '\KB2288613-USP10.msp" /qb-!')
ProgressSet(48, "", "Установка обновления KB2449798")
RunWait('msiexec /p "' & @ScriptDir & '\KB2449798-OUTLOOK.msp" /qb-!')
ProgressSet(51, "", "Установка обновления KB2289163")
RunWait('msiexec /p "' & @ScriptDir & '\KB2289163-GPFILT.msp" /qb-!')
ProgressSet(54, "", "Установка обновления KB2464603")
RunWait('msiexec /p "' & @ScriptDir & '\KB2464603-WINWORD.msp" /qb-!')
ProgressSet(57, "", "Установка обновления KB2543854")
RunWait(@ScriptDir & '\office2003-KB2543854-FullFile-RUS.exe ' & '/S')
ProgressSet(60, "", "Установка обновления KB2493523")
RunWait('msiexec /p "' & @ScriptDir & '\KB2493523-MFC11.msp" /qb-!')
ProgressSet(63, "", "Установка обновления KB2535812")
RunWait('msiexec /p "' & @ScriptDir & '\KB2535812-POWERPNT.msp" /qb-!')
ProgressSet(66, "", "Установка обновления KB2539581")
RunWait('msiexec /p "' & @ScriptDir & '\KB2539581-RICHED20.msp" /qb-!')
ProgressSet(69, "", "Установка обновления KB2584052")
RunWait('msiexec /p "' & @ScriptDir & '\KB2584052-MSO.msp" /qb-!')
ProgressSet(72, "", "Установка обновления KB2553084")
RunWait('msiexec /p "' & @ScriptDir & '\KB2553084-MSPUB.msp" /qb-!')
ProgressSet(75, "", "Установка обновления KB2596954")
RunWait('msiexec /p "' & @ScriptDir & '\KB2596954-EXCEL.msp" /qb-!')
ProgressSet(78, "", "Установка обновления KB2597968")
RunWait('msiexec /p "' & @ScriptDir & '\KB2597968-OUTLFLTR.msp" /qb-!')
ProgressSet(81, "", "Установка Office File Validation")
RunWait('msiexec /i "' & @ScriptDir & '\OFV\KB2501584-OFV.msi" /qb-!')
ProgressSet(84, "", "Установка обновления KB2553065")
RunWait('msiexec /p "' & @ScriptDir & '\OFV\KB2553065-GKALL-X-NONE.msp" /qb-!')
ProgressSet(87, "", "Установка File Format Converters")
RunWait('msiexec /i "' & @ScriptDir & '\FFC\KB924074-O12CONV.msi" /qb-!')
ProgressSet(90, "", "Установка обновления KB2526297")
RunWait('msiexec /p "' & @ScriptDir & '\FFC\KB2526297-O12CONVSP3-RU-RU.msp" /qb-!')
ProgressSet(93, "", "Установка обновления KB2596785")
RunWait('msiexec /p "' & @ScriptDir & '\FFC\KB2596785-MSPTLS-X-NONE.msp" /qb-!')
ProgressSet(96, "", "Установка обновления KB2596789")
RunWait('msiexec /p "' & @ScriptDir & '\FFC\KB2596789-XLCONV-X-NONE.msp" /qb-!')
ProgressSet(98, "", "Установка обновления KB2596843")
RunWait('msiexec /p "' & @ScriptDir & '\FFC\KB2596843-PPTCONV-X-NONE.msp" /qb-!')
ProgressSet(100, "Готово")
ProgressOff()

Upd: Скрипт переделал, так как:
1) установка обновлений в виде msp-файлов проходит гораздо быстрее чем exe-файлов. Имена msp-файлов немного изменил.
2) если в ветке реестра HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Associations не прописаны разрешенные расширения файлов, то при установке обновлений по сети при каждом запуске msp-файла будет выдаваться предупреждение о том что не удалось проверить издателя.