Hola!
Estoy haciendo el proyecto y una des sus partes es una tienda online en la que necesito mandar automáticamente boletines informativos a las direcciones de correo de los clientes registrados. Al principio tenía el problema de usar windows xp professional que viene sin la librería cdonts.dll, pero ya la conseguí y la registré....ahora no me da ningún error de compilación ni de nada, pero los correos nunca llegan....os pongo el trozo de código a ver si veis cual es el error:
El asunto y el cuerpo se recogen de un formulario rellenado por el usuario, y el destinatario se recoge de un recordset que contiene el resultado de la consulta de personas a las que enviar el mail (estas dos cosas, están bien recogidas...):
sAsunto=request.form("asunto")
sCuerpo = request.form("cuerpo")
sDestinatario=RS("email")
'Creamos el email
set oMail=Server.CreateObject("CDONTS.NewMail")
oMail.From="
[email protected]"
oMail.To=sDestinatario
oMail.Subject = sAsunto
oMail.Body = sCuerpo
' Enviamos el email
oMail.Send()
Muchas gracias!!