HtmlDocument.GetElementsByTagName(String) Methode

Definition

Ruft eine Auflistung von Elementen mit dem angegebenen HTML-Tag ab.

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

Parameter

tagName
String

Der Name des HTML-Tags für die HtmlElement-Objekte, die Sie abrufen möchten.

Gibt zurück

HtmlElementCollection

Die Auflistung von Elementen, deren Tagname gleich dem tagName-Argument ist.

Beispiele

HTML-Seiten verwenden häufig das META Tag, um beliebige Informationen zum Dokument einzubetten. Im folgenden HTML-Codebeispiel werden alle META Tags in einem HTML-Dokument abgerufen, das META Tag mit dem Namen Descriptiongefunden und dem Benutzer angezeigt. Das Codebeispiel erfordert, dass Ihre Anwendung ein WebBrowser Steuerelement mit dem Namen " 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

Gilt für

Siehe auch