HtmlDocument.GetElementsByTagName(String) Metod
Definition
Viktigt
En del information gäller för förhandsversionen av en produkt och kan komma att ändras avsevärt innan produkten blir allmänt tillgänglig. Microsoft lämnar inga garantier, uttryckliga eller underförstådda, avseende informationen som visas här.
Hämta en samling element med den angivna HTML-taggen.
public:
System::Windows::Forms::HtmlElementCollection ^ GetElementsByTagName(System::String ^ tagName);
public System.Windows.Forms.HtmlElementCollection GetElementsByTagName(string tagName);
member this.GetElementsByTagName : string -> System.Windows.Forms.HtmlElementCollection
Public Function GetElementsByTagName (tagName As String) As HtmlElementCollection
Parametrar
- tagName
- String
Namnet på HTML-taggen för de objekt som HtmlElement du vill hämta.
Returer
Samlingen med element som taggar namn är lika med tagName argumentet.
Exempel
HTML-sidor använder ofta taggen META för att bädda in godtycklig information om dokumentet. Följande HTML-kodexempel hämtar alla META taggar i ett HTML-dokument, hittar taggen META med namnet Descriptionoch visar den för användaren. Kodexemplet kräver att programmet har en WebBrowser kontroll med namnet WebBrowser1.
private void DisplayMetaDescription()
{
if (webBrowser1.Document != null)
{
HtmlElementCollection elems = webBrowser1.Document.GetElementsByTagName("META");
foreach (HtmlElement elem in elems)
{
String nameStr = elem.GetAttribute("name");
if (nameStr != null && nameStr.Length != 0)
{
String contentStr = elem.GetAttribute("content");
MessageBox.Show("Document: " + webBrowser1.Url.ToString() + "\nDescription: " + contentStr);
}
}
}
}
Private Sub DisplayMetaDescription()
If (WebBrowser1.Document IsNot Nothing) Then
Dim Elems As HtmlElementCollection
Dim WebOC As WebBrowser = WebBrowser1
Elems = WebOC.Document.GetElementsByTagName("META")
For Each elem As HtmlElement In Elems
Dim NameStr As String = elem.GetAttribute("name")
If ((NameStr IsNot Nothing) And (NameStr.Length <> 0)) Then
If NameStr.ToLower().Equals("description") Then
Dim ContentStr As String = elem.GetAttribute("content")
MessageBox.Show("Document: " & WebOC.Url.ToString() & vbCrLf & "Description: " & ContentStr)
End If
End If
Next
End If
End Sub