begin process at 2012 02 08 19:13:46
  Trouver un code source :
 
dans
 
[ Dernières recherches ]
Accueil > 

Code

 > 

E-mail

 > ENVOYER UN EMAIL VIA L'ASP (DONNÉES D'UN FORMULAIRE)

ENVOYER UN EMAIL VIA L'ASP (DONNÉES D'UN FORMULAIRE)


 Information sur la source

Note :
7 / 10 - par 21 personnes
7,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :E-mail Classé sous :envoyer, send, mail, cdomail, formulaire Niveau :Débutant Date de création :17/04/2001 Vu :54 143
Auteur : labo

Ecrire un message privé
Commentaire sur cette source (19)
Ajouter un commentaire et/ou une note

 Description

Permet d'envoyer le contenu d'un formulaire "type" par Email sans posseder de composant particulier sur le serveur mais en utilisant "objCDOMail"

Source

  • <%
  • Dim objCDOMail
  • Set objCDOMail = Server.CreateObject("CDONTS.NewMail")
  • objCDOMail.From = request.form("_email")
  • objCDOMail.To="MON_EMAIL@MOI.COM"
  • objCDOMail.Subject=request.form("_sujet")
  • objCDOMail.Body=request.form("_body")
  • objCDOMail.Send
  • Set objCDOMail=Nothing
  • %>
  • <HTML>
  • <form name="form1" method="post" action="">
  • <p><font face="Arial, Helvetica, sans-serif"><b>VOTRE ADRESSE EMAIL
  • <input type="text" name="_email" size="45">
  • </b></font></p>
  • <p> <b><font face="Arial, Helvetica, sans-serif">SUJET
  • <input type="text" name="_sujet" size="60">
  • </font></b></p>
  • <p align="left"> <b><font face="Arial, Helvetica, sans-serif">MESSAGE
  • <textarea name="_body" rows="20" cols="100"></textarea>
  • </font></b> </p>
  • <p align="left">&nbsp;</p>
  • <input type="submit" name="Submit" value="Envoyer">
  • <input type="reset" name="Submit2" value="R&eacute;tablir">
  • </form>
  • </HTML> 
<%
Dim objCDOMail
Set objCDOMail = Server.CreateObject("CDONTS.NewMail")
objCDOMail.From = request.form("_email")
objCDOMail.To="MON_EMAIL@MOI.COM"
objCDOMail.Subject=request.form("_sujet")
objCDOMail.Body=request.form("_body")
objCDOMail.Send
Set objCDOMail=Nothing

%>
<HTML> 
<form name="form1" method="post" action="">
  <p><font face="Arial, Helvetica, sans-serif"><b>VOTRE ADRESSE EMAIL 
    <input type="text" name="_email" size="45">
    </b></font></p>
  <p> <b><font face="Arial, Helvetica, sans-serif">SUJET 
    <input type="text" name="_sujet" size="60">
    </font></b></p>
  <p align="left"> <b><font face="Arial, Helvetica, sans-serif">MESSAGE 
    <textarea name="_body" rows="20" cols="100"></textarea>
    </font></b> </p>
  <p align="left">&nbsp;</p>
  <input type="submit" name="Submit" value="Envoyer">
  <input type="reset" name="Submit2" value="R&eacute;tablir">
</form>


</HTML>

 Conclusion

Remplacer juste "MON_EMAIL@MOI.COM" par votre email pour recevoir le contenu de votre formulaire dans votre boite... tester c'est sympa...


 Sources de la même categorie

Source avec Zip Source .NET (Dotnet) HIDDENEMAIL : MASQUER VOS EMAILS AUX ROBOTS par sebmafate
Source .NET (Dotnet) C# - FONCTION TRÈS SIMPLE POUR ENVOYER UN MAIL VIA SMTP par fabrice69
Source .NET (Dotnet) ASP.NET - ENVOYER UN MAIL AVEC JMAIL.NET par epetegnief
Source .NET (Dotnet) CLASS : NEWSLETTER AVEC OPTIN par vladam
Source avec Zip E-MAIL EN JMAIL SIMPLE ET EFFICACE + FORMULAIRE par GillesWebmaster
Toutes les sources de la catégorie E-mail

 Sources en rapport avec celle ci

Source avec Zip E-MAIL EN JMAIL SIMPLE ET EFFICACE + FORMULAIRE par GillesWebmaster
Source avec Zip Source avec une capture Source .NET (Dotnet) ENVOI D'UN MAIL EN ASP.NET (GARANTIE 100% ET TRÈS SIMPLE) par CBphoenix
Source avec Zip Source .NET (Dotnet) ASP.NET UPLOAD D'UN FICHIER DU PC CLIENT VERS VOTRE SITE par michelsto
ENVOYER UN MAIL EN BCC À PLUSIEURS PERSONNES par BinOff
ENVOYER UN E-MAIL EN ASP par BinOff

Commentaires et avis

Commentaire de spider le 06/03/2002 08:54:11

Sa ne vas pas ...
G un compte sur kilio.com
voici mon code :

dim ObjMsg
set ObjMsg = Server.CreateObject("CDONTS.NewMail")
ObjMsg.From=Mail
ObjMsg.To="Spider987@kilio.com"
ObjMsg.Subject="Nouveau compte"
ObjMsg.Body=msgbody
ObjMsg.Send

et voici le message que g :

Erreur d'exécution Microsoft VBScript error '800a0046'
Permission refusée
/spider987/_membre/verify.asp, line 239

Commentaire de TORIUKE le 17/04/2002 19:01:33

Bonsoir,

Le script fonctionne très bien, bravo, mais j'ai un petit truc qui me pose problème pour personaliser ce cript. En effet, je veux récupérer dans le corps de mon e-mail un ensemble de champs de formulaire avec au comme containte d'affichage un retour à la ligne entre les résultats de chaque champs. Je n'arrive pas à faire de retour de ligne entre mes champs et ca commmence à me ...
Help Me... Help Me... Help Me...

TORIUKE

Commentaire de nirega le 26/04/2002 19:25:18

il ne fonctionne pas il me donne comme erreur :
Objet Server error 'ASP 0177 : 800401f3'
Échec de Server.CreateObject
/KH/testCour/envois.asp, line 4
Chaîne de classe incorrecte

Aider moi SVP

Commentaire de tomger le 04/06/2002 17:21:27

petit probleme de configuration sous IIS et xp pro, mon smtp digère cdonts sans soucis mais me stocke mes mails dans rep. queue, kesako?probablement la conf. mais pour l'instant je seche.... un conseil?

Commentaire de seblap47 le 02/08/2002 03:05:45

salut !
Où trouver cdonts.dll ???
J'ai XP pro avec IIS 5.1

Commentaire de Legion le 02/09/2002 10:08:15

Tous les hébergeurs n'acceptent pas cet objet, là est le prob

Commentaire de wde le 03/03/2003 15:01:32

Pour moi, pas message d'erreur, mais pas de résultat non plus... La page se réaffiche normalement, mais pas de mail reçu... Pourtant, ma configuiration de IIS 5.1 est bonne. Je suis sous XP Pro, j'ai importé cdonts.dll et l'ai enregistré au niveau de la base de registre.
Que se passe-t-il ? Quelqu'un peut-il m'aider ?

Commentaire de tnmit le 25/11/2003 00:34:20

CDonts n'existe plus sous winXP IIS 5.1. il est remplacé par CDO.Message.
Allez regarder le source sur :
http://www.pstruh.cz/tips/detpg_send-email-from-asp.htm

Commentaire de BBeppe le 10/02/2004 03:36:27

cote serveur

envoyer les données TEXTAREA vers NON PAS E-MAIL MAIS DISQUE DUR ??????


projet Editeur traducteur TEMPS REEL

Commentaire de GillesWebmaster le 28/08/2004 10:51:52

Bien mais j'ai un problème;
Si je met comme adresse e-mail, dans le champs mail, un nom quelquonque avec un arobase, je recois un message d'erreur;
SOS
Merci
Gilles Webmaster

Commentaire de sophie13 le 15/09/2004 12:14:53

Bravo. Ce code marche très bien pour moi. Deux questions SVP :
1°) Comment faire pour qu'une nouvelle page s'ouvre pour remercier/confirmer l'envoi du message de l'internaute ?

2°) Comment adapter le code dans le cas d'un ajout d'un menu déroulant dans le formulaire ?

Merci d'avance

Sophie13

Commentaire de chamoussa le 08/10/2004 16:46:26

Je souhaite savoir si on peut joindre des fichiers dans les mails à envoyer avec le composant CDO (Attachement file) ?

Commentaire de hala le 08/03/2005 16:18:23

Bonjour tout le monde,
pour moi le message d'errer c'est "Microsoft VBScript compilation error '800a0401' " j'ai pas trouver la solution. SVP si vous connaissez ce problème, aidez-moi.
merci d'avance.
NB: j'ai win XP  

Commentaire de pluc le 09/03/2005 02:53:36

moi ca marche super .. merci pour le code :-)

Commentaire de zebou_session le 17/10/2005 14:47:14

Bonjour,
Infographiste et pas développeur... Je souhaite créer un formulaire dont les infos seraient envoyées par mail.
Les formulaire comprend 2 radios boutons + nom prénom et message.

J'ai utilisé le script de Labo mais le mail ne part pas et sur le serveur j'ai carrément une erreur 500 Erreur interne du serveur
Internet Explorer  !...

Quelqu'un peut-il m'aider ? Please...

Merci à vous

Voici le code :
Le fichier formulaire :
<%
Dim objCDOMail
Set objCDOMail = Server.CreateObject("CDONTS.NewMail")
objCDOMail.From = request.form("_email")
objCDOMail.To="monmail@masociété.fr"
objCDOMail.Subject=request.form("_sujet")
objCDOMail.Body=request.form("_body")
objCDOMail.Send
Set objCDOMail=Nothing
  
%>
<form name="form1" method="post" action="traitement_invite.asp">
  <p><font face="Arial, Helvetica, sans-serif"><b>VOTRE ADRESSE EMAIL
    <input type="text" name="_email" size="45">
    </b></font></p>
  <p> <b><font face="Arial, Helvetica, sans-serif">SUJET
    <input type="text" name="_sujet" size="60">
    </font></b></p>
  <p align="left"> <b><font face="Arial, Helvetica, sans-serif">MESSAGE
    <textarea name="_body" rows="20" cols="100"></textarea>
    </font></b> </p>
  <p align="left">&nbsp;</p>
  <input type="submit" name="Submit" value="Envoyer">
  <input type="reset" name="Submit2" value="R&eacute;tablir">
</form>


Le fichier de traitement :

<%@ LANGUAGE="VBSCRIPT" %>
<%
Dim objCDOMail
Set objCDOMail = Server.CreateObject("CDONTS.NewMail")
objCDOMail.From = request.form("_email")
response.write(request.form("_email"))
objCDOMail.To="boucaud@genapi.fr"
objCDOMail.Subject=request.form("_sujet")
objCDOMail.Body=request.form("_body")
objCDOMail.Send
Set objCDOMail=Nothing
  
%>

<html>
<head>
<title>Invitaion au bateau</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link href="secib.css" rel="stylesheet" type="text/css">
</head>

<body background="img/fondbande.jpg" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<table height="100" border="0" cellpadding="4" cellspacing="0">
  <tr>
    <td width="742" valign="top" class="txt"> Votre demande &agrave; bien &eacute;t&eacute;
      prise en compte</td>
  </tr>
</table>
<p class="txtrouge">&nbsp; </p>
</body>
</html>


Commentaire de Cabelec le 15/02/2006 18:23:47

cool...sa marche pas chez moi l'objet CDONTS pose probleme

Commentaire de nourhouda0 le 31/03/2006 11:38:30

j'ai essayé ce sript dans mon serveur web mais quand je clique sur le lien, qui m'envoie vers le formulaire, le navigateur m'affiche l'erreur suivante:
Type d'erreur :
Erreur d'exécution Microsoft VBScript (0x800A01B6)
Cet objet ne gère pas cette propriété ou cette méthode: 'Form'
/form/index0.asp, line 4


Type de navigateur :
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; FunWebProducts; .NET CLR 1.1.4322)

Page :
GET /form/index0.asp

Heure :
vendredi 31 mars 2006, 09:30:49

que dois je faire?

Commentaire de serieuxgentil le 02/02/2008 22:50:51

salut à tous
ça marche pas chez moi
je reçoie le message suivant:
Technical Information (for support personnel)

Go to Microsoft Product Support Services and perform a title search for the words HTTP and 405.
Open IIS Help, which is accessible in IIS Manager (inetmgr), and search for topics titled Setting Application Mappings, Securing Your Site with Web Site Permissions, and About Custom Error Messages.

aidez moi merci

Commentaire de J17 le 29/05/2008 15:24:19

Je teste, mais rien n'arrive sur ma boîte.
Aucune page d'erreur, et bien sûr j'ai vérifié mes spam, que dalle...
J'ai XP, j'ai installé CDONTS.dll comme il faut.

Une idée?

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

Email Formulaire Web HTML [ par TORIUKE ] Salut,Je veux envoyer un email automatique à partir d'un formulaire. Quand je clic sur "envoyer", le mail part automatiquement au destinataire avec le envoi du contenu d'un formulaire par mail [ par sandra26 ] Salut, je voudrais envoyer le contenu de mon formulaire par mail.pour envoyer un mail ya pas de soucis, mon seul soucis est que jei besoin d'envoyer l envoyer formulaire (sans ouvrir la boite mail) [ par leeloodu33 ] Bonjour,[^^happy13] Je suis débutante dans les codes. J'ai crée un site sur une page perso, et conçu un formulaire. Cependant le bouton envoyer ne fo envoyer un mail [ par tatsurou25 ] Bonjour Je débute dans le langage ASP et après quelques jours de recherche je n'arrive toujours pas à créer un programme qui me permet d'envoyer des Envoie collectif des e-mail [ par younesway ] Bonjour, J'ai une feuil Excel qui porte 1400 adress mail, je suis senser de faire envoyer chaque samedi un message à chaque adress et le tout doit êt Envoi des e-mail regroupé [ par younesway ] Bonjour, J'ai une feuil Excel qui porte 800 adress mail, je suis senser de faire envoyer chaque samedi un message à chaque adress et le tout doit êt Envoi d'un formulaire de contact par email [ par hbibou_bibou ] Bonjour, J'aimerais bien envoyer un formulaire ASPX de contact par mail. Je m'explique : Dans la page de contact j'ai un formulaire avec Nom, adresse [Demande d'aide] javascript [ par nadriel ] Tout d'abord Bonjour a tous !! [^^happy13] Je vais essayer de faire simple tout en restant lisible ^^ Je cherche a programmer un formulaire en javas Envoyer un mail avec demande de rendez-vous et bouton refuser acepter [ par hudon77 ] Bonjour à tous. Je désire envoyer un e-mail avec un ICAL. J'aimerais que ceux qui recoivent mon mail puissent cliquer sur ACCEPTER ou REFUSER. J'ai e Envoyer un état imprimé par mail automatiquement [ par Aurinne ] Bonjour, J'ai une base de données sous access qui, via des Etats, imprime des certificats de conformité, il faudrait que ces certificats soient, en p


Nos sponsors


Sondage...

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode
 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 2,980 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales
Outils Convertisseur VB/C# Snippets et scripts Outils en ligne La ToolBox
Communauté Programmation Photographie Technologie Newsgroups Emploi Forum Blogs
Guide d'achat Téléphonie mobile Image et son Informatique Bureautique Jeux vidéo
Logiciels Internet & Réseau Développement Market Android Jeux & Loisirs Graphisme Multimédia Sécurité Pilotes
Loisirs Cartes virtuelles Vidéos droles Jeux en ligne Géoguide AndroLib (Android Market)