Discussion :

[aA189]

Bonjour , je rencontre quelques difficultes avec une nouvelle notion pour moi , «*le regex*» .
Il s’agit de récuperer la pression du jour en kpa sur le site http://www.meteo-de-france.info/ (aujourd’hui c’est 101.83 kpa)

Mon regex semble mal formulé et la boucle for each ne réagit pas .

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
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
 
 
        Dim request As System.Net.HttpWebRequest = System.Net.HttpWebRequest.Create("http://www.meteo-de-france.info/")
        Dim response As System.Net.HttpWebResponse = request.GetResponse
 
        Dim sr As System.IO.StreamReader = New System.IO.StreamReader(response.GetResponseStream())
 
        Dim rssourcecode As String = sr.ReadToEnd
        Dim r As New System.Text.RegularExpressions.Regex("<span class=""opt"">”.*”</span>")
        Dim matches As MatchCollection = r.Matches(rssourcecode)
 
        For Each itemcode As Match In matches
            MsgBox (itemcode.Value.Split("""").GetValue(3))   
        Next
 
 
    End Sub

[tomlev]

Les expressions régulières ne sont pas du tout adaptées pour analyser du HTML... utilise plutôt un outil comme HTML Agility Pack

Ca devrait être assez simple, parce que les infos qui t'intéressent sont dans une balise <p> qui a un id (p_temps), donc tu peux facilement le récupérer. Ensuite le span qui t'intéresse est le 6e, donc il suffit d'ignorer les 5 premiers :

Code C# :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
    var doc = new HtmlDocument();
    var wc = new WebClient();
    using (var stream = wc.OpenRead(@"http://www.meteo-de-france.info/"))
    {
        doc.Load(stream);
    }
    var p_temps = doc.GetElementbyId("p_temps");
    var pressure = p_temps.ChildNodes.Where(n => n.Name == "span").Skip(5).Select(n => n.InnerText);

EDIT: converti en VB.NET avec ce convertisseur :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Dim doc = New HtmlDocument()
Dim wc = New WebClient()
Using stream = wc.OpenRead("http://www.meteo-de-france.info/")
	doc.Load(stream)
End Using
Dim p_temps = doc.GetElementbyId("p_temps")
Dim pressure = p_temps.ChildNodes.Where(Function(n) n.Name = "span").Skip(5).[Select](Function(n) n.InnerText)

[aA189]

La ligne ci-dessous est récalcitrante

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Dim doc = New System.Windows.Forms.HtmlDocument()

Erreur 2 Le type 'System.Windows.Forms.HtmlDocument' n'a aucun constructeur

Que dois-je faire ?

NB -j'aie importé la référence htmlagilitypack.dll .Mais je ne sais pas trop comment cela s'utilise .Je pense que ces dll contiennent des classes
mais comment les lire et les utiliser alors là .
-Quand je veux importer la référence HTML Objects library mon PC se met à ramer .Impossible d'installer cette référence ?!

Edit
Finalement la référence HTML Objects library a fini par s'installer mais c'était long ...

[tomlev]

La ligne ci-dessous est récalcitrante

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Dim doc = New System.Windows.Forms.HtmlDocument()

Euh... qui a parlé de System.Windows.Forms.HtmlDocument ? Pas moi en tous cas
Ce n'est pas la classe HtmlDocument de Windows Forms qu'il faut utiliser, mais celle de HTML Agility Pack

NB -j'aie importé la référence htmlagilitypack.dll .Mais je ne sais pas trop comment cela s'utilise .Je pense que ces dll contiennent des classes

Tu ajoutes la référence à la DLL, et dans ton code tu importes le namespace :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Imports HtmlAgilityPack

-Quand je veux importer la référence HTML Objects library mon PC se met à ramer .Impossible d'installer cette référence ?!

Ca n'a rien à voir, tu n'as pas besoin de HTML Objects Library

[aA189]

Ok avec "imports htmlAgilityPack" , malheureusement , un 2 ème problème a surgit .
J’aie installé la dll comme j’aie pu mais visiblement c’est pas ça …

Impossible de charger le fichier ou l'assembly 'HtmlAgilityPack, Version=1.4.0.0, Culture=neutral, PublicKeyToken=bd319b19eaf3b43a' ou une de ses dépendances. Le fichier spécifié est introuvable.

Pourtant dans l’explorateur de solutions , dossier « Références » HtmlAgilityPack est visible .Peut-etre que je devais déposer la dll dans un dossier spécial ?

[tomlev]

Sélectionne la référence dans l'explorateur de solution, et vérifie dans ses propriétés que "Copie locale" est bien à True

[aA189]

Merci Tomlev , tout baigne ...