Page 2 of 2

Re: hb_sendmail()

Posted: Sun May 06, 2012 12:18 am
by gvaronas
[SPA]
Hola:
¿Alguien logró hacer funcionar hb_sendmail con gmail?
Por favor, podrían poner algun ejemplo.

[SPA Google]
Has anyone managed to run hb_sendmail with gmail?
Please could you give some examples.

TIA

BestRegards
GVS

Re: hb_sendmail()

Posted: Sun May 06, 2012 9:17 pm
by danielmaximiliano
Hola: este topico se ah tratado en Harbourminigui_es puedes mirarlo aqui

http://es.groups.yahoo.com/group/harbou ... sage/26225

espero sea de tu ayuda. no tengo cuenta como para generar un ejemplo sobre Gmail.

Re: hb_sendmail()

Posted: Mon May 07, 2012 9:50 pm
by gvaronas
Hola Daniel, gracias por responder.
Vi el enlace y alli finalmente le dan una solución con esta clase:
oSock := TSmtp():New()
Mi interes es con la clase hb_sendmail(), ¿o es lo mismo?.
Lo que quiero es enviar un mail desde un programa consola.
He probado el ejemplo gmail.prg que viene con harbour en \harbour\contrib\hbtip\tests, compila bien, pero al ejecutar el EXE me arroja este error:

Code: Select all

┌───────────────────────────────────────────┐
│ Error BASE/1081  Operation not supported: │
│            TIPCLIENTSMTP:new()            │
│                                           │
│                   Quit                    │
└───────────────────────────────────────────┘
Ya tambien he creado las libs que se general a partir de openssl, pero no he tenido éxito.

Agradezco de antemano cualquier idea / tip.

Salu2,
GVS

danielmaximiliano wrote:Hola: este topico se ah tratado en Harbourminigui_es puedes mirarlo aqui

http://es.groups.yahoo.com/group/harbou ... sage/26225

espero sea de tu ayuda. no tengo cuenta como para generar un ejemplo sobre Gmail.

Re: hb_sendmail()

Posted: Tue May 08, 2012 2:55 am
by danielmaximiliano
Hola Gvaronas:
Prueba esto:
recuerda que Harbour esta dia a dia cambiando, actualiza tu Sources.
HBTIP.jpg
HBTIP.jpg (50.16 KiB) Viewed 5164 times
HBTIP LIB.jpg
HBTIP LIB.jpg (201.8 KiB) Viewed 5164 times
HMG LIB.jpg
HMG LIB.jpg (119.41 KiB) Viewed 5164 times
y prueba este codigo, recuerda que no tengo Gmail para probar las cuentas. si tienes alguna de prueba te lo agradeceria.

el codigo esta en otro post ya que solo puedo subir 3 archivos por post.

Re: hb_sendmail()

Posted: Tue May 08, 2012 2:56 am
by danielmaximiliano
Prueba con esto: no da error que mencionabas.
EjemploGmail.rar
(10.37 KiB) Downloaded 494 times
Hoy Harbour Nightly esta como HB32 en la nueva Instalacion

Recuerda tambien Activar POP en la configuracion de correos de tu cuenta Gmail.

Re: hb_sendmail()

Posted: Fri May 11, 2012 4:18 pm
by danielmaximiliano
Hola a Todos:
Despues de darme por vencido intentando hacer funcionar Sendmail con TLS (capa de transporte seguro), me puse a buscar otras opciones y me encontre con esta.

CDOSYS (Collaboration Data Objects) : http://en.wikipedia.org/wiki/Collaboration_Data_Objects

Funciona a la perfeccion.
Mailok.jpg
Mailok.jpg (149.68 KiB) Viewed 5109 times
en mi mail:
mailyahoo.jpg
mailyahoo.jpg (129.68 KiB) Viewed 5109 times
queda agregar cosas en el Source, si lo mejoran pueden publicar en el foro.

Re: hb_sendmail()

Posted: Sat May 12, 2012 3:54 am
by Rathinagiri
Thanks a lot Daniel.

Re: hb_sendmail()

Posted: Sat May 12, 2012 10:14 pm
by gvaronas
Gracias Daniel.
Funciona bien con gmail, con hotmail y yahoo no me esta funcionando, pero por ahora lo que necesito es gmail. Nuevamente, muchas gracias.

Salu2,
GVS

danielmaximiliano wrote:Hola a Todos:
Despues de darme por vencido intentando hacer funcionar Sendmail con TLS (capa de transporte seguro), me puse a buscar otras opciones y me encontre con esta.

CDOSYS (Collaboration Data Objects) : http://en.wikipedia.org/wiki/Collaboration_Data_Objects

Funciona a la perfeccion.
Mailok.jpg
en mi mail:
mailyahoo.jpg
queda agregar cosas en el Source, si lo mejoran pueden publicar en el foro.

Re: hb_sendmail()

Posted: Sun May 13, 2012 12:22 am
by danielmaximiliano
gvaronas wrote:Gracias Daniel.
Funciona bien con gmail, con hotmail y yahoo no me esta funcionando, pero por ahora lo que necesito es gmail. Nuevamente, muchas gracias.

Salu2,
GVS
Cambie parte del codigo por este

Code: Select all

aServers [3] := { 'Yahoo   Outgoing Mail Server ' , 'smtp.mail.yahoo.com' , '465' }