Re: [flasher] Re: Detecting valid email format F4

[Helen Triolo]

Well JGL, you realize you owe Gregg your first-born now, of course.  I

started to think about your question and decided this would be a pain to

do even in F5 and downright masochistic in F4, but there is Gregg

"programmer guy" Caines, showing up routine in hand.  I think you'd also

need to put something into the 2 loop sections that sets badaddy true if

checkletter is outside the range a-z/A-Z/1-9 if you really want to be

safe.


Regards,

Helen 

-----------------------------------------------------

i-Technica  �  http://i-technica.com  �  301.424.6037

developer resources: http://i-technica.com/whitestuff


Gregg Caines wrote:

> 

>

Set Variable: "emailaddy" = "asdfasdfxaasdfasdf [dot] ccb"

> Set Variable: "badaddy" = false

> Set Variable: "addylength" = Length (emailaddy)

> Set Variable: "checkletter" = substring (emailaddy, x, 1)

> Set Variable: "char_num" = 0

> Loop While (checkletter ne "@")

>       Set Variable: "char_num" = char_num + 1

>       Set Variable: "checkletter" = substring (emailaddy, char_num, 1)

> End Loop

> If (char_num < 2)

>       Set Variable: "badaddy" = true

> End If

> If (char_num > addylength - 4)

>       Set Variable: "badaddy" = true

> End If

> Loop While (checkletter ne ".")

>       Set Variable: "char_num" = char_num + 1

>       Set Variable: "checkletter" = substring (emailaddy, char_num, 1)

> End Loop

> If (char_num < 4)

>       Set Variable: "badaddy" = true

> End If

> If (char_num > addylength - 2)

>       Set Variable: "badaddy" = true

> End If

> If (char_num < addylength - 3)

>       Set Variable: "badaddy" = true

> End If

> 

> (HTH!)