Nyelv

HtmlDocument.GetElementsByTagName(String) Metódus

Definíció

A megadott HTML-címkével rendelkező elemek gyűjteményének lekérése.

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

Paraméterek

tagName
String

A lekérni kívánt objektumok HTML-címkéjének HtmlElement neve.

Válaszok

Azoknak az elemeknek a gyűjteménye, amelyek neve megegyezik az tagName argumentum nevével.

Példák

A HTML-oldalak gyakran használják a META címkét a dokumentum tetszőleges információinak beágyazására. Az alábbi HTML-kód példa lekéri egy META HTML-dokumentum összes címkéjét, megkeresi a META címkét a névvel Description, és megjeleníti a felhasználónak. A példakód megköveteli, hogy az alkalmazás rendelkezik egy WebBrowser vezérlővel.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

A következőre érvényes:

Lásd még