
18/05/2004, 09:29
|
| | 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... |