بهترين كار استفاده از عبارات منظم (Regular Expression) هست كه توي بيلدر چنين ويژگي اي نيست و ميشه با شي Browser و استفاده از زبان جاوا اسكريپت اين كار رو كرد. اما مطمئن نيست. چون ممكن هست جاوا اسكريپت مرورگر غير فعال باشه. اما به هر حال كد زير يه سري از موارد رو چك مي كنه و قابل قبول هست.
[PHPS]at$ = '@'
dot$ = '.'
white_space$ = ' '
at_position = POS(at$,Email$)
email_lenght = LEN(Email$)
dot_position = POS(dot$,Email$)
If (at_position = 0) Then
Message("Invalid E-mail ID","")
Return()
End
If (email_lenght = at_position ) Then
Message("Invalid E-mail ID","")
Return()
End
If (dot_position = 0) Then
Message("Invalid E-mail ID","")
Return()
End
count = email_lenght - dot_position
If (count < 2) Then
Message("Invalid E-mail ID","")
Return()
Else
tld$ = StrCopy(Email$,dot_position,count)
tld_lenght = LEN(tld$)
If (tld_lenght > 4) Then
Message("Invalid E-mail ID","")
Return()
End
End
white_space_position = POS(white_space$, Email$)
If (white_space_position <> 0) Then
Message("Invalid E-mail ID","")
Return()
End
If (at_position + 1 = dot_position) Then
Message("Invalid E-mail ID","")
Return()
End
If (at_position + 1 = dot_position) Then
Message("Invalid E-mail ID","")
Return()
End
[/PHPS]
