Новости
Видео
Microsoft
Windows 10
Железо
Программы
Форум

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

Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Скриптовые языки администрирования Windows » VBS/WSH/JS - [решено] Как закрыть IE (Kerio NTLM)

< Предыдущая 1 2 3
Ответить
Настройки темы
VBS/WSH/JS - [решено] Как закрыть IE (Kerio NTLM)

Аватара для Charg

Ветеран


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


Конфигурация

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

Изменения
Автор: Charg
Дата: 03-12-2018
Есть такой код
Скрытый текст
Код: Выделить весь код
Dim oIE

Set oIE = CreateObject("InternetExplorer.Application")

oIE.Visible = False

oIE.Fullscreen = False

oIE.Toolbar = True

oIE.Statusbar = True

oIE.Navigate("https://kerio.domain.ua:4081/login")

WScript.Sleep(30000)

oIE.quit


Взят отсюда https://manuals.gfi.com/en/kerio/con...ntrol-917.html

По идее что он должен делать - открыть IE, зайти на сайт (таким образом клиент аутентифицируется на веб-статистике керио), подождать 30 секунд, закрыть IE.

Проблема в том что oIE.quit не отрабатывает - IE не закрывается и у юзера бесконечно висит окно эксплорера которое закрывать либо вручную либо запускать батник который стартует vbs-скрипт а потом грохает IE. Но это не вариант потому что проблема "юзер видит мельтешащие и в общем-то не не нужные ему окна" всё еще не решается.
Как-нибудь можно сделать этот процесс невидимым пользователю?

Отправлено: 18:37, 27-11-2018

 

Аватара для Charg

Ветеран


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

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

В общем вопрос решился с помощью ссылки El Sanchez
Итоговый вариант выглядит так

Скрытый текст
Код: Выделить весь код
Set IE = GetObject("new:{D5E8041D-920F-45e9-B8FB-B1DEB82C6E5E}")
' explanation for the row above:
' https://blogs.msdn.microsoft.com/ieinternals/2011/08/03/default-integrity-level-and-automation/


IE.Visible = False	' set true for debug
IE.ToolBar = 0		' set 1 for debug
IE.StatusBar = 0	' set 1 for debug


IE.Navigate("https://kerio:4081/login")
' login process, must be in intranet zone in Internet Explorer

WScript.Sleep(5000)
' wait for kerio to successfully redirect us on webstatistics page

IE.Quit
' close IE
Это сообщение посчитали полезным следующие участники:

Отправлено: 14:33, 03-12-2018 | #21



Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети.

Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля.


Ветеран


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

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

Charg, только вместо простого Sleep'а лучше попробуйте пару вышеуказанных конструкций.
Это сообщение посчитали полезным следующие участники:

Отправлено: 16:29, 03-12-2018 | #22

< Предыдущая 1 2 3


Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Скриптовые языки администрирования Windows » VBS/WSH/JS - [решено] Как закрыть IE (Kerio NTLM)

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
Ошибка - Как закрыть зависшееприложение. ZoomerJuk Microsoft Windows 2000/XP 27 09-10-2013 10:30
Интернет - Стандартные шары в системе - как закрыть, как найти.. flower Microsoft Windows 7 4 21-03-2011 11:01
Доступ - как мне для студента закрыть доступ на другой локальный диск, закрыть доступ к реестр nisan Microsoft Windows 2000/XP 10 12-09-2009 21:14
как закрыть шары vovas Microsoft Windows 2000/XP 0 08-02-2006 17:04
Как закрыть папку ND Microsoft Windows 95/98/Me (архив) 7 11-02-2002 07:33


« Предыдущая тема | Следующая тема »


 
Переход