Tengo el siguiente problema, tengo un programita que desarrollé y debe enviar correos de alerta, pero sucede lo siguiente: el sistema envía correos pero sólo a las direcciones internas es decir a los correos de la compañía donde trabaja, pero quiero que también envíe correos a direcciones Hotmail, Yahoo y gmail, pero no lo está asiendo se queda en la carpeta Queue y no sé porqué.

Dim cd As CDO.Message
Set cd = CreateObject("CDO.Message")
cd.From = "helpdesk.notificacion@gmail.com"
cd.To = "xxxxx@gmail.com"
cd.Subject = "Prueba"
cd.TextBody = "Esto es un prueba"
cd.Send
Set cd = Nothing

Responder