HtmlDocument.GetElementsByTagName(String) Yöntem

Tanım

Ad Alanı:
System.Windows.Forms
Bütünleştirilmiş Kod:
System.Windows.Forms.dll

Belirtilen HTML etiketine sahip bir öğe koleksiyonu alın.

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

Parametreler

tagName
String

Almak istediğiniz nesnelerin HTML etiketinin HtmlElement adı.

Döndürülenler

HtmlElementCollection

Adı etiketleyen öğelerin koleksiyonu bağımsız değişkene tagName eşittir.

Örnekler

HTML sayfaları genellikle belge hakkında rastgele bilgiler eklemek için etiketini kullanır META . Aşağıdaki HTML kodu örneği, bir HTML belgesi içindeki META tüm etiketleri alır, adlı Descriptionetiketi bulur META ve kullanıcıya görüntüler. Kod örneği, uygulamanızın adlı WebBrowserbir WebBrowser1 denetime sahip olmasını gerektirir.

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

Şunlara uygulanır

Ayrıca bkz.