Vérifier la validité d'une adresse e-mail. (très simple)

Soyez le premier à donner votre avis sur cette source.

Snippet vu 16 727 fois - Téléchargée 28 fois

Contenu du snippet

C'est un code qui est présent sur www.freevbcode.com mais pour le VBSCRIPT.
Je l'ai passé en Visual Basic...

Je ne crois pas que cette méthode soit fiable à 100%; loin de la... Mais bon, elle a le mérite d'etre très simple...

Source / Exemple :


'Avec un bouton appelé Command1
'Avec une textbox appelé Text1

Private Sub Command1_Click()
   If InStr(Text1, "@") = 0 Or _ 'Est ce que dans le texte on a @
    InStr(Text1, ".") = 0 Or _ 'Est ce que dans le texte on a un point
    Len(Text1) < 7 Then ' Est ce que le texte fait plue de 7 caractères
    MsgBox "L'adresse spécifiée n'est pas valide !"
   Else
   MsgBox "Votre adresse est apparement valide..."
   End If
End Sub

Conclusion :


Voili Voilo...

C'est simple, pas fiable à 100%, je sais, pas la peine de le répéter...

Merci !

A voir également

Ajouter un commentaire

Commentaires

Renfield
Messages postés
17280
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
21 juillet 2019
58 -
j'en pense qu'il complique sérieusement son expression régulière...
Dalida
Messages postés
6764
Date d'inscription
mardi 14 mai 2002
Statut
Contributeur
Dernière intervention
11 janvier 2016
-
salut,

que pensez vous de la fonction de validation proposee (parmis d autre) par jesusonline ?
http://www.aspfr.com/code.aspx?ID=21651

Public Function isEmail(ByVal _Value As String) As Boolean

Dim objIntPattern As New _
System.Text.RegularExpressions.Regex("^[A-Za-z0-9](([_\.\-]?[a-zA-Z0-9]+)*)@([A-Za-z0-9]+)(([\.\-]?[a-zA-Z0-9]+)*)\.([A-Za-z]{2,})$")

Return objIntPattern.IsMatch(_Value)

End Function
Renfield
Messages postés
17280
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
21 juillet 2019
58 -
Oui.... ce genre de choses avait déjà été évoqué sur une source similaire....

outre l'aspect purement formel de l'adresse, on a toujours la possibilité d'envoyer un mail, avec un code de validation, comme on le voit souvent....
cs_cosmic
Messages postés
61
Date d'inscription
mercredi 30 octobre 2002
Statut
Membre
Dernière intervention
16 mai 2005
-
le top serais de vérifier le nom de domaine après le @
ou de vérifier directement sur le serveur concerné si l'adresse email existe!!!
cs_EBArtSoft
Messages postés
4531
Date d'inscription
dimanche 29 septembre 2002
Statut
Modérateur
Dernière intervention
22 avril 2019
5 -
Et les amis vous oublier que la chaine de caractere apres le @ est un nom de domain, de surcrois il peut prendre nimporte quel nom de domaine valide comme aaa, abc.com, 1.0.0.127.IN-ADDR.ARPA etc...

donc le test logique derivé de l'idée de renfield ne peut etre bon car il integre des caractere nom valide dans un nom de domaine tel que les espaces. Tester la validité d'une adresse s'avere donc legerement plus complexe.

@+

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.