FiveTech Software tech support forums

Rick:

Thank you.

Regards

Hola de nuevo..

Adhemar, funciono perfecto, muchisimas gracias por la ayuda.
Postinelli, tambien funciono a la primera.. agradecido por tu atencion.

Resuelto el problema que tenia.

Victor, gracias tambien por tu colaboracion y soporte.

Gracias al foro FW !!

Hola amigos,,,

Gracias Adhemar,
Gracias Postinelli,
Gracias Joao

Voy a probar estas sugerencias que me dan y les estare avisando por acá

seguimos en contacto

asi hago yo, y salen automaticamente los emails //-----------------------------------------------------------------------------------------------Function GMAILBK (cDestino,cAsunto,cTexto,cAdjunto )Local oEmailCfg,oEmailMsg,oError,cHtmlLocal cServer:= GetPvProfString("Enviador"...

asi hago yo, y salen automaticamente los emails //-----------------------------------------------------------------------------------------------Function GMAILBK (cDestino,cAsunto,cTexto,cAdjunto )Local oEmailCfg,oEmailMsg,oError,cHtmlLocal cServer:= GetPvProfString("Enviador",...

José Intenta de ésta forma Function EnviaCorreo(Cuerpo,Asunto,Adj) local oMsg := CreateObject( "CDO.Message" ) local oConf := CreateObject( "CDO.Configuration" ) local cSchema := "http://schemas.microsoft.com/cdo/configuration/"&nb...

Cuál es el problema exacto que tienes?

Enviado desde mi moto g(7) plus mediante Tapatalk

Todavia sigo sin poder resolver el envio de email...

Alguna mano amiga ??

Rick:

Thanks a lot.

Regards

Armondo Use try\catch Try   oOutLook: = TOleAuto ( ) : New ( "Outlook.Application" )Catch    Saying: = "For some Odd reason The Outlook e-mail CLient failed to Initialize"    Msginfo ( Saying )    Return ( .f. )End Try  Rick Lipkin Good ! Thanks a...

Armondo Use try\catch Try   oOutLook: = TOleAuto ( ) : New ( "Outlook.Application" )Catch    Saying: = "For some Odd reason The Outlook e-mail CLient failed to Initialize"    Msginfo ( Saying )    Return ( .f. &#...

Rick: Thanks for your code. I have a couple of questions for you. First question, how can I know that the mailing failed? Second question, your code works well, when sending the mail shows me Outlook screen for a few seconds, is there a way to avoid it? Best regards Armando, el código que le mostré...

Jose If your client desktops are using MS OUtlook .. this code works well ... Try   oOutLook  := TOleAuto():New("Outlook.Application")Catch    Saying := "For some Odd reason The Outlook e-mail CLient failed to Initialize"    Msginfo( Saying )    Return...

Rick:

Thanks for your code.

I have a couple of questions for you.

First question, how can I know that the mailing failed?

Second question, your code works well, when sending the
mail shows me Outlook screen for a few seconds, is there a way to avoid it?

Best regards

Jose If your client desktops are using MS OUtlook .. this code works well ... Try   oOutLook  := TOleAuto():New("Outlook.Application")Catch    Saying := "For some Odd reason The Outlook e-mail CLient failed to Initialize"    Msginfo( Saying )    Return(...