Hola, tengo un problema al enviar mail desde asp con CDO
En mi empresa tenemos un servidor con Windows 2003 y Servidor de correo Exchange 2003, el codigo que usabamos para enviar mail con ASP era:
Set oMail = Server.CreateObject("CDO.Message")
oMail.From = "[email protected]"
oMail.To = "[email protected]"
oMail.Cc = "[email protected]"
oMail.Subject = "Asunto"
oMail.TextBody = "Cuerpo del Mensaje"
oMail.Send
Set oMail = Nothing
y un dia dejo de funcionar, entonces usamos ASPEmail con el siguiente codigo
set mail = server.createObject("Persits.MailSender")
mail.host = "hostserver"
mail.from = "[email protected]"
mail.FromName = "NombreOrigen"
mail.addAddress "[email protected]"
mail.AddCC "[email protected]"
mail.Subject = "Asunto"
mail.body = "Cuerpo del mensaje"
mail.IsHTML = True
On Error Resume Next
mail.send
if Err ><0 then
Response.Write "Error encountered: " & Err.Description
else
response.write "La operacion se completo exitosamente"
end if
Funcionaba perfectamente y empezo a darme el error:
Error occurred: 530 5.7.0 Must issue a STARTTLS command first
Investigando en internet encontre que se arreglaria incluyendo la linea:
Mail.TLS = True
Pero me da error que no soporta ese metodo o propiedad
Object doesn't support this property or method: 'Mail.TLS'
Alguien sabra que esta pasando como puedo arreglar esto, utilizando CDO no me da mensaje de error pero al ver la bandeja de entrada de "destino" no hay correos
Ayuda por favor con cualquiera de los metodos de envio de mail
Agradecimientos de antemano
Luis