Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Regular expressions
Message
From
11/05/2007 06:54:15
 
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Environment versions
Visual FoxPro:
VFP 9 SP1
OS:
Vista
Network:
Windows 2000 Server
Database:
MS SQL Server
Miscellaneous
Thread ID:
01224420
Message ID:
01224477
Views:
10
Just curiousity, what properties does loEmAddrList have?

>>Anyone using regular expressions in VFP? I've tried the FFC regular expression, but it wouldn't work. Next I tried Craig Boyd's fll and it didn't work either (probably because I am using vfp 9).
>
>We're using regular expressions to validate and extract email addresses
>
>* ValidateEmailAddress
>LPARAMETERS tcEmailAddr
>LOCAL loRegExp
>loRegExp = CreateObject("VBScript.RegExp")
>loRegExp.IgnoreCase = .T.
>loRegExp.Pattern =  '(\w[-._\w]*\w@\w[-._\w]*\w\.\w{2,9})'
>RETURN loRegExp.Test(tcEmailAddr)
>
>* ExtractAddresses(tcFromAddr)
>LPARAMETERS tcEmailAddr
>LOCAL loRegExp, loEmAddrList
>loRegExp = CreateObject("VBScript.RegExp")
>loRegExp.IgnoreCase = .T.
>loRegExp.Pattern =  '(\w[-._\w]*\w@\w[-._\w]*\w\.\w{2,9})'
>loEmAddrList = loRegExp.Execute(tcEmailAddr)
>RETURN loEmAddrList
>
>
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.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform