[VB] Cliquer sur un bouton dans une page Web qui n'a pas de nom

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : [VB] Cliquer sur un bouton dans une page Web qui n'a pas de nom

tagadatsouintsouin

Voila mon probleme:
J'ai une page web générée php avec une partie avec une case et un bouton
Voila le morceau:

Code :

<form method="post" action="repartir.php">
<center>
<table border="0" cellspacing="0" cellpadding="0" class="styleText">
<tr valign="bottom"><td rowspan="2" width="90" align="left" valign="center">valeur: </td><td>en dessous</td></tr>
<tr><td><input type='text' name='thetxtbox' maxlength='3' size='3' value='3'> %</td></tr></table>
<br /><br />
<input type="submit" value="Répartir">
</center>
</form>

J'ai donc fait le code suivant:

Code :

Sub test()
'crée un objet internet Explorer
Set IE = New InternetExplorer
'le rend visible
IE.Visible = True
'ouvre une page...
IE.Navigate "adressedelapage.php"
Do While IE.ReadyState <> 4 'attend que la page soit chargée
DoEvents
Loop
IE.Document.all.Item("thetxtbox" ).Value = "100" 'textbox...
IE.Document.all("button" ).click 'clique...
End Sub

Mais evidement ca marche pas car le bouton n'a pas de nom, et je ne peux pas l'appeler "button"...
Ma question est donc de savoir comment cliquer dessus, ou bien comment liste les noms des objets dans une page web pour pouvoir ensuite l'appeler ?

Merci

Publicité

tagadatsouintsouin

C'est bon je l'ai resolu, comme ce n'etait pas un bouton, mais un formulaire, il fallait utiliser la methode submit du form, mais sur le bon element d'ou le code:

Code :

For Each objElement In IE.Document.Forms(0).Elements
If (LCase(objElement.Type) = "submit" ) Then
objElement.Click
Exit For
End If
Next

FORUM HardWare.fr

Programmation

VB/VBA/VBS

[VB] Cliquer sur un bouton dans une page Web qui n'a pas de nom

Sujets relatifs
Navigateur web en C	[JS] récupérer le contenu d'une page web.
Partager des données entre plusieurs appli-web	[Web/PHP/XML] Inserer un flux XML dans une page PHP
CGI dans une page html	VBA - Sélection toutes feuilles d'un classeur pour mise en page
Site web déjà tout prêt et adaptable à sa sauce	Supprimer l'affichage des warnings sur une page
Plus de sujets relatifs à : [VB] Cliquer sur un bouton dans une page Web qui n'a pas de nom

Page générée en 0.044 secondes