Discussion :

[alain16]

Bonjour,

Je n'arrive pas à activer, en VBA, un bouton radio d'une page internet.
J'ai cherché parmi les nombreuses discutions sur ce FORUM, à ce sujet, mais je n'ai pas trouvé ma réponse.

Le code source HTML du bouton non activé est :

Code html :

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

<input type="radio" name="Locale" value="4" onclick="ordretri(4)">

Et activé est:

Code html :

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

<input type="radio" name="Locale" value="4" checked="" onclick="ordretri(4)">

Avez-vous une idée du code VBA ?
Merci par avance

[patricktoulon]

bonjour
le code qui ouvre ta page il est ou ???

[alain16]

bonjour
le code qui ouvre ta page il est ou ???

Merci patricktoulon de intéresser à mon problème.
voici mon code qui coince:

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
Sub pardepartement()
 
Dim IE As New InternetExplorer
Dim IEDoc As HTMLDocument
Dim BRFirstClass As HTMLInputElement
 
   IE.navigate "http://www.madstef.com/odr/?triv=1"
   IE.Visible = True
   Do Until IE.readyState = READYSTATE_COMPLETE
      DoEvents
   Loop
 
   Set IEDoc = IE.document
   Set BRFirstClass = IEDoc.all("Locale")
   BRFirstClass.setAttribute "checked", True
 
   Set IE = Nothing
   Set IEDoc = Nothing
End Sub

merci par avance

[patricktoulon]

re
je ne trouve pas l'element locale sur cette page il existe pas

[alain16]

le bouton du site s"appelle liste locale


et le nom du bouton en HTML " locale"

<input type="radio" name="Locale" value="4" onclick="ordretri(4)">

[patricktoulon]

re
sauf que e bouton radio je ne l'ai pas chez moi

si il faut un login c'est sur que l'on aura pas la meme page

[patricktoulon]

et au fait
le set attribute sur un element html par vba on le fait en callback

Code :

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

r= element.setAttribute("checked",true)

et normalement la propriété devrait etre accesible

Code :

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

 element.checked=true

[alain16]

merci patricktoulon

Effectivement il y a un login que je n'avais pas pensé.
Cependant peut on faire une essai avec le bouton "Archives " ou "dernières MAJ" pour l'exemple.......

merci par avance

[patricktoulon]

j'avais deja fait le test sur les autres

et soit je n'ai pas de login et les element ne sont pas accessible par robot(excel VBA)

soit ils ne le sont pas pour tout le monde donc conclusion oublie le pilotage de cette page par VBA

[alain16]

OK et merci