webbrowserRésolu

Question

bonjour j'ai un petit souci avec le webbrowser, j'ai une page qui contient: est il possible de parcourir les éléments d'une liste d'options dans un webbrowser ? je sais comment obtenir la valeur sélectionner mais je ne sais pas comment parcourir les éléments de ce select. merci d'avance Quand on pose une question on est con 5 minutes,Quand on ne la pose pas on le reste toute sa vie (mon site) Quand on pose une question on est con 5 minutes,Quand on ne la pose pas on le reste toute sa vie (mon site)

Renfield · Accepted Answer

simplement

Dim oItem As Object
For Each oItem in Document.getElementsByTagName("option")
    ...
Next

Renfield - Admin CodeS-SourceS - MVP Visual Basic	& Spécialiste des RegExp

Renfield · Answer

pas sur de l'orthographe, mais je pense a getElementsbyTagName

Renfield - Admin CodeS-SourceS - MVP Visual Basic	& Spécialiste des RegExp

lediablo · Answer

bonjour
merci pour la réponse, j'ai chercher des exemples pour getElementsbyTagName dans webbrowser + vb6 mais sans succès  pouvez vous m'aider svp 


Quand on pose une question on est con 5 minutes,Quand on ne la pose pas on le reste toute sa vie  (mon site)

lediablo · Answer

merci beaucoup renfield


Quand on pose une question on est con 5 minutes,Quand on ne la pose pas on le reste toute sa vie  (mon site)

lediablo · Answer

dans mon exemple il y a une seule liste d'option mais s'il y a plusieurs listes on peut faire comme sa:

Dim oItem As Object, M
Set M = wb1.Document.getelementbyid("categorie_1").getElementsByTagName("option")
For Each oItem In M
 List1.AddItem oItem.Value & " " & oItem.innertext
Next


merci encore renfield

Quand on pose une question on est con 5 minutes,Quand on ne la pose pas on le reste toute sa vie  (mon site)

lediablo · Answer

au fait dans le même sujet si on a un code comme celui ci: est ce qu'on peut le remplir ? vue qu'on peut pas utiliser la propriété value dans cet exemple ? Quand on pose une question on est con 5 minutes,Quand on ne la pose pas on le reste toute sa vie (mon site)

Renfield · Answer

Le texte affiché dans un TextArea est le texte contenu entre les balises ... suffit donc de jouer avec la propriété innerHTML de ton objet... Renfield - Admin CodeS-SourceS - MVP Visual Basic & Spécialiste des RegExp

lediablo · Answer

bonjour, voila la solution:
ajoutez la réference : microsoft html objet library
Dim HTML As HTMLDocument, HTMLE As HTMLInputElement
Set HTML = wb1.Document
    For Each HTMLE In HTML.getElementsByTagName("textarea")
        If HTMLE.Name = "nom du champ textarea" Then
        HTMLE.Value = "valeur a ajouter"
        Set HTML = Nothing
        Exit For
        End If
    Next


Quand on pose une question on est con 5 minutes,Quand on ne la pose pas on le reste toute sa vie  (mon site)

Renfield · Answer

utilises plutot getElementsByName ... plus logique, non ?

Renfield - Admin CodeS-SourceS - MVP Visual Basic	& Spécialiste des RegExp

lediablo · Answer

oui désolé j' été pressé et je l'ai pas remarqué. sorry


Quand on pose une question on est con 5 minutes,Quand on ne la pose pas on le reste toute sa vie  (mon site)

cs_bayrem3 · Answer

bonjour,
 dans le même contexte mais je cherche un solution pour colorer la valeur voulue dans la liste 
j'utilise :
 webbrowser.Document.GetElementsByTagName("select")(0).Document.GetElementsByTagName("option")(indice_valeur).Style = ("color:#FF00CC")
ça marche ,

mais si on click sur la liste puis sur le bouton ça marche pas

merci de m'aider
w7,vb2008

Webbrowser

11 réponses

Votre réponse

Discussions similaires