Discussion :

[lemagicien]

salut,
voila je voudrais faire une recherche dans une chaine pour trouver une sous chaine, ce que je voudrais vraiment faire c'est chercher tous les emails dans une chaine, alors j'ai pensé à utiliser les expressions régulieres.

C'est pour ca que j'ai utilisé Regex.Matches(machaine,patern) pour récuperer toutes les corespondances de mon patern dans machaine mais bizzarement, quand je donne une chaine longue avec dedans des emails , il ne trouve rien, mais si je donne une chaine avec juste un email dedans alors la ca marche.

Quelqu'un a une idée ?

Merci

Cordialement

[Louis-Guillaume Morand]

du code! du code! du code!

il se peut que ta regex soit mal faite.

[lemagicien]

Désolé

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
20
21
22
 
 
Dim html As String
 
html = http.QuickGetStr(htmlconst) 
 
 Dim pattern As String = "^[a-zA-Z][\w\.-]*[a-zA-Z0-9]@[a-zA-Z0-9][\w\.-]*[a-zA-Z0-9]\.[a-zA-Z][a-zA-Z\.]*[a-zA-Z]$"
 
 Dim m1 As Match
 
 
Dim emailAddressMatch As MatchCollection = Regex.Matches(html, pattern)
 
                If (emailAddressMatch.Count > 0) Then
 
                    For Each m1 In emailAddressMatch
 
                        Console.WriteLine("The value '{0}' was found at index {1}, and is {2} characters long.", m1.Value, m1.Index, m1.Length)
 
                    Next
 
                End If

merci encore

Cordialement

[suvuk]

En effet, cette regex ne matche que les chaines qui contiennent uniquement une adresse mail :
- "^" = commence par...
- "$" = se termine par...

donc si tu les enlève ça devrait marcher

[lemagicien]

ahhh ca marche merci tu me sauve

Cordialement