Discussion :

[B0unti]

Bonjour, j'aimerais créer un formulaire en VB.Net qui remplie les "textbox" HTML de Ce site (cliquez sur le radiobutton "Je n'utilise pas ses autres services"), en gros que quand j'écris dans mes textbox ça remplie celles du site.

Mais le problème est que les textbox du site n'ont pas d'ID dans le code source, donc le code normal ne marche pas (WebBrowser1.Document.GetElementById("....").SetAttribute("value", TextBox1.Text))

Donc s'il vous plaît je compte sur vous pour me trouver une solution (sachant qu'il y a toujours le Name, le type, l'input...) mais j'ai esseiller avec GetAttribute, GetElementByTagName etc et ça ne marche pas...

[hunteshiva]

Bonjour,


Voici une piste a explorer du codé de MSDN GetElementsByTagName

Voici aussi un exemple issue de MSDN qui te monde comment lire les éléments d'une balise <META>

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
    If (WebBrowser1.Document IsNot Nothing) Then
        Dim Elems As HtmlElementCollection = WebBrowser1.Document.GetElementsByTagName("META")
 
        For Each elem As HtmlElement In Elems
            Dim NameStr As String = elem.GetAttribute("name")
 
            If ((NameStr IsNot Nothing) And (NameStr.Length <> 0)) Then
                If NameStr.ToLower().Equals("description") Then
                    Dim ContentStr As String = elem.GetAttribute("content")
                    MessageBox.Show("Document: " & WebBrowser1.Url.ToString() & vbCrLf & "Description: " & ContentStr)
                End If
            End If
        Next
    End If

PS: tu t'ennuie a ce point au collège

[B0unti]

Merci pour ton aide, mais un problème se pose; sur la page web que j'utilise pour faire mon projet, je ne trouve pas de balises META. Serait-il possible de se contacter via Skype pour que je puisse comprendre le principe de ce que tu m'as exposé ? car j'ai beau chercher un peut partout, je ne trouve pas comment faire le lien avec la page ET les textbox...

Merci beaucoup en tout cas pour ta réponse et si tu veux bien envoi moi un MP.

ps : Ouais le collège c'est pas top, trop facile, puis il faut bien commencer jeune non ?

[hunteshiva]

Heuuu pas possible, la je suis au boulot ^^

Non mais l'exemple parle d'une balise META, a toi de l'adapter a la fenêtre.
Je connais pas grand choses au Web, vite faite le langage mais aller choper des éléments en vb.net, je saurais pas te dire...

Tout ce que je vois, c'est que tu peux scruter la structure XML de la page Web.
De la tout est possible, tu moment que t'arriver a ouvrir la bonne balise HTML.

Si tu comprend pas dit moi,j'essayerais de détailler plus.
le soucis, c'est que je ne connais pas ton niveau en langage Web, vb, etc.

[hunteshiva]

En grattant un peu j'ai trouvé la balise que tu cherche,

le code ci dessous est adapté pour etre jolie dans les balises de code mais en aucun c'est du HTML ou du vb ^^

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
<div class="signup-question">
 
   <div class="signup-questionText">"Quel cas de figure s'applique le mieux à votre situation ? "</div>
   <div class="signup-radioChoices">
     <div class="signup-radioQuestion">
 
        <input class="signup-radio" type="radio" name="keyGoogleAccount" value="yes" id="hasGoogleAccount"  />
        <label for="hasGoogleAccount">"Je possède une adresse e-mail et un mot de passe que j'utilise déjà avec des services Google tels que AdSense, Gmail, Orkut ou iGoogle."</label>
 
      </div>
 
      <div class="signup-radioQuestion">
          <input class="signup-radio" type="radio" name="keyGoogleAccount" value="yes" id="hasNoGoogleAccount" />
          <label for="hasNoGoogleAccount">"Je <i>n'utilise pas</i> ces autres services."</label>
 
      </div>
   </div>
 
  <br/>
  '...
</div>

l'idée est que tu creuse dans le code, de manière a ouvrir cette balise.
je pencherais sur cette idée:

Code :

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

Dim Elems As HtmlElementCollection = WebBrowser1.Document.GetElementsByTagName("div class=""signup-question""")

Après je te laisse voir si tu arrive a lire les éléments qui sont à l'intérieur

[B0unti]

J'ai réussi à adapter, j'ai compris ce que c'était que la balise META, donc je l'ai remplacé par la balise input (merci de la couleur que tu m'avais mis, ça m'a aidé à comprendre)

Maintenant, j'arrive jusqu'à la fin du code et tout marche, mais le problème est que maintenant je n'arrive pas à attribuer la "value" de la textbox1 dans ce que j'ai déclaré car ce code "NameStr.SetAttribute("value", TextBox1.Text)" que j'utilise d'habitude avec GetElementByID ne marche 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
19
20
 If (WebBrowser1.Document IsNot Nothing) Then
            Dim Elems As HtmlElementCollection = WebBrowser1.Document.GetElementsByTagName("input")
 
            For Each elem As HtmlElement In Elems
                Dim NameStr As String = elem.GetAttribute("name")
 
                If ((NameStr IsNot Nothing) And (NameStr.Length <> 0)) Then
 
                    If NameStr.Equals("Email") Then
 
                        Dim ContentStr As String = elem.GetAttribute("content")
                        ' MessageBox.Show("Document: " & WebBrowser1.Url.ToString() & vbCrLf & "Description: " & ContentStr)
                       NameStr.setattribute("value", TextBox1.Text)
 
                    End If
                End If
            Next
        End If
 
    End Sub

Aurais-tu un équivalent avec GetElementsByTagName ?

ps : on voit que ça bosse au boulot ^^

EDIT : Vien de voir ton message

Ce que tu m'as proposé là est pour le radiobutton, mais ça j'ai déjà réussi à l'ouvrir automatiquement :

Code :

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

WebBrowser1.Document.GetElementById("hasNoGoogleAccount").InvokeMember("click")

[hunteshiva]

Merci de mettre la balises, pour qu'on se situe

Code :

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

  <input  type="text" name="Email"  id="Email" size="18" value="" class="gaia le val" />

Pour ton problème, c'est pas gagné...
J'ai trouvé aucune solution sur la toile, juste une explication

you can simply add runat="server" in that control as shown below and you will be able to access this control id in code behind.

Code :

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

<input type="text" name="name" id="name" runat="server">

Visiblement tu ne va pas pouvoir écrire dedans si on ne t'y autorise pas
(en soit c'est rassurant, sinon adieu les serveurs )