Categoria: VB.NET
Questa funzione serve per validare la correttezza formale di un indirizzo email passato come argomento attraverso l'uso delle Espressioni Regolari.
Ritorna True se l'indirizzo è formalmente corretto, False altrimenti.
Imports System.Text.RegularExpressions
Private Function ValidaEmail(ByVal indirizzo As String) As Boolean
Dim espressioneRegolare As String
espressioneRegolare = "^([\w-\.]+)@" & _
"((\[[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\.)|" & _
"(([\w-]+\.)+))([a-zA-Z]{2,4}|[0-9]{1,3})(\]?)$"
Return Regex.IsMatch(indirizzo, espressioneRegolare)
End Function
Non ci sono commenti per questa pagina. Vuoi essere il primo a postare un commento?
Segnala questa pagina: