Récuperer un champs sans les balises Name et IdRésolu

Question

Bonjour, j'aimerais remplir automatiquement les champs d'une page web a partir du webbrowser mais, les champs de la page web n'ont ni ID ni NAME 
Donc :
WebBrowser.Document.GetElementById("blablabla").value = truc
et
WebBrowser.Document.GetElementByName("blablabla").value = truc
ne fonctionnent pas ... 
J'ai entendu dire que l'on pouvait récupérer des champs a partir de leur ordre d'apparition dans la page ...
Voilà, donc si vous pouvez m'aider, ce serai formidable !!!
Merci à mes future sauveur 
Bonne vacance à tous

irvine31 · Answer

WOAW !!!!!!! 
Merci, Ô mille merci !!! 
Ô mon sauveur (ou ma sauveuse )
Tout marche nickel !!!
Moi je dis qu'il n'y a rien de plus merveilleux que des personnes qui aident les autres sur les forums !!!

irvine31 · Answer

Ha zut, j&#8217;allais oublier, comment changer la valeur du champs une fois qu'on la identifier ?
J'ai essayé :
Dim allelements As HtmlElementCollection = WebBrowser1.Document.All
        For Each webpageelement As HtmlElement In allelements
            If webpageelement.GetAttribute("value") = "Inscription" Then
                webpageelement.value="test"
            End If
        Next
Mais ça ne marche pas ...
Une dernière petite aide please

irvine31 · Answer

C'est ça :

jndruo78150 · Answer

Bonjour, 
Dans le meme genre, je veux clique sur un bouton sans value ni ID et en plus de ça il est dans une fonction dont voici le code:

function select_overlib() {
return overlib('Cette page (25)Tous les enregistrements (110)Aucun', CENTER, '', STICKY, MOUSEOFF, 3000, CLOSETEXT, 'Tous les enregistrements (110)

Donc si vous avez une idée elle est la bienvenue!!!
Merci d'avance

sebi76 · Answer

bonjour,

essaie quelque chose comme ça:

 dim Famille_BaliseA As Object  
 Set Famille_BaliseA =   Controle_IE .document.all.tags("A")
For i  = 1 To Famille_BaliseA.Length - 1	
If Famille_BaliseA.Item(i).onclick "blablabla" Then	'***** If Famille_BaliseA.Item(i).href "blablabla" Then	
Famille_BaliseA.Item(i).Click 
Exit For
End If
Next i

Sebi

Récuperer un champs sans les balises Name et Id

5 réponses

Votre réponse

Discussions similaires