11/05/2004, 04:49
|
| | | Fecha de Ingreso: abril-2004
Mensajes: 36
Antigüedad: 21 años Puntos: 0 | |
| utilizando CDONTS no los envia, los deja almacenado en la carpeta queue. :(
Esto es lo que hago:
function Correo(From, FromName, Address, AddressName, Subject, Body)
Set mailobj = Server.CreateObject("CDONTS.NewMail")
mailobj.mailFormat = 0
mailobj.bodyFormat = 0
mailobj.from = From
mailobj.to = Address
mailobj.subject = Subject
mailobj.body = Body
mailobj.send
'aseguro que no se presenten errores en la página si se producen
On Error Resume Next
mail.send
If Err <> 0 Then
Correo = Err.Description
Else
Correo = ""
End If
End Function
Última edición por tishu; 11/05/2004 a las 04:52 |