[beve]

Вот на этом сайте Sanja Alone выложил скрипты по автоустановке многих прог, посмотри:
http://sanjaalone.h15.ru/au3.php

[Pozia]

чет сложные для меня скрипты от Sanja Alone. Может кто нибудь может более доступно на примере нажатия по одной кнопке показать как это делается?

[266903582]

Pozia,

Код:

if WinExists('VMware Workstation','By restoring this snapshot, the current state will be lost.') then ControlClick('VMware Workstation','By restoring this snapshot, the current state will be lost.','Button13')

или просто так:

Код:

ControlClick('VMware Workstation','By restoring this snapshot, the current state will be lost.','Button13')

[beve]

чет сложные для меня скрипты от Sanja Alone.

Конечно, может и сложны. Но если попростому делать, то может быть и нестабильно. Но, для начала выбери какую то маленькую програмку, и начни свой скрипт с запуска программы установки и потом если непонятно будет, на каком то шаге, например, как убрать или поставить чекбокс, или еще что то то ссылку на программу напиши и хоть кусок твоего кода, так и тебе учится будет понятливей и тем кто сможет подсказать тоже будет понятно, что не понятно тебе, или вам.

[Pozia]

266903582, это же обычный клик по активному окну. Мне нужно вызвать окно программы, скрыть его и щелкать по клавишам уже скрытого окна. В справочнике аутлут об этом прочел но не совсем могу понять КАК это реализовать.

Вот допустим часть скрипта Создания подключения к интернету:

#NoTrayIcon
;Запуск Мастера подключения к интернету
Run ("rundll32.exe netshell.dll,StartNCW")
WinWaitActive ( "Мастер новых подключений" )
ControlClick ( "Мастер новых подключений", "", 12324 )
WinWaitActive ( "Мастер новых подключений" )
ControlClick ( "Мастер новых подключений", "", 22125 )
ControlClick ( "Мастер новых подключений", "", 12324 )
WinWaitActive ( "Мастер новых подключений" )
ControlClick ( "Мастер новых подключений", "", "&Установить подключение вручную" )
ControlClick ( "Мастер новых подключений", "", "&Далее >" )
WinWaitActive ( "Мастер новых подключений" )
ControlClick ( "Мастер новых подключений", "", "Через &обычный модем" )
ControlClick ( "Мастер новых подключений", "", "&Далее >" )
WinWaitActive ( "Мастер новых подключений" )
Send ( "Beltelecom" )

...

Вот как скрыть эти моргающие окна при запуске скрипта?

[beve]

Мне нужно вызвать окно программы, скрыть его и щелкать по клавишам уже скрытого окна. В справочнике аутлут об этом прочел но не совсем могу понять КАК это реализовать.

Если тебе саму суть то вот:

Код:

#NoTrayIcon
;Запуск Мастера подключения к интернету
Run ("rundll32.exe netshell.dll,StartNCW") 
WinWaitActive ( "Мастер новых подключений" )
WinSetState ( "Мастер новых подключений", "", @SW_HIDE  )
ControlClick ( "Мастер новых подключений", "", 12324 )
WinWaitActive ( "Мастер новых подключений" )
ControlClick ( "Мастер новых подключений", "", 22125 )
ControlClick ( "Мастер новых подключений", "", 12324 )
WinWaitActive ( "Мастер новых подключений" )
ControlClick ( "Мастер новых подключений", "", "&Установить подключение вручную" )
ControlClick ( "Мастер новых подключений", "", "&Далее >" )
WinWaitActive ( "Мастер новых подключений" )
ControlClick ( "Мастер новых подключений", "", "Через &обычный модем" )
ControlClick ( "Мастер новых подключений", "", "&Далее >" )
WinWaitActive ( "Мастер новых подключений" )
ControlSend ( "Мастер новых подключений", "", "[CLASS:Edit; INSTANCE:1]","Beltelecom" ) ;при отправке текста в скрытых окнах нужно использовать такое
WinSetState ( "Мастер новых подключений", "", @SW_SHOW  )

P.S. Ты пишеш - аутлут, но лучше все таки, чтоб понятливей для всех писать Автоит.

[266903582]

Pozia, controlclick работает не только в активных окнах...

[Pozia]

beve, супер. оказывается все легко. А вот самое первое окно есть возможность скрыть? Аль это уже из мира фантастики?

[Pozia]

вот пытаюсь сделать автоустановку MathType. не совсем выходит. Текст скрипта:

Код:

#NoTrayIcon  run ('setup.exe')
WinWaitActive			('Установка 6.0c','','')
WinSetState			('Установка 6.0c','',@SW_HIDE)
ControlClick			('Установка 6.0c','',21)
ControlClick			('Установка 6.0c','',101)
ControlSend			('Установка 6.0c','','[CLASS:Edit; INSTANCE:1]','{end}')
ControlSend			('Установка 6.0c','','[CLASS:Edit; INSTANCE:1]','{backspace 35}')
ControlSend			('Установка 6.0c','','[CLASS:Edit; INSTANCE:1]','Pozia')
ControlClick			('Установка 6.0c','', 103)
ControlSend			('Установка 6.0c','','[CLASS:Edit; INSTANCE:2]','{end}')
ControlSend			('Установка 6.0c','','[CLASS:Edit; INSTANCE:2]','{backspace 35}')
ControlSend			('Установка 6.0c','','[CLASS:Edit; INSTANCE:2]','Pozia')
ControlClick			('Установка 6.0c','', 105)
ControlSend			('Установка 6.0c','','[CLASS:Edit; INSTANCE:3]','{end}')
ControlSend			('Установка 6.0c','','[CLASS:Edit; INSTANCE:3]','{backspace 35}')
ControlSend			('Установка 6.0c','','[CLASS:Edit; INSTANCE:3]','Pozia')
ControlClick			('Установка 6.0c','', 107)
ControlSend			('Установка 6.0c','','[CLASS:Edit; INSTANCE:4]','{end}')
ControlSend			('Установка 6.0c','','[CLASS:Edit; INSTANCE:4]','{backspace 35}')
ControlSend			('Установка 6.0c','','[CLASS:Edit; INSTANCE:4]','XXXXXXX-XXXXXX-XXXXX')
ControlClick			('Установка 6.0c','',112)
ControlClick			('Установка 6.0c','',22)
WinWaitActive			('Выполнение Установка 6.0c','','')
WinSetState			('Выполнение Установка 6.0c','', @SW_HIDE)
WinWaitActive			('Выбор языка','','')
WinSetState			('Выбор языка','',@SW_HIDE)
ControlClick			('Выбор языка','',1)
WinWaitActive			('Завершение установки','','')
WinSetState			('Завершение установки','',@SW_HIDE)
ControlClick			('Завершение установки','', 25)
ControlClick			('Завершение установки','', 1)
Exit

Не работает он в следующем: когда появляется последнее окно Завершение установки в котором нужно поставить птичку на согласие и нажать Готово то ничего не происходит пока я не нажму ALT+Tab и не выберу там MathType. Тогда появляется окно и скрипт дальше отробатывает. Опытно установил что мешает выполнению скрипта выделеная строка. Без нее все работает. В чем может быть причина?