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

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

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.