1 pièce(s) jointe(s)
Parser page HTML en VB avec HtmlAgilityPack
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
Pièce jointe 450172
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:
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
