Juju
-
17 sept. 2001 à 15:39
cs_YsF
Messages postés8Date d'inscriptionvendredi 31 décembre 2004StatutMembreDernière intervention16 août 2005
-
16 août 2005 à 21:54
je cherche une fonction sans composant (car je n'ai pas accès au serveur) à qui me permet d'envoyer un e-mail???
Voici une solution potentielle ... ce script est dans les 20 + populaires ;-) fonctionne sur certains serveur ...
Permet d'envoyer le contenu d'un formulaire "type" par Email sans posseder de composant particulier sur le serveur mais en utilisant "objCDOMail"
<%
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="">
VOTRE ADRESSE EMAIL
Voici une solution potentielle ... ce script est dans les 20 + populaires ;-) fonctionne sur certains serveur ...
Permet d'envoyer le contenu d'un formulaire "type" par Email sans posseder de composant particulier sur le serveur mais en utilisant "objCDOMail"
<%
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="">
VOTRE ADRESSE EMAIL