se puede ?

[roroland]

Hola a todos:

Quisiera saber si se puede enviar mails masivos con CDONTS cargando las direcciones desde una base de datos en access.

Por ejemplo que tenga 1000 mails en una tabla y que al enviar el mail con cdonts este cargue automaticamente esos destinatarios y envie ese mail a todas las direcciones.

Si se puede, me pueden explicar como ?:)

Gracias

[AlZuwaga]

Suponiendo que tenés un campo con el email llamado "email", recorrés el récordset y enviás un mail a cada uno. No tengo a mano un código de envío de correos con cdont, pero a manera de ejemplo servirá:


Set oMail = Server.CreateObject ("CDONTS.NewMail")
Sender = "[email protected]"
Titulo = "prueba"
Texto = "Es sólo una prueba"

Do while not RS.EOF

Recipient = RS("Email")
oMail.Send Sender, Recipient, Titulo, Texto

RS.MoveNext
Loop

Set oMail = Nothing