
08/11/2003, 10:30
|
 | | | Fecha de Ingreso: octubre-2003 Ubicación: Cordoba, Argentina
Mensajes: 945
Antigüedad: 21 años, 6 meses Puntos: 24 | |
Lucho, aca esta!
-Este es Objeto Cdonts para enviar e-mails!!
<%
'Delcaramos las variables para los datos del formulario----------------------------------
Dim strMailFrom, strMailTo, strMailSubject, strMailBody
strMailFrom = Request.form("campo del e-mail remitente")
strMailTo = Request.form("campo del e-mail a donde se envia")
strMailSubject = Request.form("campo del asunto del mensaje")
strMailBody = Request.form("campo del cuerpo del mensaje")
Set MyMail = Server.CreateObject("CDONTS.NewMail")
MyMail.From = strMailFrom
MyMail.To = strMailTo
MyMail.Subject = strMailSubject
MyMail.Body = strMailBody
MyMail.Send
Set MyMail = Nothing
%>
El códogo no esta probado pero tendira que funcionar sin broblemas.
Suerte. |