Преодоление проблемы диалогового окна в WebBrouser - VB

Узнай цену своей работы

Формулировка задачи:

Суть программы в следующем:
C использованием WebBrouser заходим в аккаунт по https:// и считываем информацию.
Далее необходимо из аккаунта выйти.
Дается команда вида:
Form2.WebBrowser1.Navigate "https://myaccount.com/clx/index.php?part=logoff"
При переходе на эту страницу возникает диалоговое окно:
Windows Internet Explorer
Просматриваемая WEB-страница пытается закрыть это окно.Закрыть окно?
Да? Нет?
Соответственно код "End" не выполняется пока вручную не нажмешь что-нибудь. Если "End" выполнится до появления этого окна, то все пройдет корректно, но если слишком быстро, то корректного выхода из аккаунта не произойдет.
Если последней команды Form2.WebBrowser1.Navigate "https://myaccount.com/clx/index.php?part=logoff" вообще не давать, то не произойдет корректного выхода из аккаунта и удаленная система будет считать, что пользователь не вышел, соотв. возникнут проблемы при след. входе в этот или другой аккаунт.
В идеале в этом окне надо нажать "нет" ибо у программы есть опция сразу итти в другой аккаунт, т.е. надо произвести корректное отключение от системы с возможностью последующего входа.
Есть ли идеи, как избавиться от этого окна или как там "нажать" кнопку "нет" (sendkeys не помогает, т.к. окно похоже стопорит работу любого кода моей программы)???

Решение задачи: «Преодоление проблемы диалогового окна в WebBrouser»

textual
Листинг программы
<font color="blue">Private</font> <font color="blue">Sub</font> WebBrowser1_WindowClosing(<font color="blue">ByVal</font> IsChildWindow <font color="blue">As</font> <font color="blue">Boolean</font>, Cancel <font color="blue">As</font> <font color="blue">Boolean</font>)
    <font color="blue">If</font> ITER = <font color="darkblue"><b>4</b></font> <font color="blue">Then</font> <font color="00AA00">'проверка условия, что именно в нужном месте процесса</font>
        Cancel = True
        <font color="blue">End</font> <font color="00AA00">'если больше ничего делать не надо</font>
    <font color="blue">End</font> <font color="blue">If</font>
<font color="blue">End</font> <font color="blue">Sub</font>

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

8   голосов , оценка 3.625 из 5
Похожие ответы