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

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

Старожил


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

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


Ставил как-то версию 4.0.5.237 с помощью AutoIt, вот скрипт для установки самой проги (Set.exe):

If WinExists(@ScriptName) Then Exit
AutoItWinSetTitle(@ScriptName)
AutoItSetOption("TrayIconDebug",1)
BlockInput(1)
Run("TeamViewer_Setup.exe")
WinWaitActive("TeamViewer 4 Setup","Welcome to TeamViewer")
ControlClick("TeamViewer 4 Setup","Welcome to TeamViewer","Button6")
Sleep(500)
ControlClick("TeamViewer 4 Setup","Welcome to TeamViewer","Button2")
WinWaitActive("TeamViewer 4 Setup","Environment")
ControlClick("TeamViewer 4 Setup","Environment","Button5")
Sleep(500)
ControlClick("TeamViewer 4 Setup","Environment","Button2")
WinWaitActive("TeamViewer 4 Setup","License Agreement")
ControlClick("TeamViewer 4 Setup","License Agreement","Button4")
Sleep(500)
ControlClick("TeamViewer 4 Setup","License Agreement","Button5")
Sleep(500)
ControlClick("TeamViewer 4 Setup","License Agreement","Button2")
WinWaitActive("TeamViewer 4 Setup","Choose installation type")
ControlClick("TeamViewer 4 Setup","Choose installation type","Button2")
WinWaitActive("TeamViewer 4 Setup","Install VPN adapter")
ControlClick("TeamViewer 4 Setup","Install VPN adapter","Button2")
WinWaitActive("TeamViewer 4 Setup","Choose Install Location")
ControlClick("TeamViewer 4 Setup","Choose Install Location","Button2")
WinWaitActive("TeamViewer 4 Setup","Choose Start Menu Folder")
ControlClick("TeamViewer 4 Setup","Choose Start Menu Folder","Button2")
WinWaitActive("TeamViewer 4 Setup","Completing the TeamViewer 4 Setup Wizard")
ControlClick("TeamViewer 4 Setup","Completing the TeamViewer 4 Setup Wizard","Button2")
BlockInput(0)
Exit

а это скрипт для утановки русика от loginvovchyk (Rus.exe):

If WinExists(@ScriptName) Then Exit
AutoItWinSetTitle(@ScriptName)
AutoItSetOption("TrayIconDebug",1)
BlockInput(1)
Run("TeamRus.exe")
WinWaitActive("Добро пожаловать","Вы запустили программу обновления TeamViewer 4.0 5237. Она установит обновление TeamViewer 4.0 5237 на ваш компьютер.")
ControlClick("Добро пожаловать","Вы запустили программу обновления TeamViewer 4.0 5237. Она установит обновление TeamViewer 4.0 5237 на ваш компьютер.","Button2")
WinWaitActive("Руководство пользователя","Прочитайте, пожалуйста, эту информацию.")
ControlClick("Руководство пользователя","Прочитайте, пожалуйста, эту информацию.","Button2")
WinWaitActive("Выбор папки назначения","Укажите папку, где установлена ваша программа. Вы можете ввести путь к папке вручную или нажать кнопку 'Обзор' и выбрать её в дереве папок.")
ControlClick("Выбор папки назначения","Укажите папку, где установлена ваша программа. Вы можете ввести путь к папке вручную или нажать кнопку 'Обзор' и выбрать её в дереве папок.","Button4")
WinWaitActive("Информация","Результаты обновления:")
ControlClick("Информация","Результаты обновления:","Button4")
WinWaitActive("Завершение обновления","Обновление TeamViewer 4.0 5237 выполнено.")
ControlClick("Завершение обновления","Обновление TeamViewer 4.0 5237 выполнено.","Button2")
Sleep(500)
ControlClick("Завершение обновления","Обновление TeamViewer 4.0 5237 выполнено.","Button7")
BlockInput(0)
Exit

само собой, что эти два скрипта можно соединить в один, а вот содержимое install.cmd:

Set.exe
taskkill.exe /F /IM TeamViewer.exe
Rus.exe
exit

Возможно, что первый скрипт сыроват (у меня сейчас Win 7 и не могу проверить, но на XP все работало). Отписывайтесь, будем додумывать вместе.
Это сообщение посчитали полезным следующие участники:

Отправлено: 21:04, 18-08-2009 | #13