Poser une question

Validation formulaire SendMail

Bonjour,
J'utilise un code ASP pour l'envoi de formulaire par email.

Comment je peux faire pour ajouter une validation pour les champs de 'nom' adresse' et code_postal'

Le code:
dim strText
strText=strText&"Formulaire de commande venant du site web du PSMAD "&VbCrLf&request.form("")
strText=strText&"-------------------------------------------------------------"&VbCrLf&request.form("")
strText=strText&"Nom : "& request.form("nom")
strText=strText&"Adresse: "& request.form("adresse")
strText=strText&"Ville : "& request.form("ville")
strText=strText&"Code Postal : "& request.form("code_postal")
strText=strText&VbCrLf&"Courriel : "&request.form("courriel")
strText=strText&VbCrLf&"Téléphone : "&request.form("phone")


Dim emailIsValid, apos, dotpos
emailIsValid = False
apos = Instr( 1, request.form("courriel"), "@", 1)
If (apos) <> 0 Then
dotpos = Instr(apos, request.form("courriel"), ".", 1)
If (dotpos) <> 0 Then
If dotpos <> len(request.form("courriel")) Then
emailIsValid = True

Set Mailer = Server.CreateObject("SMTPsvg.Mailer")
Mailer.FromAddress= request.form("courriel")
Mailer.RemoteHost= "po-cum01.cum.qc.ca"
Mailer.AddRecipient "","dringuet@cmm.qc.ca"
Mailer.Subject= "FORMULAIRE SITE WEB PSMAD - Commander un CDrom du Projet de Schéma métropolitain"
Mailer.BodyText = strText
Mailer.SendMail
%>
<%+ message erreur%>


J'ai essaye de le mettre avec les If qui valide l'adresse email mais j ai une erreur 500.

Quelqu'un a une piste de solutions ..merci

Réponses

Re: Validation formulaire SendMail  pup 10/3/2005