Ver Mensaje Individual
  #14 (permalink)  
Antiguo 03/06/2006, 08:51
La_LeY
 
Fecha de Ingreso: junio-2006
Mensajes: 147
Antigüedad: 18 años, 11 meses
Puntos: 1
OK he aqui la solucion para mandar e-mail a cualquier direccion electronica, primero si tienen ASPEmail esta solo dura 30 dias con todas su funciones despues de hay tienen que comprarlo.

Ok bien cuando mandas un email con ASPEmail es mas o menos asi:

Cita:
set mail = server.createObject("Persits.MailSender")
'configuro el mensaje
'señalo el servidor de salida para enviar el correo
mail.host = "smtp.dominio.com"
'indico la dirección de correo del remitente
mail.from = "[email protected]"
mail.fromName = "Tu Nombre a presentar"
'indico la dirección del destinatario del mensaje
mail.addAddress "[email protected]"
Mail.Subject = "Ves"
Mail.IsHTML = True 'se activa si el email es HTML
Mail.Body = "<HTML><BODY>YO SE MANDAR EMAIL</BODY></HTML>"
'lo envio
'aseguro que no se presenten errores en la página si se producen
On Error Resume Next
mail.send
if Err ><0 then
Response.Write "No fue ENVIADO"
response.end
else
response.Write "FUE ENVIADO"
response.end
end if
Ok hasta hay muy bien, pero si tu servidor de correo SMTP requiere autentificacion de SSL o algo parecido no recuerdo bien.

Solo tienes que agregar antes de mail.send

Mail.Username = "TU USERNAME"
Mail.Password = "**********"

Lo unico malo de ASPEmail es que solo dura 30 dias, despues de hay para usar el autentificador SSL de el envio SMTP hay que comprarlo.

Espero esto les sirva de algo.

Ahora voy a buscar la forma de utilizar CDONTS y despues le digo las ventajas.

A y si alguien conoce otra forma me lo hacen saber.
__________________
________________________________
Moisés Bretón
[email protected]