HtmlDocument.GetElementsByTagName(String) Methode
Definition
Wichtig
Einige Informationen beziehen sich auf Vorabversionen, die vor dem Release ggf. grundlegend überarbeitet werden. Microsoft übernimmt hinsichtlich der hier bereitgestellten Informationen keine Gewährleistungen, seien sie ausdrücklich oder konkludent.
Dient zum Abrufen einer Auflistung von Elementen mit dem angegebenen HTML-Tag.
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 Objekte, die HtmlElement Sie abrufen möchten.
Gibt zurück
Die Auflistung von Elementen, die den Tagnamen aufweisen, entspricht dem tagName Argument.
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 über ein WebBrowser Steuerelement mit dem Namen verfügt 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