Redirection de formulaire via objet CDONTS

Redirection de formulaire via objet CDONTS - ASP - Programmation

Marsh Posté le 27-03-2006 à 11:15:09    

Bonjour à tous !
je suis débutante, et j'ai un problème de redirection de formulaire qui se trouve sur une page HTML.
J'ai fait de nombreuses recherches sur le web et j'avais fini par trouver la solution de passer par PHP
en pointant mon formulaire vers une page "envoyer.php", mais erreur de débutant oblige j'avais oublié
de vérifier que mon hébergeur acceptait le php ce qui n'était pas le cas... Le support technique de celui-ci
me dit de passer par asp et l'objet CDONTS (sans plus de précision). J'ai refait pas mal de recherches
depuis, mais je suis un peu perdue, pouvez-vous m'aider ?
Est-ce que je dois (comme avec php) laisser mon formulaire sur ma page HTLM et le faire pointer sur une page
"envoyer.asp" ou bien est-ce que je dois placer directement mon formulaire sur une page asp ?
 
merci d'avance...

Reply

Marsh Posté le 27-03-2006 à 11:15:09   

Reply

Marsh Posté le 27-03-2006 à 13:03:19    

les 2 solution sont valable, fichier commun ou séparé !  ;)  
 
voila un exemple d'utilisation de CDONT  
 

Code :
  1. <%
  2.   'Création de l Objet server
  3.   Set objCDOMail = Server.CreateObject("CDONTS.NewMail" )
  5.    'Qui envoi le mail
  6.    .From = "toto@domaine.com"
  8.    'A qui le mail est envoye
  9.    .To = "monmail@mondomaine.com"
  11.    'le sujet
  12.    .Subject = "le sujet"
  14.    'le message
  15.    .Body = "message"
  17.    'Decide si le message est en texte ou en html (0=HTML 1=Text)
  18.     .BodyFormat = 1
  20.    'formt du mail (0=MIME 1=Text)
  21.    .MailFormat = 0
  23.    'Importance (0=basse, 1=Normal, 2=haute)
  24.    .Importance = 1
  26.    'envoi du mail
  27.    .Send
  29.   'Ferme l'objet serveur
  30.   Set objCDOMail = Nothing
  31. %>


Message édité par Flyman30 le 27-03-2006 à 13:06:32
Reply

Marsh Posté le 27-03-2006 à 17:19:17    

Merci beaucoup ! Je crois que ça va pas mal m'aider...

Reply

Marsh Posté le 29-03-2006 à 11:08:39    

:( Bonjour,
 
J'ai créé une page "envoyer.asp" vers laquelle mon formuliare html est dirrigé,
mais ça ne fonctionne pas : un message d'erreur apparaît (HTTP 500 - Erreur interne du serveur  
Internet Explorer )
Est-ce que quelq'un peut vérifier mes codes ?
 
Page html (désolée c'est un peu long) :

Code :
  1. <html>
  2. <head>
  3. <title>Untitled Document</title>
  4. <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
  5. <script language="JavaScript">
  6. <!--
  7. function MM_swapImgRestore() { //v3.0
  8.   var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
  9. }
  11. function MM_preloadImages() { //v3.0
  12.   var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
  13.     var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
  14.     if (a[i].indexOf("#" )!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
  15. }
  17. function MM_findObj(n, d) { //v4.0
  18.   var p,i,x;  if(!d) d=document; if((p=n.indexOf("?" ))>0&&parent.frames.length) {
  19.     d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  20.   if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  21.   for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  22.   if(!x && document.getElementById) x=document.getElementById(n); return x;
  23. }
  25. function MM_swapImage() { //v3.0
  26.   var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
  27.    if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
  28. }
  29. //-->
  30. </script>
  31. </head>
  33. <body bgcolor="#FFFFFF" text="#000000" onLoad="MM_preloadImages('images/annuler-over.gif')">
  34. <form action="envoyer.asp" method="post" name="devis">
  35.   <table cellspacing="5" cellpadding="0" width="73%">
  36.     <tr>
  37.       <td colspan="4">
  38.         <div align="center">
  39.           <p align="left"><font face="Arial, Helvetica, sans-serif" size="1" color="#000000"><b>Cette
  40.             page est EXCLUSIVEMENT r&eacute;serv&eacute;e aux demandes concernant
  41.             les lots de la liste du mat&eacute;riel disponible en stock (toute
  42.             commande ne pourra &ecirc;tre inf&eacute;rieure &agrave; 2 tonnes
  43.             soit 1 fardeau).<br>
  44.             Pour toute autre demande sur d&eacute;lai avec un minimum de 10 tonnes
  45.             par poste, veuillez utiliser la rubrique contact.<br>
  46.             </b></font><b><font face="Arial, Helvetica, sans-serif" size="1" color="#FF0000"><br>
  47.             </font></b></p>
  48.         </div>
  49.       </td>
  50.     </tr>
  51.     <tr>
  52.       <td><b><font face="Arial, Helvetica, sans-serif" size="1">NOM</font></b></td>
  53.       <td>
  54.         <input type="text" name="nom" size="30">
  55.       </td>
  56.       <td><b><font face="Arial, Helvetica, sans-serif" size="1">APE</font></b></td>
  57.       <td>
  58.         <input type="text" name="ape" size="25">
  59.       </td>
  60.     </tr>
  61.     <tr>
  62.       <td><b><font face="Arial, Helvetica, sans-serif" size="1">PRENOM </font></b></td>
  63.       <td>
  64.         <input type="text" name="prenom" size="30">
  65.       </td>
  66.       <td><b><font face="Arial, Helvetica, sans-serif" size="1">SIRET</font></b></td>
  67.       <td>
  68.         <input type="text" name="siret" size="25">
  69.       </td>
  70.     </tr>
  71.     <tr>
  72.       <td><b><font face="Arial, Helvetica, sans-serif" size="1">SOCIETE</font></b></td>
  73.       <td>
  74.         <input type="text" name="societe" size="30">
  75.       </td>
  76.       <td><b></b></td>
  77.       <td>&nbsp; </td>
  78.     </tr>
  79.     <tr>
  80.       <td><b><font face="Arial, Helvetica, sans-serif" size="1">ADRESSE</font></b></td>
  81.       <td>
  82.         <input type="text" name="adresse" size="30">
  83.       </td>
  84.       <td><b><font face="Arial, Helvetica, sans-serif" size="1">NUANCE</font></b></td>
  85.       <td>
  86.         <input type="text" name="nuance" size="25">
  87.       </td>
  88.     </tr>
  89.     <tr>
  90.       <td><b><font face="Arial, Helvetica, sans-serif" size="1">CP</font></b></td>
  91.       <td>
  92.         <input type="text" name="cp" size="10">
  93.       </td>
  94.       <td><b><font face="Arial, Helvetica, sans-serif" size="1">DIAMETRE</font></b></td>
  95.       <td>
  96.         <input type="text" name="diam" size="25">
  97.       </td>
  98.     </tr>
  99.     <tr>
  100.       <td><b><font face="Arial, Helvetica, sans-serif" size="1">VILLE </font></b></td>
  101.       <td>
  102.         <input type="text" name="ville" size="30">
  103.       </td>
  104.       <td><b><font face="Arial, Helvetica, sans-serif" size="1">QUANTITE</font></b></td>
  105.       <td>
  106.         <input type="text" name="quantite" size="25">
  107.       </td>
  108.     </tr>
  109.     <tr>
  110.       <td><b><font face="Arial, Helvetica, sans-serif" size="1">TEL.</font></b></td>
  111.       <td>
  112.         <input type="text" name="tel" size="30">
  113.       </td>
  114.       <td><b></b></td>
  115.       <td>&nbsp; </td>
  116.     </tr>
  117.     <tr>
  118.       <td><b><font face="Arial, Helvetica, sans-serif" size="1">FAX</font></b></td>
  119.       <td>
  120.         <input type="text" name="fax" size="30">
  121.       </td>
  122.       <td><b></b></td>
  123.       <td>&nbsp;</td>
  124.     </tr>
  125.     <tr>
  126.       <td><b><font face="Arial, Helvetica, sans-serif" size="1">MAIL</font></b></td>
  127.       <td>
  128.         <input type="text" name="mail" size="30">
  129.       </td>
  130.       <td>
  131.         <div align="left"><b>
  132.           <input name="Submit" type="submit" value="Envoyer">
  133.           </b></div>
  134.       </td>
  135.       <td> <a href="enstock.htm" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('Image2','','images/annuler-over.gif',1)"><img name="Image2" border="0" src="images/annuler.gif" width="73" height="28"></a></td>
  136.     </tr>
  137.   </table>
  138. </form>
  139. </body>
  140. </html>


 
Page asp :

Code :
  1. <%Language=VBScript%>
  2. <%
  3. nom=Request.Form("nom" )
  4. ape=Request.Form("ape" )
  5. siret=Request.Form("siret" )
  6. societe=Request.Form("societe" )
  7. adresse=Request.Form("adresse" )
  8. nuance=Request.Form("nuance" )
  9. cp=Request.Form("cp" )
  10. diametre=Request.Form("diametre" )
  11. ville=Request.Form("ville" )
  12. quantite=Request.Form("quantite" )
  13. tel=Request.Form("tel" )
  14. fax=Request.Form("fax" )
  15. mail=Request.Form("mail" )
  17. Set ObjetNewMail=CreateObjet("CDONTS.NewMail" )
  18. ObjetNewMail.From=Request.Form("mail" )
  19. ObjetNewMail.To="ardenacier@ardenacier.fr"
  20. ObjetNewMail.Subject="demande_de_prix"
  21. ObjetNewMail.Body=Request.Form("nom" )& Request.Form("ape" )& Request.Form("siret" )& Request.Form("societe" )& Request.Form("adresse" )& Request.Form("nuance" )& Request.Form("cp" )& Request.Form("diametre" )& Request.Form("ville" )& Request.Form("quantite" )& Request.Form("tel" )& Request.Form("fax" )& Request.Form("mail" )
  22. ObjetNewMail.BodyFormat=1
  23. ObjetNewMail.MailFormat=1
  24. ObjetNewMail.Send
  25. Set ObjetNewMail=Nothing
  26. %>


 
Merci d'avance...

Reply

Marsh Posté le 29-03-2006 à 19:42:50    


<%Language=VBScript%>
<%
nom=Request.Form("nom" )
ape=Request.Form("ape" )
siret=Request.Form("siret" )
societe=Request.Form("societe" )
adresse=Request.Form("adresse" )
nuance=Request.Form("nuance" )
cp=Request.Form("cp" )
diametre=Request.Form("diametre" )
ville=Request.Form("ville" )
quantite=Request.Form("quantite" )
tel=Request.Form(&"tel" )
fax=Request.Form("fax" )
mail=Request.Form("mail" )
 
Ct = ct&"<html><body>"
Ct = ct& nom & "<br>"
Ct = ct& ape & "<br>
Ct = ct& siret & "<br>
Ct = ct& societe & "<br>
Ct = ct& adresse & "<br>
Ct = ct& nuance & "<br>
Ct = ct& cp & "<br>
Ct = ct& diametre & "<br>
Ct = ct& ville & "<br>
Ct = ct& quantite & "<br>
Ct = ct& tel & "<br>
Ct = ct& fax & "<br>
Ct = ct& mail & "<br>
CT = ct&"</body></html>"
 
 
Set ObjetNewMail=CreateObjet("CDONTS.NewMail" )
ObjetNewMail.From=Request.Form("mail" )
ObjetNewMail.To="ardenacier@ardenacier.fr"
ObjetNewMail.Subject="demande_de_prix"
ObjetNewMail.Body= Ct
blnHTML = True
ObjetNewMail.BodyFormat=0
ObjetNewMail.MailFormat=0
ObjetNewMail.Send
Set ObjetNewMail=Nothing
%>


Message édité par Flyman30 le 29-03-2006 à 19:44:24
Reply

Marsh Posté le 30-03-2006 à 11:28:51    

Merci Flyman30 pour ton aide. Je viens de tester et j'ai toujours le même message d'erreur (HTTP 500 - Erreur interne du serveur  
Internet Explorer ). Sais-tu d'où le problème peux venir ? De l'hébergeur (Oléane)? De moi : (je vais peut-être poser une question bête, mais je débute) est-ce qu'il y a quelquechose de spécial à installer sur mon PC pour qu'asp fonctionne (je travaille sur XP E.F.) ?

Message cité 1 fois
Reply

Marsh Posté le 30-03-2006 à 13:44:47    

pipistrelle a écrit :

Merci Flyman30 pour ton aide. Je viens de tester et j'ai toujours le même message d'erreur (HTTP 500 - Erreur interne du serveur  
Internet Explorer ). Sais-tu d'où le problème peux venir ? De l'hébergeur (Oléane)? De moi : (je vais peut-être poser une question bête, mais je débute) est-ce qu'il y a quelquechose de spécial à installer sur mon PC pour qu'asp fonctionne (je travaille sur XP E.F.) ?


 
Je suppose que tu as installé IIS ?  

Reply

Marsh Posté le 30-03-2006 à 14:09:56    

Teste ça : (je n'ai pas Cdonts d'insatllé) si tu le peut utilise JMAIL ou ASPMAIL  ;)  
 
Appelle la page : envoyer.asp
 

<%Language=VBScript%>
<%
envoimail=Request.form("envoimail" )
if envoimail<>"" then
 
nom=Request.Form("nom" )
ape=Request.Form("ape" )
siret=Request.Form("siret" )
societe=Request.Form("societe" )
adresse=Request.Form("adresse" )
nuance=Request.Form("nuance" )
cp=Request.Form("cp" )
diametre=Request.Form("diametre" )
ville=Request.Form("ville" )
quantite=Request.Form("quantite" )
tel=Request.Form("tel" )
fax=Request.Form("fax" )
mail=Request.Form("mail" )
 
Ct = ct&"<html><body>"
Ct = ct& nom & "<br>"
Ct = ct& ape & "<br>"
Ct = ct& siret & "<br>"
Ct = ct& societe & "<br>"
Ct = ct& adresse & "<br>"
Ct = ct& nuance & "<br>"
Ct = ct& cp & "<br>"
Ct = ct& diametre & "<br>"
Ct = ct& ville & "<br>"
Ct = ct& quantite & "<br>"
Ct = ct& tel & "<br>"
Ct = ct& fax & "<br>"
Ct = ct& mail & "<br>"
CT = ct&"</body></html>"
 
 
Set ObjetNewMail=CreateObjet("CDONTS.NewMail" )
ObjetNewMail.From=Request.Form("mail" )
ObjetNewMail.To="ardenacier@ardenacier.fr"
ObjetNewMail.Subject="demande_de_prix"
ObjetNewMail.Body= Ct
blnHTML = True
ObjetNewMail.BodyFormat=0
ObjetNewMail.MailFormat=0
ObjetNewMail.Send
Set ObjetNewMail=Nothing
 
end if  
%>
 
      <html>
      <head>
      <title>Untitled Document</title>
      <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
      <script language="JavaScript">
      <!--
      function MM_swapImgRestore() { //v3.0
       var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
      }
      function MM_preloadImages() { //v3.0
       var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
         var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
         if (a[i].indexOf("#" )!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
      }
 
      function MM_findObj(n, d) { //v4.0
       var p,i,x;  if(!d) d=document; if((p=n.indexOf("?" ))>0&&parent.frames.length) {
         d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
       if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
       for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
       if(!x && document.getElementById) x=document.getElementById(n); return x;
      }
 
      function MM_swapImage() { //v3.0
       var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
        if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
      }
      //-->
      </script>
      </head>
      <body bgcolor="#FFFFFF" text="#000000" onLoad="MM_preloadImages('images/annuler-over.gif')">
      <form action="envoyer.asp" method="post" name="devis">
      <input type="hidden" name="envoimail" value="ok" id="hidden1" />
       <table cellspacing="5" cellpadding="0" width="73%">
         <tr>
           <td colspan="4">
             <div align="center">
               <p align="left"><font face="Arial, Helvetica, sans-serif" size="1" color="#000000"><b>Cette
                 page est EXCLUSIVEMENT r&eacute;serv&eacute;e aux demandes concernant
                 les lots de la liste du mat&eacute;riel disponible en stock (toute
                 commande ne pourra &ecirc;tre inf&eacute;rieure &agrave; 2 tonnes
                 soit 1 fardeau).<br>
                 Pour toute autre demande sur d&eacute;lai avec un minimum de 10 tonnes
                 par poste, veuillez utiliser la rubrique contact.<br>
                 </b></font><b><font face="Arial, Helvetica, sans-serif" size="1" color="#FF0000"><br>
                 </font></b></p>
             </div>
           </td>
         </tr>
         <tr>
           <td><b><font face="Arial, Helvetica, sans-serif" size="1">NOM</font></b></td>
           <td>
             <input type="text" name="nom" size="30">
           </td>
           <td><b><font face="Arial, Helvetica, sans-serif" size="1">APE</font></b></td>
           <td>
             <input type="text" name="ape" size="25">
           </td>
         </tr>
         <tr>
           <td><b><font face="Arial, Helvetica, sans-serif" size="1">PRENOM </font></b></td>
           <td>
             <input type="text" name="prenom" size="30">
           </td>
           <td><b><font face="Arial, Helvetica, sans-serif" size="1">SIRET</font></b></td>
           <td>
             <input type="text" name="siret" size="25">
           </td>
         </tr>
         <tr>
           <td><b><font face="Arial, Helvetica, sans-serif" size="1">SOCIETE</font></b></td>
           <td>
             <input type="text" name="societe" size="30">
           </td>
           <td><b></b></td>
           <td>&nbsp; </td>
         </tr>
         <tr>
           <td><b><font face="Arial, Helvetica, sans-serif" size="1">ADRESSE</font></b></td>
           <td>
             <input type="text" name="adresse" size="30">
      </td>
          <td><b><font face="Arial, Helvetica, sans-serif" size="1">NUANCE</font></b></td>
           <td>
             <input type="text" name="nuance" size="25">
           </td>
         </tr>
         <tr>
           <td><b><font face="Arial, Helvetica, sans-serif" size="1">CP</font></b></td>
           <td>
             <input type="text" name="cp" size="10">
           </td>
            <td><b><font face="Arial, Helvetica, sans-serif" size="1">DIAMETRE</font></b></td>
           <td>
             <input type="text" name="diam" size="25">
           </td>
         </tr>
         <tr>
           <td><b><font face="Arial, Helvetica, sans-serif" size="1">VILLE </font></b></td>
           <td>
             <input type="text" name="ville" size="30">
           </td>
           <td><b><font face="Arial, Helvetica, sans-serif" size="1">QUANTITE</font></b></td>
           <td>
             <input type="text" name="quantite" size="25">
           </td>
         </tr>
          <tr>
           <td><b><font face="Arial, Helvetica, sans-serif" size="1">TEL.</font></b></td>
           <td>
             <input type="text" name="tel" size="30">
           </td>
           <td><b></b></td>
           <td>&nbsp; </td>
         </tr>
         <tr>
           <td><b><font face="Arial, Helvetica, sans-serif" size="1">FAX</font></b></td>
           <td>  <input type="text" name="fax" size="30">
           </td>
           <td><b></b></td>
           <td>&nbsp;</td>
         </tr>
         <tr>
           <td><b><font face="Arial, Helvetica, sans-serif" size="1">MAIL</font></b></td>
           <td>
             <input type="text" name="mail" size="30">
           </td>
           <td>
             <div align="left"><b><input name="Submit" type="submit" value="Envoyer"></b></div>
           </td>
           <td> <a href="enstock.htm" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('Image2','','images/annuler-over.gif',1)"><img name="Image2" border="0" src="images/annuler.gif" width="73" height="28"></a></td>
         </tr>
       </table>
       </form>
      </body>
      </html>


Message édité par Flyman30 le 30-03-2006 à 14:10:51
Reply

Marsh Posté le 30-03-2006 à 17:16:11    

Merci encore... Pour jmail et aspmail je ne sais pas si c'est accepté.
J'ai testé ton script : je n'est plus de message d'erreur mais le message n'est pas envoyé. je pense qu'il y a une "M...e" avec Oléane, alors je leur ai envoyé une demande d'aide technique, j'attends de leurs nouvelles.

Reply

Marsh Posté le 04-04-2006 à 15:08:35    

:hello: Bonjour,
En fait ton script fonctionne nickel, il y avait juste quelques petites erreurs (style des guillemets...) et j'avais merdé
dans l'adresse expediteur. Voilà le script corrigé, si ça peut aider quelqu'un d'autre...
 

Code :
  1. <%Language=VBScript%>
  2. <%
  3. nom=Request.Form("nom" )
  4. prenom=Request.Form("prenom" )
  5. societe=Request.Form("societe" )
  6. adresse=Request.Form("adresse" )
  7. cp=Request.Form("cp" )
  8. ville=Request.Form("ville" )
  9. tel=Request.Form("tel" )
  10. fax=Request.Form("fax" )
  11. mail=Request.Form("mail" )
  12. ape=Request.Form("ape" )
  13. siret=Request.Form("siret" )
  14. nuance=Request.Form("nuance" )
  15. diam=Request.Form("diam" )
  16. quantite=Request.Form("quantite" )
  18. Ct = ct&"<html><body>"
  19. Ct = ct& nom & "<br>"
  20. Ct = ct& prenom & "<br> "
  21. Ct = ct& societe & "<br> "
  22. Ct = ct& adresse & "<br> "
  23. Ct = ct& cp & "<br>"
  24. Ct = ct& ville & "<br>"
  25. Ct = ct& tel & "<br> "
  26. Ct = ct& fax & "<br> "
  27. Ct = ct& mail & "<br> "
  28. Ct = ct& ape & "<br>"
  29. Ct = ct& siret & "<br>"
  30. Ct = ct& nuance & "<br> "
  31. Ct = ct& diam & "<br> "
  32. Ct = ct& quantite & "<br> "
  33. CT = ct&"</body></html>"
  35. Dim MAILCDO
  36. Set MAILCDO = Server.CreateObject("CDONTS.NewMail" )
  37. MAILCDO.To = "destinataire@destinataire.fr"
  38. MAILCDO.From = "expediteur@expediteur.fr"
  39. MAILCDO.Subject = " Formulaire du site Web"
  40. MAILCDO.Body = CT
  41. MAILCDO.Importance = 1
  42. MAILCDO.BodyFormat=0
  43. MAILCDO.MailFormat=0
  44. MAILCDO.Send
  45. set MAILCDO=Nothing
  46. %>
  48. <% response.redirect "url" %>


 
Sinon comme je ne veux pas mourrir idiote et ne pas recopier bêtement sans comprendre ce que je fais, peux-tu
m'expliquer à quoi correspondent les "ct" ? Est-ce que c'est pour la bonne mise en forme (retour à la ligne etc...)
dans le mail final ?
Peux-tu également, selon ta technique m'expliquer comment on peut récupérer les données d'un "textarea" ?
Et si ce n'est pas trop abuser...
Je récupère les données comme ça :
réponse
réponse
réponse...
Je voudrais récupérer comme ça :
question = réponse
Est-ce que c'est possible ?
Merci d'avance !

Reply

Marsh Posté le 04-04-2006 à 15:08:35   

Reply

Marsh Posté le 05-04-2006 à 09:18:07    

Pour la question sur le ct c'est juste une façon de récupérer les données sous forme d'un texte html
 
voila un exemple de ce que j'emploi pour des demandes de renseignement (il y a un textarea) là c'est avec ASPEmail mais c'est la même chose avec n'importe quel composant ASP pour envoyer un mail :


<!DOCTYPE html PUBLIC "-//W3C//Dtd XHTML 1.0 strict//EN" "http://www.w3.org/tr/xhtml1/Dtd/xhtml1-strict.dtd">
 
<% @LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
envoimail=Request.form("envoimail" )
if envoimail<>"" then
  Nom=Request.form("nom" )
  Prenom=Request.form("prenom" )
  Imail=Request.form("eMail" )
  Objet=Request.form("Objet" )
 
' Body in HTML format
strHTML = "<b>Nom: </b>" & Request.form("nom" ) & "  "  & Request.form("prenom" ) & "<br />" & _
"<b>Email: </b>" & Request.form("eMail" ) & "<br />" & _
"<b>Objet: </b>" & Request.form("Objet" ) & "<br />" & _
"<b>Demande: </b><br /><fieldset>" & Request.form("proposition" ) & "</fieldset>"
 
 
'******* Envoi du Mail ***********
 
Set Mail = Server.CreateObject("Persits.MailSender" )
REM -- Remplacer le smtp par un smtp valide !  
Mail.Host = "smtp.wanadoo.fr"
'*** Adresse SMTP du serveur ne doit pas changer
 
Mail.From = Imail
'*** Mail.From correspond à l'e-mail de l'emmetteur
 
Mail.FromName = Nom
'*** Nom de l'emmetteur
 
Mail.AddAddress "webmaster@toto.com"
'*** Adresse E-mail ou sera envoyé le formulaire A REMPLACER PAR VOtrE E-MAIL
 
Mail.Priority = "3"
'*** Niveau de priorité du mail : 1(haute), 3(normal) & 5(basse)
 
Mail.Subject = Objet
'*** sujet mail
 
Mail.IsHTML = true
Mail.Body = "<html><body>" & strHTML & "</body></html>"
'*** variable commentaire est récupéré du formulaire
 
On Error Resume Next
Mail.Send
 if Err <> 0 then
emailverif=1
 End If
response.redirect ("index.asp" )
 
'******* FIN Envoi du Mail ***********
end if  
 
%>
<html>
 <head>
  <title>Contacter le webmaster</title>
  <!--#include file="meta.inc"-->
  <script type="text/javascript" src="formValidation.js"></script>
 </head>
 <body>
  <!--#include file = "Haut.inc"-->
  <div id="contenu">
   <div id="gauche">
    <!--#include file="menu-accueil.inc"-->
   </div>
   <div id="principal">
   <h1>Contacter le webmaster</h1>
   <p>&nbsp;</p>
<p>&nbsp;</p>
 <form id="demande" method="post" action="Contactwebmaster.asp" onsubmit="return validateForm(this)">
 <p><input type="hidden" name="envoimail" value="ok" id="hidden1" /></p>  
  <div id="cadreform">
   <fieldset id="coordonnees">
    <legend>Vos coordonnées personnelles</legend>
    <br />
    <p>
     <label for="nom" title="Veuillez saisir votre nom en lettres majuscules" class="oblig">* Nom :</label>
     <input type="text" name="nom" id="nom"  value="<%=nom%>" title="Veuillez saisir votre nom en lettres majuscules" tabindex="1" onfocus="this.className='focus';" onblur="this.className='normal';" onchange="javascript:this.value=this.value.toUpperCase();" />
     <span class="legend">ex : 'MARTIN'</span>
    </p>
    <p>
     <label for="prenom" title="Veuillez saisir votre prénom" class="oblig">* Prénom :</label>
     <input type="text" name="prenom" id="prenom" value="<%=prenom%>"  title="Veuillez saisir votre prénom" tabindex="2" onfocus="this.className='focus';" onblur="this.className='normal';" />
    </p>
    <p>
     <label for="eMail" title="Veuillez saisir votre adresse email" class="oblig">* e-Mail :</label>
     <input type="text" name="eMail" id="eMail" value="<%=eMail%>"  title="Veuillez saisir votre adresse e-mail" tabindex="3" onfocus="this.className='focus';" onblur="this.className='normal';" />
     <a href="#" class="aide" title="Votre adresse e-mail ne sera pas communiquée à des tiers" tabindex="0"><img src="Images/icon_help.gif" alt="Votre adresse e-mail ne sera pas utilisée à des fins commerciales" /></a>
    </p>
    <p>
     <label for="Objet" title="Veuillez saisir l'objet de votre deamande" class="oblig">* Objet :</label>
     <input type="text" name="Objet" id="Objet" value="<%=Objet%>"  title="Veuillez saisir l'objet de votre demande" tabindex="4" onfocus="this.className='focus';" onblur="this.className='normal';" />
    </p>
<br /><em>* Champs obligatoires</em>
   </fieldset>
   <br />
   <fieldset id="question">
       <legend>Votre demande</legend>
    <br />
   <p class="centre">
   <textarea name="proposition" cols="60" rows="15" id="proposition" title="veuiilez saisir votre demande" tabindex="5" onfocus="this.className='focus';" onblur="this.className='normal';"><%=proposition%></textarea></p>
   <input type="submit" name="valid" id="valid" value="Envoyez" title="Cliquez sur ce bouton pour nous envoyer votre demande" tabindex="6" />  
   <br />
   </fieldset>
 
   <br />
   
  </div>
 
 </form>
  </div>
</body>
</html>


 
et la fonction de validation :
 

// Boucle de validation
function validateForm(form) {
 if (isNotEmpty(form.nom)) {
  if (isNotEmpty(form.prenom)) {
   if (isNotEmpty(form.eMail)) {
    if (isEMailAddr(form.eMail)) {
     if (isNotEmpty(form.Objet)) {
      if (isNotEmpty(form.proposition)) {    
       return true;
       
                 }    
                       }
                                 }
           }
                               }
                          }
 return false;
                            }
 
// Vérifie si un champ a bien été renseigné
function isNotEmpty(elem) {
 var str = elem.value;
    var re = /.+/;
    if(!str.match(re)) {
        alert("Veuillez renseigner les champs obligatoires." );
        setTimeout("focusElement('" + elem.form.name + "', '" + elem.name + "')", 0);
        return false;
    } else {
        return true;
    }
}
 
// Vérifie si l'adresse e-mail est valide
function isEMailAddr(elem) {
 var str = elem.value;
    var re = /^[\w-]+(\.[\w-]+)*@([\w-]+\.)+[a-zA-Z]{2,7}$/;
    if (!str.match(re)) {
        alert("Veuillez vérifier le format de votre adresse e-mail." );
        setTimeout("focusElement('" + elem.form.name + "', '" + elem.name + "')", 0);
        return false;
    } else {
        return true;
    }
}
 
// Positionne le curseur dans le premier champs
function focusForm() {
  document.getElementById('nom').focus();
}
window.onload = focusForm;
 
// Positionne le curseur dans un champ donné
function focusElement(formName, elemName) {
    var elem = document.forms[formName].elements[elemName];
    elem.focus();
    elem.select();
}


 

Reply

Marsh Posté le 05-04-2006 à 09:40:53    

Sinon pour la question sur la mise en forme de la récupération des champs comme la variable CT est du html ça devient très simple :
 

Ct = ct&"<html><body>"
Ct = ct&"Nom : " & nom & "<br>"
Ct = ct&"Prénom : " & prenom & "<br> "
Ct = ct&"Société : " & societe & "<br> "
Ct = ct&"Adresse : " & adresse & "<br> "
Ct = ct&"Code-postal : " & cp & "<br>"
Ct = ct&"Ville : " &ville & "<br>"
Ct = ct&"Téléphone : " & tel & "<br> "
Ct = ct&"Fax : " & fax & "<br> "
Ct = ct&"Mail : & mail & "<br> "
Ct = ct&"Code APE : " & ape & "<br>"
Ct = ct&"Siret : " & siret & "<br>"
Ct = ct&"Nuance : " & nuance & "<br> "
Ct = ct&"Diamètre : " & diam & "<br> "
Ct = ct&"Quantité : " & quantite & "<br> "
CT = ct&"</body></html>"

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed