Ver Mensaje Individual
  #2 (permalink)  
Antiguo 15/11/2002, 18:09
Avatar de RootK
RootK
Moderador
 
Fecha de Ingreso: febrero-2002
Ubicación: México D.F
Mensajes: 8.004
Antigüedad: 23 años, 3 meses
Puntos: 50
Hola.. si quieres enviar el mail en formato html.. podrías hacer algo como esto:

previamente haces un formulario y la respuesta lo pasas a otra pagina para recoger los datos y procesarlos de la siguiente manera....

strHost="tu_stmp.com"
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = strHost
Mail.From = "[email protected]"
Mail.FromName = request.form("nombre")
Mail.AddReplyTo request.form("email")
Mail.AddAddress request.form("emailamigo")
titulo=Request.form("Nombre")&" te envía un mail"
Mail.Subject = titulo
Mail.IsHTML = True 'para que envíe en formato HTML

mensaje = "<html><body><font color=red size=4> Notificacion !! " & _
"<br><br><b>De:</b><font color=gray size=4> " & Request.Form("nombre") & "</font><br>" & _
"<br><center>" & comentarios & "<br><br></center>Gracias por usar nuestros servicios" & _
"</body></html>"

Mail.Body= mensaje

On Error Resume Next
Mail.Send
If Err <> 0 Then
Response.Write "Error : " & Err.Description
else
response.write "Mensaje enviado"
end if


Saludos y suerte...