Copier un texte web dans une textbox [Résolu]

Signaler
Messages postés
9
Date d'inscription
vendredi 6 septembre 2013
Statut
Membre
Dernière intervention
6 avril 2014
-
Messages postés
9
Date d'inscription
vendredi 6 septembre 2013
Statut
Membre
Dernière intervention
6 avril 2014
-
Bonjour,
Je voudrais copier du texte sur une page web depuis mon WebBrowser (par exemple copier le mot "rechercher" de l'outil recherche de ce site) dans ma Textbox en cliquant sur un bouton de mon programme, mais je n'y arrive pas.
Quelqu'un aurait-il la solution ?
Merci d'avance.

6 réponses

Messages postés
18038
Date d'inscription
lundi 7 décembre 2009
Statut
Modérateur
Dernière intervention
11 avril 2018
226
Bonjour,
Pour copier, il faut d'abord mettre dans une variable. Pour mettre dans une variable, il faut d'abord avoir lu. Pour lire, il faut d'abord identifier ce que l'on veut lire.
Voilà le principe. Et on ne peut te donner plus de précisions puisque tu as posté dans le forum général Visual Basic et non dans l'un de ses sous-forums correspondant à ton langage de développement.
Messages postés
9
Date d'inscription
vendredi 6 septembre 2013
Statut
Membre
Dernière intervention
6 avril 2014

Ah mince, j'utilise Visual Basic Express, aurais-tu plus de précision a me fournir ?
Messages postés
18038
Date d'inscription
lundi 7 décembre 2009
Statut
Modérateur
Dernière intervention
11 avril 2018
226
Non. Moi, je développe sous VB6 et non VB.Net
Il se peut toutefois que ce que tu recherches est ceci :
http://codes-sources.commentcamarche.net/source/100397-html-extractor-extraction-de-donnees-d-une-page-web
Messages postés
9
Date d'inscription
vendredi 6 septembre 2013
Statut
Membre
Dernière intervention
6 avril 2014

Non ça ne m'as pas aidé, mais merci quand même pour ton aide !
J'ai trouvé la solution de moi même,
La barre de recherche de ce site a le nom "q" donc pour récupérer ce qui est écrit dedans, j'ai utilisé :
theElementCollection = WebBrowser1.Document.GetElementsByTagName("input")
For Each curElement As HtmlElement In theElementCollection
Dim controlName As String = curElement.GetAttribute("name").ToString
If controlName = "q" Then
Clipboard.SetDataObject(curElement.GetAttribute("value"))
TextBox1.Text = Clipboard.GetText
End If
Next
Messages postés
18038
Date d'inscription
lundi 7 décembre 2009
Statut
Modérateur
Dernière intervention
11 avril 2018
226
Bon.
Mais pourquoi passes-tu par un tremplin (le presse-papier) ?
Il me semble que :
Textbox1text = curElement.GetAttribute("value")
Messages postés
9
Date d'inscription
vendredi 6 septembre 2013
Statut
Membre
Dernière intervention
6 avril 2014

Effectivement, je me complique la vie pour rien x)
Merci !