Webbrowser GetElementsByTagName зацикливается в этой области тегов

Я уже некоторое время пытаюсь понять, как это сделать. Я хочу найти имя класса формы "live_" что я отлично могу сделать с приведенным ниже кодом, но я не знаю, как получить текстовое значение в этом теге формы без перебора всего кода и получения всех остальных текстовых значений формы на странице.

Я использую элемент управления веб-браузером в своей winform.

Код, который я должен получить тег формы, таков:

Dim theElementCollection As HtmlElementCollection = Nothing

theElementCollection = wbNewsFeed.Document.GetElementsByTagName("form")

For Each curElement As HtmlElement In theElementCollection
   If curElement.GetAttribute("className").ToLower.Contains("live_") Then
     Dim theID As String = curElement.GetAttribute("data-live")
   End If
Next

Приведенный выше код в настоящее время зацикливается, пока не найдет больше тегов формы на этой странице. Если он находит тег формы, он проверяет, содержит ли этот тег формы имя класса live_ в какой-либо части своего имени. Этот код отлично работает и находит все теги формы по этому классу. Однако некоторые теги формы по-прежнему имеют этот класс, но не имеют текстового поля, которое я также хочу искать только внутри этого тега формы.

HTML выглядит примерно так:

<form class="live_574bf67566_58vvifkfkyu5237 commentable expand_mode" id="0_f" 
 onsubmit="return window.Event &amp;&amp;" action="change.php" method="post"
 data-ft='{"ge":"]"}' rel="async" data-live='{"seq":"574bf67566_1857067654230"}'>

   <input name="charset_test" type="hidden" value="6,52g,6b88">
   <input name="fb_dtsg" type="hidden" value="AQB4SLmU" autocomplete="off">
   [LOT of code here....]
   <input class="hiddenInput" type="hidden" autocomplete="off" data-id="785fgj67-774">
   <div class="innerWrap" data-reactid=".1l.1:4.0.$right.0.0.0.0.1.0.1">
      <textarea name="add_comment_text" title="Write a comment..." class="textInput mentions" placeholder="Write a comment..." value="Write a comment..." data-id="57-986-gn-52">Write a comment...</textarea>
   </div>
   [some more code here]
</form>

Итак, мой вопрос: как мне просмотреть только эту текущую область тега формы и найти, есть ли в ней это текстовое поле (.GetAttribute("title").ToString.ToLower = "write комментарий...")?

Я пытался сделать следующее:

Dim theElementCollection2 As HtmlElementCollection = Nothing

For Each curElement As HtmlElement In theElementCollection
   If curElement.GetAttribute("className").ToLower.Contains("live_") Then
      Dim theID As String = curElement.GetAttribute("data-live")

      theElementCollection2 = curElement.Document.GetElementsByTagName("textarea")

      For Each curElement2 As HtmlElement In theElementCollection2
         Debug.Print(curElement2.GetAttribute("title").ToLower.ToString)
         If curElement2.GetAttribute("title").ToLower.ToString = "write a comment..." Then
            Debug.Print("Found! " & curElement2.GetAttribute("name"))
         End If
      Next
   End If
Next

Но, похоже, это только цикл по всей html-странице...

Спасибо за ваше время и помощь!


dom vb.net webbrowser-control getelementsbytagname html-agility-pack
person StealthRT    schedule 27.03.2014    source источник

Ответы (1)


arrow_upward
0
arrow_downward

Похоже, вам нужно:

curElement.Children.GetElementsByName("add_comment_text")(0)
person shmosel    schedule 04.05.2014