Validare un indirizzo email con le Espressioni Regolari

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.

Codice

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

Lascia un commento

Il tuo indirizzo email non sarà pubblicato. I campi obbligatori sono contrassegnati *