|
Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » AutoIt » Скрыть всплывающее окно ... |
|
Скрыть всплывающее окно ...
|
![]() Ветеран Сообщения: 553 |
Вобщем проблема такая : во время работы периодически появляется окно , я его отлавливаю и скрываю но оно всё равно мигает и пропадает на экране.
Пробовал менял время обработки цикла отлова этого окна - от это только растёт нагрузка на процессор. Окошко представляет собой системное окошко Windows для ввода логина и пароля при подключении. Можно его как-то скрывать до его появления, что бы оно не мигало? ... с учётом того, что ... |
|
Отправлено: 22:53, 28-05-2009 |
Must AutoIt Сообщения: 3054
|
Профиль | Сайт | Отправить PM | Цитировать Можно установить ожидание окна в 0: Opt("WinWaitDelay", 0)
Если дело не в этом, то полный-рабочий пример в студию. |
------- Отправлено: 23:48, 28-05-2009 | #2 |
Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети. Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля. |
![]() Ветеран Сообщения: 553
|
Профиль | Отправить PM | Цитировать Всё равно мигает - только быстрее пропадает
"Полный" пример вот. Opt("WinWaitDelay", 0) ;~ ..................................... $PasswordBufer = 1 $DecodePasword = 123456 $WindowCert = 1 $WindowConn = 1 While 1 If $WindowCert = 1 Then ; Окно сетрификата If WinExists("Предупреждение системы безопасности","") Then WinSetState("Предупреждение системы безопасности", "", @SW_HIDE) ControlClick("Предупреждение системы безопасности", "", "[CLASS:Button; INSTANCE:1]") EndIf EndIf If $WindowConn = 1 Then ; Окно подключения If WinExists("Подключение к stat.****.net","") Then WinSetState("Подключение к stat.****.net", "", @SW_HIDE) If $PasswordBufer = 1 Then ; вставлять автоматически Send($DecodePasword) EndIf ;~ WinSetState("Подключение к stat.****.net", "", @SW_HIDE) ControlClick("Подключение к stat.****.net", "", "[CLASS:Button; INSTANCE:2]") EndIf EndIf ;~ ....................................... Sleep(250) WEnd |
Отправлено: 16:21, 29-05-2009 | #3 |
![]() Старожил Сообщения: 206
|
Профиль | Отправить PM | Цитировать Цитата FlatX007:
Я думаю проще использовать средства Windows для тихого подключения. Google на это даст множество ответов. |
|
Отправлено: 18:31, 29-05-2009 | #4 |
Must AutoIt Сообщения: 3054
|
Профиль | Сайт | Отправить PM | Цитировать Цитата FlatX007:
#NoTrayIcon ; HotKeySet("^e", "_Quit") ;ShellHook notification codes: Global Const $HSHELL_WINDOWCREATED = 1; Global Const $HSHELL_WINDOWDESTROYED = 2; Global Const $HSHELL_ACTIVATESHELLWINDOW = 3; Global Const $HSHELL_WINDOWACTIVATED = 4; Global Const $HSHELL_GETMINRECT = 5; Global Const $HSHELL_REDRAW = 6; Global Const $HSHELL_TASKMAN = 7; Global Const $HSHELL_LANGUAGE = 8; Global Const $HSHELL_SYSMENU = 9; Global Const $HSHELL_ENDTASK = 10; Global Const $HSHELL_ACCESSIBILITYSTATE = 11; Global Const $HSHELL_APPCOMMAND = 12; Global Const $HSHELL_WINDOWREPLACED = 13; Global Const $HSHELL_WINDOWREPLACING = 14; Global Const $HSHELL_RUDEAPPACTIVATED = 32772; Global Const $HSHELL_FLASH = 32774; Global $aMonitor_WinTitles[3] = [2, "Предупреждение системы безопасности", "Подключение к stat.****.net"] Global $hGUI = GUICreate("Shell Hooker") ;Hook stuff: GUIRegisterMsg(RegisterWindowMessage("SHELLHOOK"), "HShellWndProc") ShellHookWindow($hGUI, 1) While 1 Sleep(1000) WEnd Func HShellWndProc($hWnd, $Msg, $wParam, $lParam) Switch $wParam Case $HSHELL_WINDOWCREATED Local $s_Title = WinGetTitle($lParam) For $i = 1 To $aMonitor_WinTitles[0] If $s_Title = $aMonitor_WinTitles[$i] Then WinKill($lParam) ExitLoop EndIf Next EndSwitch EndFunc ;register/unregister ShellHook Func ShellHookWindow($hWnd, $bFlag) Local $sFunc = 'DeregisterShellHookWindow' If $bFlag Then $sFunc = 'RegisterShellHookWindow' Local $aRet = DllCall('user32.dll', 'int', $sFunc, 'hwnd', $hWnd) Return $aRet[0] EndFunc ;register window message Func RegisterWindowMessage($sText) Local $aRet = DllCall('user32.dll', 'int', 'RegisterWindowMessage', 'str', $sText) Return $aRet[0] EndFunc Func _Quit() ShellHookWindow($hGUI, 0) Exit EndFunc |
||
------- Отправлено: 19:46, 29-05-2009 | #5 |
![]() Ветеран Сообщения: 553
|
Профиль | Отправить PM | Цитировать Цитата Yashied:
У меня работает отдельная программа которая опрашивает HTTPS сервер о данных баланса (грубо говоря она сохраняет HTML код станицы в файле во временной папке). Эту программу написал один мой знакомый на "HiAsm" ... но она с косяком почему-то периодически появляется это злополучное окошко для ввода логина и пароля. На AutoIT неполучилось написать, как оказалось он отказывается работать с HTTPS. Цитата Creat0R:
|
||
Отправлено: 07:37, 30-05-2009 | #6 |
Must AutoIt Сообщения: 3054
|
Профиль | Сайт | Отправить PM | Цитировать Цитата FlatX007:
Цитата FlatX007:
|
||
------- Отправлено: 12:46, 30-05-2009 | #7 |
![]() Ветеран Сообщения: 553
|
Профиль | Отправить PM | Цитировать Цитата Creat0R:
![]() |
|
Отправлено: 22:15, 30-05-2009 | #8 |
Must AutoIt Сообщения: 3054
|
Профиль | Сайт | Отправить PM | Цитировать Цитата FlatX007:
|
|
------- Отправлено: 22:24, 30-05-2009 | #9 |
![]() Ветеран Сообщения: 553
|
Профиль | Отправить PM | Цитировать |
Отправлено: 22:32, 30-05-2009 | #10 |
![]() |
Участник сейчас на форуме |
![]() |
Участник вне форума |
![]() |
Автор темы |
![]() |
Сообщение прикреплено |
| |||||
Название темы | Автор | Информация о форуме | Ответов | Последнее сообщение | |
Всплывающее окно при открытии папки | clin | Microsoft Windows NT/2000/2003 | 3 | 11-12-2008 08:37 | |
Вопрос - Как убрать всплывающее окно? | cesiy | Защита компьютерных систем | 6 | 10-09-2008 17:49 | |
Как остановить скрипт, пока юзер не закроет всплывающее окно? | Gamover jr | Вебмастеру | 5 | 16-04-2008 20:08 | |
Win 2003 - Достало всплывающее окно предлагающее перезагрузку | Nitrokamer | Microsoft Windows NT/2000/2003 | 1 | 30-11-2006 15:35 | |
Чтобы появилось всплывающее окно надо кликать | docSERG | Microsoft Windows 95/98/Me (архив) | 5 | 14-02-2003 17:39 |
|