Je travaille actuellement sur un projet d'accès et j'ai des problèmes avec la validation du champ de messagerie de mon projet. Je veux que les courriels aient une chaîne obligatoire, un symbole @ obligatoire et des lettres et des chiffres obligatoires après les symboles @.
Actuellement, ma validation ressemble à ceci:
comme "* @ *"
Cela fonctionne parfaitement avec ce que je veux; Cependant, il accepte toujours des entrées qui n'ont pas de lettres, de chiffres, d'une période et de tiret à l'avance. Toute astuce et suggestions sur la manière d'y aller et de toute ressource où je peux apprendre la validation?
4 Réponses :
Si la validation se produit lors de l'entrée manuelle de l'e-mail - vous pouvez utiliser un masque. Ce sont une propriété de champ de texte que vous voudrez en savoir plus en ligne.
Si la validation est nécessaire sur un ensemble de données existant, pas pendant la phase d'entrée, - ou si vous constatez qu'un masque ne convient pas à une raison quelconque - alors vous aurez besoin de requêtes personnalisées et de code pour vérifier - et Il n'y a pas de réponse unique, il doit être fabriqué pour répondre à toutes vos exigences.
Essayez:
must have at least one char (?), then any number of chars (*), then MUST have a @ sign ([@]), then must have at least one char (?), then any number of chars (*), then must have a dot ([.]), then must have one char (?), then any number of chars (*)
Merci! Cela fonctionne, sauf qu'il accepte les entrées qui ne contiennent pas de caractères avant le signe @
EDIT: J'ai ajouté une modification dans laquelle vous devez entrer des caractères entre chaque partie.
Nous utilisons cette fonction - qui est lisible:
' Strips a full e-mail address with display name like:
'
' "John Doe <john.doe@example.com>"
'
' to the e-mail address only:
'
' "john.doe@example.com"
'
' 2018-12-05. Gustav Brock, Cactus Data ApS, CPH.
'
Public Sub CleanEmailAddress(ByRef EmailAddress As String)
If Trim(EmailAddress) = "" Then
EmailAddress = ""
Else
EmailAddress = Split(StrReverse(Split(StrReverse(EmailAddress), "<")(0)), ">")(0)
End If
End Sub
Une autre option pour utiliser des expressions régulières. Vous pouvez facilement créer votre propre motif plutôt que d'utiliser des tons de quelque chose comme ceci: si s.
Google pour
Accéder à la validation de mot de passe VBA . Cela devrait vous obtenir des résultats peuvent utiliser comme guide.Dupliqué possible de Validation de courrier électronique étendue pour la table d'accès MS