10/02/2009, 12:42
|
 | | | Fecha de Ingreso: enero-2009
Mensajes: 27
Antigüedad: 16 años, 4 meses Puntos: 0 | |
| Respuesta: Problema al ENVIAR correo electrónico...
<%
cuerpo = cuerpo & "<HTML>"
cuerpo = cuerpo & "<meta http-equiv='Content-Type' content='text/html; charset=windows-1252'>"
cuerpo = cuerpo & "<BODY bgcolor='#FFFFFF'>"
cuerpo = cuerpo & "</BODY>"
cuerpo = cuerpo & "</HTML>"
Dim objetoMail
Set objetoMail = Server.CreateObject ( "CDONTS.NewMail" )
objetoMail.From = request.form("remitente")
objetoMail.To = request.form("destinatario")
objetoMail.Subject = request.form("asunto")
objetoMail.Body = cuerpo
objetoMail.Send
Set objetoMail = Nothing
%>
saludos...
espero que te sirva. |