|
|
Vous êtes ici : Forums > Langage ASP > vérification du script d'un formmail
vérification du script d'un formmail
Je tente désespérement d'adapter le script fourni par ASP magazine à mon formulaire de commande. Comme je veux conserver ma vérification des champs, j'ai supprimé cette partie dans le script proposé par Asp magazine mais j'ai dû faire des erreurs puisque cela ne marche pas (ma page de confirmation ne s'afiche pas).
Voici le script, quelqu'un pourrait-il le vérifier ?
Merci d'avance
<%
'-----------------------------------
'---- FORMMAIL pour ASP
'---- Utilise le composant JMAIL
'---- confirmation.htm : Page de confirmation
'---- Envois du Mail avec JMAIL
'-----------------------------------
Option Explicit
Dim corps '----- Corps du texte à envoyer
Dim item
Dim JMail
'-----------------------------------
'--- On récupère les paramètres postés
'-----------------------------------
corps=""
if item<>"envoye_a" and item<>"ServeurSmtp" then corps=corps
end if
next
'------------ Envoi du mail avec JMAIL au client
If corps<>"" then
Set JMail= Server.CreateObject("JMail.SMTPMail")
JMail.ServerAddress = request("ServeurSmtp")
JMail.Subject = "Nouveau message posté"
JMail.Sendername="Formail"
JMail.Sender="formail@formail.com"
JMail.AddRecipient request("envoye_a")
JMail.ContentType = "text/plain"
JMail.Body = corps
JMail.Priority = 3
JMail.Execute
Set JMail=nothing
end if
'------------ Fin d'envoi avec JMAIL
'--------- Redirection vers la page confirmation.htm
response.redirect "confirmation.htm"
%>
Message posté le 05/05/2006
par marcoP
Répondre à ce message |
|
|
|
A RETENIR CETTE SEMAINE |
21/11/2008 -
Microsoft Windows fête ses 23 ans !
Le célèbre système d'exploitation de Microsoft fête aujourd'hui son vingt-troisième anniversaire. C' ...
|
21/11/2008 -
Pratiques fondamentales pour un développement logiciel sûr
L'article de Micheal Howard vient d'être traduit en français par Kader Yildirim ! Ce document synthé ...
|
21/11/2008 -
Mise à jour de la méthode SDL pour éradiquer définitivement les Mécapoulets
Les Mécapoulets sont une menace perpétuelle pour les développeurs et les utilisateurs de leurs appli ...
|
20/11/2008 -
A la découverte des tests d’interfaces graphiques avec Visual Studio 2010
Microsoft introduit dans sa version 2010 de Visual Studio les « Coded UI Tests », ou « Tests d’inter ...
|
20/11/2008 -
PDC 2008 - Windows Azure vu par Grégory Renard
Grégory vous propose de découvrir en vidéo - et en 5 minutes - les annonces faites autour de Windows ...
|
20/11/2008 -
Microsoft prépare une suite antivirus gratuite
L’éditeur abandonne Live One Care, sa solution payante, au profit de Morro, une suite antivirus grat ...
|
19/11/2008 -
Comprendre le fonctionnement des Rules de WF
L'activité Policy va nous permettre de piloter nos workflows à partir de règles simples mais efficac ...
|
|
|
