-Поиск по дневнику

Поиск сообщений в rss_sql_ru_access_programming

 -Подписка по e-mail

 

 -Постоянные читатели

 -Статистика

Статистика LiveInternet.ru: показано количество хитов и посетителей
Создан: 16.03.2006
Записей:
Комментариев:
Написано: 4


IE As Object. Set IE = Nothing

Четверг, 21 Июля 2016 г. 21:10 + в цитатник
Добрый день.
ВинХР, Акц2000, 32-бит, .mdb, IE8.

А акцессе есть состаящая из большого количества записей таблица в которой хранятся url-адреса. Цикл по таблице открывает процедуру.
Часть кода этой процедуры:

Private Sub subТруляля(url As String)
Dim IE As Object
Dim oDoc As New MSHTML.HTMLDocument
    Set IE = CreateObject("InternetExplorer.Application")
    With IE
        .navigate url
        Do
            If IE.readyState = READYSTATE_COMPLETE Then
                Exit Do
            End If
        Loop
        Set oDoc = .Document
        Do
            DoEvents
        Loop Until oDoc.readyState = "complete"

..............................
    End With 'IE
Set oDoc = Nothing:  Set IE = Nothing
End Sub


Все работает. Но существует проблема.
При завершение процедуры Set IE = Nothing должен разрушить объект IE и удалить его из памяти. Но этого почему то не происходит. Соответственно он висит в памяти. При цикличности процедуры в ней накапливается до критических масштабов.
Как можно удалить из памяти этот отработанный объект?
Спасибо

http://www.sql.ru/forum/1223594/ie-as-object-set-ie-nothing


 

Добавить комментарий:
Текст комментария: смайлики

Проверка орфографии: (найти ошибки)

Прикрепить картинку:

 Переводить URL в ссылку
 Подписаться на комментарии
 Подписать картинку