ASP

verification des champs d'un formulaire pour l'envoie d'un email

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : verification des champs d'un formulaire pour l'envoie d'un email

fcoisb

go ! go ! go !

Donc en asp, quelqu'un aurait un formulaire ou les expressions qui verifient les champs d'un email à envoyer (genre verifie si l'email de l'expéditeur est du style nom@serveur.xxx
et si les autres champs ne sont pas vide.. etc;.

Publicité

fcoisb

go ! go ! go !

c'est quoi cette erreur quand j'essaye juste de faire une fonction comme c'est écrit dans les livres pour apprendre??

Code :

Microsoft VBScript compilation error '800a0400'
Expected statement
/essaiMail/test.asp, line 27
End Function
^

urd-sama

waste of space

j'avais trouvé une fonction qui te controle la validité d'un mail, vais essayer de récup ca.

le voila:

Citation :

<%
Function IsValidEmail(sEMail)
Dim sInvalidChars
Dim bTemp
Dim i
Dim sTemp

' Caratères interdits
sInvalidChars = "!#$%^&*()=+{}[]|\;:'/?>,< "

' Rechercher qu'il y a au moins un '@'
bTemp = InStr(sEMail, "@" ) <= 0

' Rechercher qu'il y a au moins un '.'
bTemp = bTemp Or InStr(sEMail, "." ) <= 0

' et vérifions que la taille est plus grande que 6 caractères (a@a.ca)
bTemp = bTemp Or Len(sEMail) < 6

' Vérifier qu'il y a qu'n seul '@'
i = InStr(sEMail, "@" )

sTemp = Mid(sEMail, i + 1)

bTemp = bTemp Or InStr(sTemp, "@" ) > 0

' Vérifier qu'il y un '.' après le '@'
bTemp = bTemp Or InStr(sTemp, "." ) = 0

' Vérifier la présence de (" )
bTemp = bTemp Or InStr(sEMail, Chr(34)) > 0

' Vérifié s'il y a des caractères interdits
For i = 1 To Len(sEMail)
If InStr(sInvalidChars, Mid(sEMail, i, 1)) > 0 Then _
bTemp = True
Next

' S'il y a une seule des conditions ci-dessus qui repond true alors l'e-mail est invalide
IsValidEmail = Not bTemp

End Function
'Fonction provenant de http://www.aspfr.com
%>

fcoisb

go ! go ! go !

Merci beaucoup!!!!!!!!!!! ça marche super bien :-D

On est toujours obliger de donner une valeur de retour à la fonction?
(NomdeFonction = <quelquechose>

urd-sama

waste of space

en fait elle va te retourner true or false si je me trompe pas
donc faut faire un test
if IsValidEmail(blabla@blabla.com) then
end if

---------------
.: Clône de Drasche .:. Ebichuleys .:. Avec l'Aloe Vera je fais de beaux cacas [:dawa] .: www.oserselancer.com :.

fcoisb

go ! go ! go !

oui, c'est ce que j'ai fait :-D
mais si tu veux utiliser d'autres fonctions sans vouloir une valeur de retour!! ;..???

urd-sama

waste of space

donne moi un exemple car je comprends pas ce que tu veux dire (désolée)

---------------
.: Clône de Drasche .:. Ebichuleys .:. Avec l'Aloe Vera je fais de beaux cacas [:dawa] .: www.oserselancer.com :.

fcoisb

go ! go ! go !

l'exemple

Code :

<%
Function affichageFormulaire()
affichageFormulaire = <quelquechose>
End Function
%>

Voila si je donne pas à la fin de ma fonction une valeur à celle ci j'ai une erreur: "statement"
du coup, je mets à la fin affichageFormulaire=""
Sachant que j'ai affiché tout ce que je voulais avant...

urd-sama

waste of space

ah d'accord, c'est une question générale sur les fonctions donc
malheureusement je peux pas te répondre, je connais très peu les fonctions en asp

FORUM HardWare.fr

Programmation

ASP

verification des champs d'un formulaire pour l'envoie d'un email

Sujets relatifs
[PHP] champs en php : tous pareils ou tous différents ?	W3C et formulaire
Envoie de mail via .cmd .?	Champs vide et comparaison de variables
pb du traitement des donnees en PHP recuperees d'un formulaire html	Probleme de test sur un formulaire dynamique
javascript avec formulaire php pour saut de ligne/liens	javascript pour insertion de balise dans formulaire php sql
CSS et formulaire...	envoi d'un formulaire vers un email
Plus de sujets relatifs à : verification des champs d'un formulaire pour l'envoie d'un email

Page générée en 0.033 secondes