На главную
ПРАВИЛА FAQ Помощь Участники Календарь Избранное RSS
msm.ru
! Правила раздела Visual Basic: Общие вопросы
Здесь обсуждаются вопросы по языку Visual Basic 1-6 (а так же по схожим языкам, как, например, PowerBASIC).
Вопросы по Visual Basic .NET (это который входит в состав Visual Studio 2002/2003/2005/2008+, для тех, кто не в курсе) обсуждаются в разделе .NET.

Обратите внимание:
1. Прежде чем начать новую тему или отправить сообщение, убедитесь, что Вы не нарушаете правил форума!
2. Обязательно воспользуйтесь поиском. Возможно, Ваш вопрос уже обсуждали. Полезные ссылки приведены ниже.
3. Темы с просьбой выполнить какую-либо работу за автора в этом разделе не обсуждаются. Студенты, вам сюда: ПОМОЩЬ СТУДЕНТАМ!
4. Используйте теги [ code=vba ] ...текст программы... [ /code ] для выделения текста программы подсветкой.
5. Помните, здесь телепатов нет. Формулируйте свой вопрос максимально грамотно и чётко: Как правильно задавать вопросы
6. Запрещено отвечать в темы месячной (и более) давности, без веских на то причин.

Полезные ссылки:
user posted image FAQ Сайта user posted image FAQ Раздела user posted image Кладовка user posted image Наши Исходники user posted image API-Guide user posted image Поиск по Разделу user posted image MSDN Library Online user posted image Google

Ваше мнение о модераторах: user posted image SCINER, user posted image B.V.
Модераторы: SCINER, B.V.
  
> Ошибка объекта IE
    ExpandedWrap disabled
          Set IE = CreateObject("InternetExplorer.Application")
          IE.Toolbar = False
          IE.Silent = True


    Win 10. Иногда в проге c объектом IE вылетает пару ошибок. Далее невозможно ни закрыть окно IE, ни завершить прогу. Только убить через Диспетчер задач. В диспетчере появляется с десяток экземпляров IE, хотя, на компе работают 2 проги = 2 экземпляра IE.

    Скрины ошибок ниже. От чего возникают эти ошибки и с чем они связаны?
    Прикреплённая картинка
    Прикреплённая картинка

    Прикреплённая картинка
    Прикреплённая картинка


    Добавлено
    М.б. ошибка вылетает на IE.navigate, этот вызов у меня не обрабатывается.

    Добавлено
    А может и тут:

    ExpandedWrap disabled
      Private Sub IE_DocumentComplete(ByVal pDisp As Object, URL As Variant)
          
          PageHTML = LCase(IE.document.body.innerHTML)
      End Sub


    Добавлено
    Если бы стоял WebBrowser - этих проблем не было бы. Для IE нужно каждое действие обрабатывать на ошибку?
    Сообщение отредактировано: BlackSun -
      В целом, в какой-то момент происходит конфликт между объектами IE в обоих приложениях. Когда работает одна программа - всё идёт гладко. Когда обе - ошибки. Значит, что-то не то в создании объекта IE.

      Добавлено
      ExpandedWrap disabled
        Private WithEvents IE As SHDocVw.InternetExplorer
        Private WithEvents IEDoc As MSHTML.HTMLDocument
         
        Private Sub Form_Initialize()
            CreateIE True
        End Sub
         
        Private Sub CreateIE(fVisible As Boolean)
            Set IE = Nothing
            Set IE = CreateObject("InternetExplorer.Application")
            fIE_Open = True
            IE.Toolbar = False
            IE.Silent = True
            Form_Resize
            IE.Visible = fVisible
            
        End Sub
      Сообщение отредактировано: BlackSun -
        Конфликта, похоже, нет. Есть подозрения, что ошибки сыпятся когда смотрятся фильмы в Firefox и расходуется вся опер. память, либо когда Win10 грузит диск на 100% своими кривыми сервисами, вроде "Группа служб Unistack: *_39еба"...
        1 пользователей читают эту тему (1 гостей и 0 скрытых пользователей)
        0 пользователей:


        Рейтинг@Mail.ru
        [ Script Execution time: 0,0983 ]   [ 17 queries used ]   [ Generated: 23.01.20, 01:46 GMT ]