Bonjour ;
Je me suis lancé sur un petit projet tout simple, en effet mon but serait qu'une fois une adresse vidéo youtube mise dans une textbox1 et appuyée sur un boutton ont puissent afficher tout les tags que la personne à utilisé pour sa vidéo. Tout allez bien jusqu’à que je me constate que tout les tags soient misent en plusieurs exemplaires ... c'est normal ?

Voici le code :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
Public Class Form1
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        WebBrowser1.Navigate(TextBox1.Text)
    End Sub
 
    Private Sub WebBrowser1_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted
        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("property")
 
                If ((NameStr IsNot Nothing) And (NameStr.Length <> 0)) Then
                    If NameStr.ToLower().Equals("og:video:tag") Then
                        Dim ContentStr As String = elem.GetAttribute("content")
                        TextBox2.Text = TextBox2.Text & vbCrLf & ContentStr
                    End If
                End If
            Next
        End If
    End Sub
End Class
Pouvez vous m'aider à régler ce problème qui pourrais m'afficher au final chaque Tags une seule fois ? Merci