VB6 HTML elements offsetParent рекурсив проблема

[eugene2005]

VB6 HTML elements offsetParent рекурсив проблема
Как рекурсивно обнаружить все родительские элементы где сидит текущий ХТМЛ элемент? Я делаю так и ВБ6 ругается, что то не нравиться ему

While (TypeOf elem Is IHTMLElement)
parentall = "-Parent Tag=" & elem.offsetParent.tagName & _
elem.id & ",l=" & elem.offsetLeft & ";t=" & elem.offsetTop & _
Set elem = elem.offsetParent
Wend

[Хакер]

VB6 HTML elements offsetParent рекурсив проблема
Как рекурсивно обнаружить все родительские элементы где сидит текущий ХТМЛ элемент? Я делаю так и ВБ6 ругается, что то не нравиться ему

While (TypeOf elem Is IHTMLElement)
parentall = "-Parent Tag=" & elem.offsetParent.tagName & _
elem.id & ",l=" & elem.offsetLeft & ";t=" & elem.offsetTop & _
Set elem = elem.offsetParent
Wend

Дибилизм говорить фразы типа "Выдаёт ошибку". Самое главное в ошибке - её описание. В 90% случаев из описания сразу же следует путь решения проблемы.

И почему то поголовно все не удосуживаются привести текст ошибки.

-- Хакер, как мне сделать то-то?
-- На код.
-- Не работает - ошибку выдаёт.

И вот откуда я могу знать, в чём проблема?

-- Какую?
-- Variable not defined.

И в этот момент достаточно текста ошибки, чтобы понять, в чём проблема. Почему до спрашивающего не доходит объявить переменную самому? Почему я ему должен говорить, о необходимости этого действия, если он юзает Option Explicit ?

У меня нет никакого желания открывать новую инстанцию IDE (у меня это иногда приводит к BSOD-у - везде стоит одна и таже винда, с одним презабавнейшим багом ) только для того чтобы проверить твой код, или становиться синтаксическим анализатором.

ADDED:
Таки вчитался в код. В третьей строчке кода убери амперсанд и символ подчёркивания ( & _ ) в конце. Зачем они там?

[Antonariy]

Затем, что человек vb не знает, знать не хочет, но ему кое-что очень надо.

[eugene2005]

If elem.tagName = "BODY" Then
'MsgBox "this is BODY top, i quit"
Exit Do
End If

ну хорошо
как мне добиться того что бы ВБ6 не вываливалось с ошибкой когда elem.offsetParent не существует?

[GSerg]

Прочитать текст этой ошибки и понять его.

[Хакер]

[offtopic]Перечитал свой пост. Ужас. Я что, - пьяный был?[/offtopic]