Ayuda con envio de correo con CDO

[Hugo Juarez]

Hola, espero me puedan apoyar o bien orientar para resolver mi problema.
Resulta estoy agregando una seccion para envio de correo electronico desde mi aplicacion
Ya tengo el codigo y funciona correctamente, creo que muchos lo utilizan

loCfg = CREATEOBJECT("CDO.Configuration")

WITH loCfg.Fields

  .Item("http://schemas.microsoft.com/cdo/configuration/smtpserver")     = "mail.miempresa.com" 

  .Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 465   &&25  &&

  .Item("http://schemas.microsoft.com/cdo/configuration/sendusing")      = 2

  .Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = .T.

  .Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl")     = .T.    

  .Item("http://schemas.microsoft.com/cdo/configuration/sendusername")   = "il...@miempresa.com"  

  .Item("http://schemas.microsoft.com/cdo/configuration/sendpassword")   = "mipasword"

  .Update

ENDWITH
....

El codigo me funciona bien, ya lo probe y envia el correo, incluso con archivo adjunto, hasta aqui todo bien (windows 10).
El problema viene cuando use el programa en una maquina con Windows server 2003 enterprise edition con sp1
me arroja esto:
Error Message 'OLE IDispatch exception code 0 from CDO.Message.1: Error de transporte en la conexión al servidor.

Probe configurando outlook express en la computadora, crei que algo tenia que ver, pero en outlook si se envia todo bien.
El correo se deberia enviar a una cuenta de gmail.

He visto este mensaje de error en otras publicaciones, pero no encuentro respuesta especifica para Windows Server 2003
¿Que podría ser?
Habra algo que este bloqueando?
O necesito algo extra que no se incluye en WS 2003?

Espero me puedan ayudaro bien orientar

[Luis Maria Guayan]

Windows Server 2003 no trae instalado por defecto CDO.

-- Installing CDONTS in Windows Server 2003 Server --
https://sakafi.wordpress.com/2008/05/22/installing-cdonts-in-windows-server-2003-server

-- Windows Server 2003 no instala CDONTS --
https://support.microsoft.com/es-us/help/315197/windows-server-2003-does-not-install-cdonts

Luis María Guayán
Tucumán, Argentina
_______________________________
Comunidad Visual FoxPro en Español
http://comunidadvfp.blogspot.com

El 13/03/17 a las 00:30, Hugo Juarez escribió:

[Hugo Juarez]

realice los pasos marcados peros sigue sin dar resultado.