Ver Mensaje Individual
  #2 (permalink)  
Antiguo 18/05/2004, 09:29
orharo2003
 
Fecha de Ingreso: abril-2004
Ubicación: México D.F.
Mensajes: 1.724
Antigüedad: 21 años
Puntos: 4
<%
'Recogemos los datos del formulario
para = "alguien@sitio"
de = "tucuenta@proveedorquetesoporteenviosmtp"

mensaje = "HOLA"
asunto ="pruebas"

Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "smtp.tuisp"
Mail.From = de
Mail.AddAddress para

Mail.Subject = asunto
'El mensaje en formato html
Mail.IsHTML = True
Mail.Body = "<HTML><BODY><p><font face=verdana size=2>De: Orlando Rios<br>Mensaje: "&mensaje&"<br><br></p><br>Enviado el "& Now() &"</font></BODY></HTML>"

On Error Resume Next
Mail.Send
If Err <> 0 Then
Response.Write "Ha ocurrido el siguiente error: " &Err.Description
End If
%>

No recuerdo la página, de donde bajarlo pero en cualquier buscador pon:

descargar Persits.MailSender

Nunca ni nadie pudo decirm como configurar el servidor de smtp del IIS, pasaba lo mismo que atí.

Con el otro, mil respetos por que si funciona bien...