Не могу выйти из кнопки меню с помощью VBA

Question

Я захожу на веб-страницу, и когда я пытаюсь выйти из системы, она просто закрывает окно с

ie.Navigate "http://b2b.site.net/el/?mylogout="
ie.Quit

и сначала не выходит из системы. Я использую следующее для выхода из системы

ie.Navigate "http://b2b.site.net/el/?mylogout="

И я попробовал со следующим

ie.Document.getElementsByClassName("logout").Click

html-часть

<div class="header_user_info">
        <a class="logout" href="http://b2b.site.net/el/?mylogout=" rel="nofollow" title="Disconnect me">
        Disconnect
    </a>
</div>

Что я делаю не так?

Answer 1

Я использую эту подпрограмму, когда выполняю любой вид веб-автоматизации или очистки экрана:

Sub Wait()

While (IE.Busy Or IE.READYSTATE <> 4): DoEvents: Wend
Application.Wait (Now + TimeValue("0:00:02"))

End Sub

Я обнаружил, что проверка состояния готовности не всегда надежна на 100%, поэтому, если время не подходитПо сути, я использую 2-секундный буфер.

Так что в вашем коде это будет выглядеть так:

ie.Navigate "http://b2b.site.net/el/?mylogout="
Wait
ie.Quit

Альтернативно, если вам не нравится видеть эту дополнительную строку:

ie.Navigate "http://b2b.site.net/el/?mylogout=": Wait
ie.Quit