Discussion :

[alexabcinformatique]

Bonsoir,

Je cherche à effectuer une recherche de chaîne de caractère dans une autre, mais le soucis c'est que je n'arrive pas à ressortir la chaîne qui m'interese.

Je m'explique j'utilise une textbox multiligne, je la parcours avec ce bout de code :

Code :

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

1
2
3
4
 
For Each line As String In TextBox1.Lines
            ' Traitement de la ligne 
Next

J'ai trouvé ce bout de code qui renvoie l'index d'une chaîne :

Code :

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

1
2
3
4
 
        Dim SearchWithinThis As String = TextBox1.Text
        Dim SearchForThis As String = TextBox2.Text
        Dim FirstCharacter As Integer = SearchWithinThis.IndexOf(SearchForThis)

Pour faire simple j'envoie une requête sur un site internet et je récupère le code source de la page, je voudrais pouvoir effectué une recherche dans le code source stocké dans ma textbox multiligne, mais avec les deux codes trouvé sur le net je ne vois pas comment récupérer la valeur de la ligne, comment extraire la chaîne de mon code source.

D'avance merci.

Cordialement

[GuruuMeditation]

Pouce extraire la chaine, tu as substring. Tu as toutes les infos, l'index du début de la chaîne a trouvée dans ta ligne, et la taille de cette chaine.

Il faudrait faire un while sur chaque ligne tant que indexof est > 0 et ensuite extraire.

[shayw]

Salut

je n'ai pas compris
tu veux savoir si la chaine du textbox contient la chaine que tu recherches
dans ton textbox tu as le code source
tu cherches un mot spécifique dans le code source ?

[Kropernic]

Attention !!!

Si tu fais ta recherches ligne par ligne dans ta textbox multi-lignes, pour les cas où la chaine que tu recherches est scindé sur 2 lignes différentes, tu ne la trouveras jamais.

Le mieux est de mettre ce que la requête te renvoie dans une variable et de faire la recherche là-dessus.

Au moins là, pas de confusion possible.

[alexabcinformatique]

Bonjour,

Je pensais faire sa:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
        Dim SearchWithinThis As String = TextBox1.Text
        Dim SearchForThis As String = TextBox2.Text
        Dim FirstCharacter As Integer
 
For Each line As String In TextBox1.Lines
            ' Traitement de la ligne 
            FirstCharacter = SearchWithinThis.IndexOf(SearchForThis)
            If FirstCharacter >= 0 Then
            'Traitement sur la variable
            End if
Next

Je récupère le code source de la page web et je cherche des mots spécifique dans le code source, le soucis c'est qu'il y a environ 22 pages de code sources format A4, je cherche comment rendre tout sa plus rapide par exemple en supprimant l'en tête de la page web ou autre, je ne sais pas si ce que je cherche à faire est assez explicite.

Mais je voudrais en gros envoyé une requête sur le site, récupérer le code et renvoyé certain éléments dans mon winforms.

Merci en tout cas pour votre aide.

Cordialement