Знатокам HTML

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Sirik
Perspicaz
Perspicaz
Аватара пользователя
 
Сообщения: 2280
Зарегистрирован: 19.02.2004 (Чт) 16:09
Откуда: Бердичев, Украина

Знатокам HTML

Сообщение Sirik » 09.12.2004 (Чт) 16:47

Допустим я загружаю в WebBrowser страницу. Как мне узнать: когда страница загружена и, вобще, проверить загрузилась она или нет?

Konst_One
Член-корреспондент академии VBStreets
Член-корреспондент академии VBStreets
Аватара пользователя
 
Сообщения: 3041
Зарегистрирован: 09.04.2004 (Пт) 13:47
Откуда: Химки

Сообщение Konst_One » 09.12.2004 (Чт) 16:54

у контрола WebBrowser есть ряд полезных событий, в том числе DocumentComplete

Sirik
Perspicaz
Perspicaz
Аватара пользователя
 
Сообщения: 2280
Зарегистрирован: 19.02.2004 (Чт) 16:09
Откуда: Бердичев, Украина

Сообщение Sirik » 09.12.2004 (Чт) 17:04

Konst_One писал(а):у контрола WebBrowser есть ряд полезных событий, в том числе DocumentComplete


Я об этом и спрашиваю :?

Мне надо узнать на каком этапе нахрдится загрузка страницы и загрузилась она или нет

Konst_One
Член-корреспондент академии VBStreets
Член-корреспондент академии VBStreets
Аватара пользователя
 
Сообщения: 3041
Зарегистрирован: 09.04.2004 (Пт) 13:47
Откуда: Химки

Сообщение Konst_One » 09.12.2004 (Чт) 17:12

можно после выполнения команды открытия URL ждать в цикле и проверять состояние State, но лучше конечно в событиях контрола прописать нужный тебе код, кажется задесь уже кто-то задавал похожий вопрос. попробуй поискать на форуме

Konst_One
Член-корреспондент академии VBStreets
Член-корреспондент академии VBStreets
Аватара пользователя
 
Сообщения: 3041
Зарегистрирован: 09.04.2004 (Пт) 13:47
Откуда: Химки

Сообщение Konst_One » 09.12.2004 (Чт) 17:15

что-то типа такого:
Код: Выделить всё
146     WEB.Navigate FileName
        DoEvents
148     Do While (WEB.ReadyState <> READYSTATE_COMPLETE)
150         If VBA.Timer >= (tmr + Me.TimeOut) Then
151             WEB.Stop
152             ErrNumber = errWaitTimeout
154             mMain.LogInfo "Print error: " & errWaitTimeout & " Navigate wait timeout."
                Exit Function
            End If
156         DoEvents
        Loop

Sirik
Perspicaz
Perspicaz
Аватара пользователя
 
Сообщения: 2280
Зарегистрирован: 19.02.2004 (Чт) 16:09
Откуда: Бердичев, Украина

Сообщение Sirik » 09.12.2004 (Чт) 17:42

А я сдела так:
В событии ProgressChange отслеживаю значения Progress --> если встречается два раза -1 значит страница не загрузилась, иначе ок. Всё это когда Progress достигнит 0

У меня работает

marvan
Бывалый
Бывалый
 
Сообщения: 269
Зарегистрирован: 22.06.2004 (Вт) 13:26
Откуда: Москва

Сообщение marvan » 09.12.2004 (Чт) 18:32

Код: Выделить всё
    brows.Navigate "адрес"
    While brows.Document Is Nothing
        DoEvents
    Wend
    'страница загружена


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: Yandex-бот и гости: 20

    TopList