pb avec recuperation de formulaire pour envoie d'un mail

pb avec recuperation de formulaire pour envoie d'un mail - ASP - Programmation

Marsh Posté le 23-02-2006 à 16:49:06    

bonjour tout le monde,  
 
voila j'utilise le peti script suivant pour récuperer les données d'un formulaire et les envoyer par mail,  
Le probleme est que les ligne correspondant au tel fax email et siteWeb n'apparaisse pas dans mon mail et que je ne vois pas du tout d'ou ca peu venir...
 

Code :
  1. <%
  2. set msg = Server.CreateOBject( "JMail.SMTPMail" )
  4. sujet = "Mail du site Delta-antoine.com"
  5. societe = Request.Form("nomSociete" )
  6. nom = Request.Form("nomContact" )
  7. adresse = Request.Form("txtadresseSociete" )
  8. code_postal = Request.Form("cp" )
  9. ville = Request.Form("ville" )
  10. pays = Request.Form("menuPays" )
  11. autrePays = Request.Form("autrePays" )
  12. tel = Request.Form("txtTel" )
  13. fax = Request.Form("txtFax" )
  14. eMail = Request.Form("txteMail" )
  15. SiteWeb = Request.Form("txtSiteInternet" )
  16. renseignements = Request.Form("chk" )
  17. commentaire = Request.Form("txtAreaCommentaire" )
  19. corps = sujet & chr(10) & chr(13)& chr(10) & chr(13)
  20. corps = corps & societe & chr(10) & chr(13)
  21. corps = corps & nom & chr(10) & chr(13)
  22. corps = corps & adresse & chr(10) & chr(13)
  23. corps = corps & code_postal & chr(10) & chr(13)
  24. corps = corps & ville & chr(10) & chr(13)
  25. corps = corps & pays & chr(10) & chr(13)
  26. coprs = corps & autrePays & chr(10) & chr(13)
  27. corps = corps & tel & chr(10) & chr(13)
  28. corps = corps & fax & chr(10) & chr(13)
  29. corps = corps & eMail & chr(10) & chr(13)
  30. corps = coprs & siteInternet & chr(10) & chr(13)
  31. corps = coprs & renseignements & chr(10) & chr(13)
  32. corps = coprs & devis & chr(10) & chr(13)
  33. corps = coprs & demo & chr(10) & chr(13)
  34. corps = corps & commentaire & chr(10) & chr(13)
  37. msg.ServerAddress = "mail.delta-antoine.com"
  38. msg.sender = "delta@delta-antoine.com"
  39. msg.AddRecipient "delta@delta-antoine.com"
  40. msg.Subject = sujet
  41. msg.body = corps
  43. msg.silent = true
  44. if  (msg.execute()) then
  45. %>


 
si queqlu'un a une idée du probleme
 
merci..;)

Reply

Marsh Posté le 23-02-2006 à 16:49:06   

Reply

Sujets relatifs:

Leave a Replay

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