begin process at 2010 02 10 11:21:16
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Chaînes de caratères

 > VÉRIFIER UNE ADRESSE EMAIL VIA LES REGEXP

VÉRIFIER UNE ADRESSE EMAIL VIA LES REGEXP


 Information sur la source

Note :
2 / 10 - par 1 personne
2,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Chaînes de caratères Niveau :Débutant Date de création :07/05/2002 Date de mise à jour :07/05/2002 14:26:32 Vu :11 139

Auteur : Skyride

Ecrire un message privé
Commentaire sur cette source (1)
Ajouter un commentaire et/ou une note

 Description

Via ce code vous spécifiez que l'email doit :
- contenir une arobase et un point
- avant la présence de l'arobase nous pouvons trouver, des lettres quelconques
    (en minuscule ou majuscule), n'importe quel chiffre, et les caractères "-" ou "_" ou "."
- aprés l'arobase, la vérification reste la même mais on interdit la présence de "_"
et il faut impérativement au moins deux caractères entre l'arobase et le point
            - aprés le point, nous devons une succession de 2 ou 3 caractères doivent être
                présentes afin de pouvoir valider l'adresse email.    
        */

Source

  • <%
  • Function VerifEmail(email)
  • dim regEx
  • Set regEx = New RegExp
  • regEx.Global = True
  • regEx.Pattern = "^[a-zA-Z0-9._-]+@[a-zA-Z0-9.-]{2,}[.][a-zA-Z]{2,3}"
  • notag = regEx.test(email)
  • end function
  • Dim ch
  • ch = "toto@hotmail.com"
  • if VerifEmail(ch) = false then
  • response.write "L'email " & ch & " est valide"
  • else
  • response.write "L'email " & ch & " n'est pas valide"
  • end if
  • %>
<%
	Function VerifEmail(email)
   		dim regEx
   		
		Set regEx = New RegExp
   		
		regEx.Global = True
   		regEx.Pattern = "^[a-zA-Z0-9._-]+@[a-zA-Z0-9.-]{2,}[.][a-zA-Z]{2,3}"
   		notag = regEx.test(email)
	end function
	
	Dim ch
	ch = "toto@hotmail.com"
	
	if VerifEmail(ch) = false then
		response.write "L'email " & ch & " est valide"
	else
		response.write "L'email " & ch & " n'est pas valide"
	end if	
	
%> 

 Conclusion

Si vous avez des corrections ou autres, n'hésitez pas à m'en faire part...


 Sources du même auteur

COMPOSANT ASPMAIL PILOTÉ VIA SQL SERVER
Source .NET (Dotnet) LISTER LES DOSSIERS D'UN RÉPERTOIRE
Source .NET (Dotnet) LISTER LES FICHIERS D'UN RÉPERTOIRE
Source .NET (Dotnet) INFORMATIONS D'UN FICHIER
Source avec Zip Source .NET (Dotnet) GÉNÉRER UN DOCUMENT HTML À PARTIR DE DONNÉES CONTENUES DANS ...

 Sources de la même categorie

FONCTION : REMPLACER LES CARRACTÈRES ACCENTUÉS PAR LEUR ÉQUI... par promeythey
CHERCHER ET REMPLACER UN MOT DANS UN FICHIER TEXTE par roro59650
CONVERSION CARACTÈRES UTF-8 VERS FRANÇAIS par EricDD
FONCTION UCFIRST EN ASP par DesignerCreator
Source .NET (Dotnet) FONCTIONS DE VÉRIFICATION DE LA SYNTAXE D'UNE CHAINE par vladam

Commentaires et avis

Commentaire de ChemicalStof le 04/09/2003 11:32:42

Salut, j'ai bien copié cette fonction mais j'ai l'erreur suivante:

Type d'erreur :
Erreur d'exécution Microsoft VBScript (0x800A000D)
Type incompatible: 'regEx.test'
/website2/website/admin/newsletter/newsletter_inscrits.asp, line 13

La ligne 13 est:

notag = regEx.test(email)

Est-ce normal et, si oui, comment y remédier?

 Ajouter un commentaire




Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Février 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728

Consulter la suite du CalendriCode

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,671 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales