На веб-странице есть элемент, который определяет статус (в приведенном примере он содержит слово Передан, а вообще может принимать и другие значения). Как можно вытащить текст из данного элемента, чтобы исходя из этого текста, совершать дальнейшие действия по условию?
Не совсем понятно, что именно не получается. Вы код HTML получили успешно? Из кода не получается текст выцепить или код HTML получить тоже не получается?
Дмитрий Щербаков написал: Из кода не получается текст выцепить или код HTML получить тоже не получается?
Здравствуйте, Дмитрий. Html - код получаю с помощью Проверить элемент. Страница загружается, мне нужно получить текст, содержащийся в данном элементе - это статус, который может принимать различные значения, одно из этих значений - Передан
Public Sub test()
Dim sHtml As String, pTag As Object
Dim pDoc As New MSHTML.HTMLDocument
sHtml = "<DIV id='$PpyListViewContentPage$ppxResults$l2$pWork_StatusTitleError' class='iconErrorDiv' style='DISPLAY: none'><SPAN title='' class='iconError' errId=''>Передан </SPAN></DIV>"
pDoc.body.innerHTML = sHtml
Set pTag = pDoc.querySelector("DIV.iconErrorDiv")
If Not pTag Is Nothing Then Debug.Print pTag.innerText
End Sub