Discussion :

[pve3]

Bonjour,
pourriez-vous m'aider à activer le click d'une page web qui se trouve dans mon webbrowser. Je cherché sur le web des solutions mais malheureusement je ne comprend pas pourquoi il ne trouve pas la class.
De même pour insérer des valeurs l'input.


En vous remerciant d'avoir pris le temps de lire ce problème et/ou de la résoudre.

ps: problème résolu, j'ai mis le code sur le dernier message

[jopopmk]

Salut,

deux chose :
- je ne vois pas de balise qui s'appellerai <search> dans ton HTML,
- InnerHtml renvoie les HtmlElement contenus dans l'instance appelante, pas ses attributs ; essaie plutôt avec la méthode GetAttribute.

[pve3]

J'ai déjà essayé.

Pour prendre un exemple concret et accessible à tous. Le but est de se connecter à www.yahoo.be. https://login.yahoo.com/config/login...-be.yahoo.com/ Mais je n'arrive vraiment pas à me remplir les champs et à cliquer sur le bouton.


POUR INSERER LES DONNEES

Code :

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

WebBrowser1.Document.GetElementById("login-username").InnerText = "x@yahoo.be"

POUR CLIQUEZ SUR LE BOUTTON

Code :

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

1
2
3
4
5
6
7
8
        Dim theElementCollection As HtmlElementCollection
        theElementCollection = WebBrowser1.Document.GetElementsByTagName("button")
        For Each curElement As HtmlElement In theElementCollection
            If curElement.GetAttribute("name").Equals("username") Then
                curElement.InvokeMember("Submit")
                MessageBox.Show("Click Login button")
            End If
        Next

[jopopmk]

Euh ... là tu cherches tous les <button> qui ont un attribut "name" égal à "username".
Un tel bouton n'existe pas dans le HTML que tu nous présentes.

Pas plus que tu n'as de balise qui a un attribut "id" égal à "login-username" (chaîne qu'on ne retrouve même nulle part dans ton HTML). Du coup, soit tu nous montres pas le bon HTML, soit tu codes au petit bonheur la chance ...

[pve3]

Merci de ton aide jopopmk

Voici la solution pour le click sur www.yahoo.Be

Code :

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

1
2
3
4
5
6
7
8
       Dim theElementCollection As HtmlElementCollection
        theElementCollection = WebBrowser1.Document.GetElementsByTagName("button")
        For Each curElement As HtmlElement In theElementCollection
            If curElement.GetAttribute("name").Equals("signin") Then
                curElement.InvokeMember("Click")
 
            End If
        Next

[jopopmk]

Nickel, bon dev