Страницы: 1
RSS
Цикл While Wend не работает при запуске из сетевой папки, Прошу только дать пояснения по незнакомой строке
 
Уважаемые форумчане, у меня есть рабочий макрос (собран из двух разных, найденных на разных форумах). Все работает, но для меня совершенно непонятна одна строка:
Код
'это мне понятно, задаем объект, открываем IE
Set IE = CreateObject("InternetExplorer.Application")
    IE.Visible = False
'может мне кто-нибудь пояснить, что он делает вот в этой строке
While IE.Busy Or (IE.ReadyState <> 4): DoEvents: Wend

Про цикл у Уокенбаха написано только то, что он введен для обеспечения совместимости и "вы вряд ли встретите его на практике"

Лично у меня возникла проблема, что макрос нормально выполняется, будучи на компе, но если его запускать с сетевой папки, то, он там зацикливается на этой строке. А может и нет, поскольку цикл незнаком, то, не могу понять, бесконечный ли это цикл или просто длинный.
При этом я проверял, макрос выполняется и без этого цикла, но стирать опасаюсь, может он на что-то важное привязан.
Когда испробованы все варианты, я начинаю плясать с бубном. Как правило — помогает.
 
Это ожидание пока эксплорер занят или его "статус готовности" <>4.
 
Abakumov, за столько времени на форуме пора бы усвоить, что название инструмента, оператора, функции не может быть названием темы.
Такие темы обычно удаляются. Переименовал.
 
Vikttur, приношу извинения. Hugo, спасибо за ответ. Главное я понял, что эта строчкан не позволяет выполнять дальнейшие действия, пока IE прогружает открываемую страницу
Когда испробованы все варианты, я начинаю плясать с бубном. Как правило — помогает.
Страницы: 1
Наверх