Interesting. One more question: On my machine the count is 1. What can cause that?
>It's collection of match objects. The Global = .T. setting is requred if all matches are desired. The rest of details about match object you can find using Intellisense.
>BTW, in the code I'm using one of regular expressions from
http://regexlib.com/.
>
>CLEAR
>
>TEXT TO lcStr NOSHOW
>Sales: sales@whatever.com
>Info: info@whatever.com
>Support: support@whatever.com
>ENDTEXT
>
>
>loMatches = ExtractAddresses(lcStr)
>? loMatches.Count
>FOR EACH loMatch IN loMatches
> ? loMatch.Value
>ENDFOR
>RETURN
>
>FUNCTION ExtractAddresses
>LPARAMETERS tcText
>LOCAL loRegExp, loEmAddrList
>loRegExp = CreateObject("VBScript.RegExp")
>loRegExp.IgnoreCase = .T.
>loRegExp.Global = .T.
>loRegExp.Pattern = '(\w[-._\w]*\w@\w[-._\w]*\w\.\w{2,9})'
>loEmAddrList = loRegExp.Execute(tcText)
>RETURN loEmAddrList
>
>
>>Just curiousity, what properties does loEmAddrList have?
>>
Groet,
Peter de Valença
Constructive frustration is the breeding ground of genius.
If there’s no willingness to moderate for the sake of good debate, then I have no willingness to debate at all.
Let's develop superb standards that will end the holy wars.
"There are three types of people: Alphas and Betas", said the beta decisively.
If you find this message rude or offensive or stupid, please take a step away from the keyboard and try to think calmly about an eventual a possible alternative explanation of my message.