Ошибка в mshtml

[Antonariy]

Проблема такая: загружаю документ и отлавливаю в нем события. Иногда при обработке клика vb или сама прога падает с недопустимой в приличном обществе ошибкой, отловить которую не получается. Вот как она выглядит в event viewer:

Ошибка приложения vb6.exe, версия 6.0.97.82, модуль mshtml.dll, версия 6.0.2900.2769, адрес 0x000fa4d1.

или

Ошибка приложения vbaclient.exe, версия 1.0.0.184, модуль mshtml.dll, версия 6.0.2900.2769, адрес 0x000fa4d1.

Просмотрел все сообщения, почти всегда глюк по адресу 0x000fa4d1, дважды попался 0x00068356. Как можно выяснить, что за неблагоприятное стечение обстоятельств заставляет грохаться mshtml?

PS. Однажды отправил такую ошибку в дебаг 2005й студии. Она вывела многкилометровый листинг ассемблерных инструкций, я перетащил исполнение на следующую инструкцию после ошибочной и выполнение продолжилось как ни в чем ни бывало.

[Konst_One]

http://www.eworldui.net/forums/PrintPost.aspx?PostID=3550

ничего утешительного

[Antonariy]

Эхх, надеюсь со следующим ie mshtml подштопают.

[ALX_2002]

Отцы. Да вы чего. Помоему всё отлично в ней пашет

Я какие только события не ловил ! Всё норм там !

2 Antonariy: Постучи мне в асю, если время будет. Мож чем помочь смогу.

Вот пример

[Antonariy]

И чем мне может помочь программа для мобильников Motorola? Или в чем смысл примера? Да еще с ошибкой.

WB.LocationURL = ""

WB.LocationURL - read only.

[Kovu]

Antonariy
Ну раз выполнение продолжается как ни в чем ни бывало, поставь свой Error Handler с EXCEPTION_CONTINUE_EXECUTION

[Antonariy]

Antonariy
Ну раз выполнение продолжается как ни в чем ни бывало, поставь свой Error Handler с EXCEPTION_CONTINUE_EXECUTION

Это что значит?

[ALX_2002]

Соррии - не тот пример залил !!!

Сейчас снова перезалью....

[Kovu]

Это что значит?

Ну использовать SetUnhandledExceptionFilter. А в процедуре обработки исключения возвращать EXCEPTION_CONTINUE_EXECUTION , т.е. продолжение выполнения.

[Antonariy]

ALX_2002
Опять не то залил?

Kovu
Ты не это ли имеешь ввиду?
http://bbs.vbstreets.ru/viewtopic.php?t ... 13ec4e9433
Как это работает?

[Kovu]

Antonariy
Именно это. Держи пример. strLib -название той библиотеки, ошибку в которой игнорировать надо. lngLibSize -размер библиотеки

[ALX_2002]

Не. Ща всё то залил. Отлов событий в документе.

Вроде всё то ????

[Antonariy]

Kovu
Поиск как всегда рулит
ALX_2002
В нем нет для меня ничего нового.

[Antonariy]

lngLibSize -размер библиотеки

Размер файла библиотеки? Если так, то у меня размер kernel32.dll 989696, а не 983552 как у тебя.
Еще у меня XP Sp2.

[Kovu]

lngLibSize -размер библиотеки

Размер файла библиотеки? Если так, то у меня размер kernel32.dll 989696, а не 983552 как у тебя.
Еще у меня XP Sp2.

У меня тоже Сп2, но размер такой. Ну тогда измеряй размер файла библиотеки перед установкой процедуры обработки ошибок. Хотя у тебя же вроде фиксированный размер mshtml.dll (если ты её за собой таскаешь)

[Antonariy]

С определением размера справлюсь, спс

[Antonariy]

Не получается. Процедуру фильтра изменил следующим образом:

Код: Выделить всё

Public Const strLib As String = "mshtml.dll"

Public Function ExceptionFilter(ByRef ExceptionPtrs As EXCEPTION_POINTERS) As Long
Dim Rec As EXCEPTION_RECORD
Dim strException As String
Dim hMem As Long
Dim lngLibSize As Long
Dim s As String
    s = Space(100)
    GetSystemDirectory s, 100
    s = Trim(Replace(s, Chr(0), "\"))
    lngLibSize = FileLen(s & strLib)
    Rec = ExceptionPtrs.pExceptionRecord
    Do Until Rec.pExceptionRecord = 0
        CopyExceptionRecord Rec, Rec.pExceptionRecord, Len(Rec)
    Loop
    hMem = GetModuleHandle(strLib)
    If Rec.ExceptionAddress > hMem And Rec.ExceptionAddress < hMem + lngLibSize Then
        Select Case MsgBox("Error in " & strLib & "!", vbCritical + vbAbortRetryIgnore)
            Case vbAbort: ExceptionFilter = EXCEPTION_EXECUTE_HANDLER
            Case vbRetry: ExceptionFilter = EXCEPTION_CONTINUE_SEARCH
            Case vbIgnore: ExceptionFilter = EXCEPTION_CONTINUE_EXECUTION
        End Select
    Else
        ExceptionFilter = EXCEPTION_EXECUTE_HANDLER
    End If
End Function

По vbAbort вылетает со свистом, по vbRetry совершает недопустимую операцию и вылетает с отчетом, по vbIgnore раз за разом появляется этот msgbox.

Не поленился еще раз отправить эту ошибку в дебаг 2005й, скриншот асма, сделанный при перетаскивании стрелки исполнения, прилагается. Перетащил, продолжил исполнение, прога не упала. Может, в этой процедуре можно еще какие нибудь телодвижения сделать, помимо вывода сообщения?

[Kovu]

Эм, месаджбокс вообще был для примера что эта процедура срабатывает По идее когда игноришь программа продолжать выполняться как ни в чем не бывало должна, по крайней мере с fmod.dll так было

[Antonariy]

Создал пример 100%но гарантирующий эту ошибку. Для работы примера желательно создать dsn с базой nwind.mdb, входящей в стандартную поставку офиса.

Запустить пример, нажать Command1, в окне броузера жать по кнопкам Удалить до появления ошибки.

[Antonariy]

Нашлось-таки лекарство WindowsXP-KB916281-x86-RUS.exe

[tyomitch]

А у меня прога падает с ошибкой в mshtml по адресу 7b6f0.
Версия модуля -- 6.0.2900.2912
Это тот же баг, или другой?

[Antonariy]

Видимо другой. Мой в версии 2912 не воспроизводится.
Пробовал свой пропустить через SetUnhandledExceptionFilter?

[tyomitch]

Я эту ошибку сам поймать тоже не могу
Но много кто говорит, что она там есть.

У меня у самого стоит 2604, и вообще ни разу не было, чтобы с ошибкой в нём что-то падало...

[Antonariy]

2604? Откуда такой раритет? 2769 уже встроена в XP SP2.

[tyomitch]

Наверное, из SP1; не помню, откуда.
Может, прога какая-то кривая поставила.
А что? это очень плохо, что она старая?

[Antonariy]

В моем случае оказалось, что плохо В новой ошибку вроде как устранили. По крайней мере я не смог ее воспроизвести на своем примере test.

Кстати:

А у меня прога падает с ошибкой в mshtml по адресу 7b6f0.
Версия модуля -- 6.0.2900.2912

У меня у самого стоит 2604

Какая все-таки стоит? И ошибка возникает регулярно или очень редко?

[tyomitch]

Я эту ошибку сам поймать тоже не могу
Но много кто говорит, что она там есть.

У меня у самого стоит 2604, и вообще ни разу не было, чтобы с ошибкой в нём что-то падало...

У "много кого" возникает регулярно.
У меня не возникает вообще.