I have Ken Ray's email verification code that I need adapted to accept "+" in the address.
Here is the original code:
Code: Select all
function isEmail pWhat
put matchtext(pWhat,"^[A-z0-9_\-\.]+[@][A-z0-9_\-]+([.][A-z0-9_\-]+)+[A-z]$") into tNotIP
put matchtext(pWhat,"^(1*\d{1,2}|2[0-4]\d|25[0-5])\.(1*\d{1,2}|2[0-4]\d|25[0-5])\.(1*\d{1,2}|2[04]\d|25[0-5])\.(1*\d{1,2}|2[0-4]\d|25[0-5])(:\d{1,5})*$") into tIsIP
return (tIsIP or tNotIP)
end isEmail
Any regex hero's out there today?
Thanks,
Simon