Discussion :

[Sodruza]

Bonjour tout le monde,

Tout est dit dans le titre, mais bon il vaut mieux une phrase : "Sur vb.net il est possible de faire .getElementById / GetElementsByName etc etc ... Y a t il une astuce pour faire un GetElementsByClassName étant donné que ça n'existe pas par défaut?". L'objectif ça serait de faire comme pour un web control d'internet explorer .getElementsByClassName("XXXX")(Y).innerText par exemple.

Voici mon morceau de code qui marche pour un ID :

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
    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
 
        Dim Test2 As String = "http://vi.vipr.ebaydesc.com/ws/eBayISAPI.dll?ViewItemDescV4&item=182246994036&t=1475242705000&tid=7710&category=115699&seller=www.expondo.de*&excSoj=1&excTrk=1&lsite=77&ittenable=false&domain=ebay.de&descgauge=1"
        Dim ResultatTest2 As String = GetInnertextClassName(Test2, "anzeige-nummer")
        MessageBox.Show(ResultatTest2)
    End Sub
 
    Public Function GetInnertextClassName(ByVal TheLink As String, ByVal ClassN As String) As String
        Dim req As HttpWebRequest = DirectCast(HttpWebRequest.Create(TheLink), HttpWebRequest)
        req.UserAgent = "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.2; .NET CLR 1.0.3705;)"
        Dim resp As HttpWebResponse = DirectCast(req.GetResponse, HttpWebResponse)
 
        Dim sr As New IO.StreamReader(resp.GetResponseStream)
        Dim doc As New mshtml.HTMLDocument
        Dim iDocument As mshtml.IHTMLDocument2 = doc
        iDocument.open()
        iDocument.write(sr.ReadToEnd)
        iDocument.close()
 
        Return doc.getElementById(ClassN).innerText
 
        sr.Close()
        resp.Close()
    End Function

Merci d'avance

[wallace1]

Bonsoir,

http://stackoverflow.com/questions/1...-item-programm

++

[Sodruza]

Bonjour,

Merci pour ton aide Wallace, mais bien évidemment, avant de poster une question sur un forum j'ai fait mes recherches de mon côté. Je suis déjà tombé sur cette page, mais je n'ai pas réussi à le faire fonctionner cet exemple.
Qui plus est, je vois pas comment avec cette formule on pourrait extraire le .innerText du X ème élément qui a pour classeName "closeWindow" par exemple.

Si quelqu'un pouvait même avoir un exemple bidon qui marche ça serait génial : $

Merci d'avance

[Juaaah]

Méthode longue mais tu peux essayer de récupérer le code de la page puis tenter une approche avec le split, tu devrais t'en sortir avec des conditions if startwith end with contains etc..