Войти

Показать полную графическую версию : [решено] Автоматическая установка драйвера Starcom_UM150.exe


VoodooHaker
17-02-2009, 12:50
Доброго дня!
Не получается сделать установку этого драйвера
http://rapidshare.com/files/194619623/Starcom_UM150.exe.html
Вот код
If WinExists(@ScriptName) Then Exit
AutoItWinSetTitle(@ScriptName)
AutoItSetOption("TrayIconHide", 1)
AutoItSetOption("SendKeyDelay", 60)
AutoItSetOption("MouseCoordMode", 0)
Run (@ScriptDir & '\Starcom_UM150.exe')
WinWaitActive ( "Install Driver" )
Send ( "{tab}" )
Send ( "{tab}" )
Send ( "{tab}" )
Send ( "{ENTER}" )
WinWaitActive ( "Install Driver" )
Send ( "{ENTER}" )
Exit
У меня выполняется команда (таб) (таб) (таб) (ентер) проходит инсталляция драйвера и должно от ловиться окошко маленькое и на жаться кнопка (Ок), но этого не происходит, окно остается висеть,
http://s57.radikal.ru/i157/0902/5e/ad2e261548f3.jpg
подскажите как решить эту задачу

266903582
17-02-2009, 13:19
VoodooHaker,
run('Starcom_UM150.exe')
cl('Install Driver ','Ready to Install PANTECH USB Modem Software ','Button1')
cl('Install Driver','PANTECH USB Modem Software was installed successfully','Button1')
Func wa($tx1, $tx2)
While Not WinExists($tx1, $tx2)
Sleep(1)
WEnd
EndFunc
Func cl($tx1, $tx2,$classn)
wa($tx1, $tx2)
ControlClick($tx1, $tx2,$classn)
EndFunc

semiono
17-02-2009, 13:38
У меня вообще масса вопросов по дровам, их установке! И здаётся мне никто толком ничего тут не знает.
Благо, что недавно я научился устанавливать сервисы, совершенно случайно наткнувшись на утилиту sc.exe
Но установка драйверов, так и остаётся для меня тайной. Имея например файл INF, почему-то не удаётся
установить драйвер как # rundll32.exe setupapi,InstallHinfSection DefaultInstall 132 z.inf Либо это значит что
нужен рестарт? Почему-то только через какие-то окна возможно... Либо бывает тупняк, что не смотря на любые указанные
пути в файле, окно начинает искать именно %path%\i386\

VoodooHaker
17-02-2009, 13:50
266903582, спасибо огромное работает отлично!
но появился вопрос доработки, оказалось не все гладко, если драйвер повторно про инсталлировать
выбрасывается окошко с ошибкой, как реализовать функцию что бы скрипт на это окошко тоже давал ответ "Ок"
http://s60.radikal.ru/i170/0902/ca/0f8424601641.jpg

Creat0R
17-02-2009, 14:06
Вопросы по автоустановке обычно обсуждают в соседнем разделе Автоматическая установка приложений (http://forum.oszone.net/forum-61.html). За исключением случая, когда установка обязательно требует вмешательства AutoIt-скрипта :)

VoodooHaker
17-02-2009, 14:10
Creat0R, я там уже создал тему неделю назад, никто даже усом не моргнул))),
http://forum.oszone.net/thread-131163.html - можете ее удалить, так на нее никто не отреагировал,
вот я и решил прибегнуть к помощи AutoIt-скрипта

Creat0R
17-02-2009, 14:14
VoodooHaker,
появился вопрос доработки »

#NoTrayIcon

Opt("WinWaitDelay", 10)

Run('Starcom_UM150.exe')

WinWait('Install Driver', 'Ready to Install PANTECH USB Modem Software')
ControlClick('Install Driver', 'Ready to Install PANTECH USB Modem Software', 'Button1')

WinWait('Alert', 'PANTECH USB Modem Software is already installed', 2)

If WinExists('Alert', 'PANTECH USB Modem Software is already installed') Then
ControlClick('Alert', 'PANTECH USB Modem Software is already installed', 'Button1')
Exit
EndIf

WinWait('Install Driver', 'PANTECH USB Modem Software was installed successfully')
ControlClick('Install Driver', 'PANTECH USB Modem Software was installed successfully', 'Button1')

VoodooHaker
17-02-2009, 14:20
Creat0R, спасибо работает!
Надо было сразу в этот раздел ломиться))), а я 11 дней мариновался и ждал ответа)))
Всем огромное спасибо за участие и помощь!
Можно ставить отметку решено!

Creat0R
17-02-2009, 14:30
Можно ставить отметку решено! »
Вы это можете сделать сами, т.к это ваша тема ;)




© OSzone.net 2001-2012