我知道这是一个愚蠢的问题,但是我对此很难。我想获取没有标识符的“ href”的值,但我不能。
这是HTML
<p class="CLASS">
<a href="URL" target="TARGET">
<img src="IMGURL" title="TITLE" border="BORDER">
</a>
</p>
这是我正在使用的(不起作用):
For Each WPE As HtmlElement In WebBrowser1.Document.GetElementsByTagName("a")
If WPE.GetAttribute("target").Equals("TARGET") Then
HREFVALUE = WPE.Getattribute("href")
Exit For
End If
Next
那么如何获得'href'的值呢?
您的代码工作正常。但是您没有得到预期的结果,因为您可能在错误的位置执行了代码。该代码应在文档完成后运行。控件的DocumentCompleted
事件是了解文档已完成的一个好地方WebBrowser
:
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Me.WebBrowser1.Navigate("d:\file.html")
End Sub
Private Sub WebBrowser1_DocumentCompleted(sender As Object, e As _
WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted
Dim tag = Me.WebBrowser1.Document.GetElementsByTagName("a").Cast(Of HtmlElement) _
.Where(Function(a) a.GetAttribute("target") = "TARGET") _
.FirstOrDefault()
Dim href = tag.GetAttribute("href")
End Sub
我在上面的代码中使用linq只是出于学习目的。您自己的代码也可以正常工作。
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句