Validazione del formato indirizzo email - Script ASP

E' possibile validare il formato di una variabile contenente un indirizzo email utilizzando un'espressione regolare.

Ecco una funzione utile.

<% 

public function IsEmail(strEmail) 

Dim objRegExp 
Set objRegExp = New RegExp 
objRegExp.Pattern = "^[a-z0-9._-]+\@[a-z0-9._-]+\.[a-z0-9]{2,4}$" 
objRegExp.IgnoreCase = True 
IsEmail = objRegExp.Test(strEmail) 

end function 

%> 

Ecco un esempio di come utilizzare questa funzione.

<% 

' Valorizza una stringa 
strEmail = "email@indirizzo.com" 

' Controlla il formato
if IsEmail(strEmail) then 
  Response.Write("Formato indirizzo email valido") 
else 
  Response.Write("Formato indirizzo email NON valido") 
end if 

%> 

Attenzione, in questo modo è possibile validare esclusivamente il formato dell'indirizzo , non controllare la sua reale esistenza.