Discussion :

[Victor_o0]

Bonjour a tous ,

Je me suis lancé dans le VB très récemment,
Je cherche a récupérer des informations présentes dans le tableau d'une page web avec HTMLAgilityPack. J'ai pour le moment déjà réussi a récupérer des informations de la page mais aucunes provenant de ce tableau.

Je vous poste ci dessous une impression d’écran de la page en question


Je cherche a recupérer la valeur de 'pptEV'

Voici mon code : ( tout ce qui a de plus basiques )

J'ai essayé de multiple manière de mis prendre et je reçois a chaque fois une valeur 'null'

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
 
Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
 
        Dim web As New HtmlWeb()
        Dim url As String = "XXXXXXXXXX"
        Dim doc As HtmlDocument = web.Load(url)
 
        Dim div As HtmlNode = doc.DocumentNode.SelecSingleNode("/html/body/div/table/tr[1]/td[1]")
		'link.GetAttributeValue("//td[@id='pptEV']", "null")
		'Dim div As HtmlNode = doc.DocumentNode.SelectSingleNode("//td[@id='pptEV']")
        If Not div Is Nothing Then
            Label33.Text = "Recherche DIV : KO"
        End If
 
        Dim pptEVIndidcatorValue = div.InnerText 
 
        TextBox1.Text = pptEVIndidcatorValue
 
 
 
    End Sub

Merci d'avance