Page 4 of 6

Re: Correo electrónico entrante a través de SSL / incoming E

Posted: Mon Feb 04, 2013 8:11 pm
by paimar
Hola.

Vuelvo a contestar... Pues eso es una pena que no se termine de solucionar las peguillas que faltan. Necesitaba esto para enviar por email unos avisos caducidades de fechas y que con un reply se enviara la nueva fecha para que el programa la registrara en el dbf. Luego lo podria usar para otras altas/bajas/modificaciones.

Voy a ver si puede hacer el exe que lea en correo el visual fox y que graba el correo en la tabla para que luego lo lea desde minigui.

Ya os contare..

un saludo

Re: Correo electrónico entrante a través de SSL / incoming E

Posted: Tue Feb 05, 2013 7:49 pm
by paimar
Hola.

Los dbfs de visual fox no se podian leer diractamente desde minigui no?

un saludo

Re: Correo electrónico entrante a través de SSL / incoming E

Posted: Tue Feb 05, 2013 10:16 pm
by danielmaximiliano
paimar wrote:Hola.

Los dbfs de visual fox no se podian leer diractamente desde minigui no?

un saludo
yo abro las tablas con esto

Code: Select all

 REQUEST DBFCDX, DBFFPT
   RDDSETDEFAULT ("DBFCDX")

Re: Correo electrónico entrante a través de SSL / incoming E

Posted: Wed Feb 06, 2013 8:48 pm
by paimar
Muchas gracias Daniel y Fox si que habría sin problemas las de minigui no?

Re: Correo electrónico entrante a través de SSL / incoming E

Posted: Wed Feb 06, 2013 9:52 pm
by danielmaximiliano
paimar wrote:Muchas gracias Daniel y Fox si que habría sin problemas las de minigui no?
Estoy estancado en descomponer mediante el methodo :Retieve( nId , nLen ) el mensaje desde el servidor de Gmail y otros servidores, puedo recuperar todos los Email mediante
:RetieveAll() pero da un error cuando hay muchos mensajes en el servidor.

hice la consulta en Google Harbour user.
espero resolverlo en estos dias.
te dejo como esta ahora el codigo de Incomming E-mail.



otra cosa es que falla aqui, nose que pasa que no pasa el contenido de

Code: Select all

Procedure ServerConnect( )
/*****************************************************************************/ 
Local cMailAccount := ''
Local cPassword    := ''
 
 cMailAccount := GetProperty( 'Incomming' , 'cUser' , 'value' )
 cPassword	  := GetProperty( 'Incomming' , 'cPass' , 'value' )
agrega las siguiente lineas

Code: Select all


cMailAccount := 'danielmaximilianoherrera'
 cPassword    := '0123456'
no hace falta '@gmail.com' al usuario.

Trasnlate Google
I'm stuck in breaking through the methodo: Retieve (NID nLen) the message from the Gmail server and other servers, I can retrieve all e-mail with
: RetieveAll () but it gives an error when there are many messages on the server.

Google made ​​the Harbour user query.
I hope to solve these days.
I leave you now as this code Incomming E-mail.



otherwise it fails here, nose happens that bypasses content

Code: Select all

Procedure ServerConnect( )
/*****************************************************************************/ 
Local cMailAccount := ''
Local cPassword    := ''
 
 cMailAccount := GetProperty( 'Incomming' , 'cUser' , 'value' )
 cPassword	  := GetProperty( 'Incomming' , 'cPass' , 'value' )
add the following lines

Code: Select all


cMailAccount := 'danielmaximilianoherrera'
 cPassword    := '0123456'
Needless '@ gmail.com' user.

Re: Correo electrónico entrante a través de SSL / incoming E

Posted: Thu Feb 07, 2013 9:10 pm
by paimar
Buenas

Muchas gracias Daniel, si es así que lo vas a intentar ya espero porque lo del ejecutable externo preferiría evitarlo.

Estaré pendiente del hilo.

Gracias.



Google......and I




hello

Thank you very much Daniel, if you're going to try to fix it I will wait because I'd rather avoid the external executable.

I'll watch the thread.

Thank you.

Re: Correo electrónico entrante a través de SSL / incoming E

Posted: Wed Jan 08, 2014 11:05 pm
by danielmaximiliano
Hola a todos :
El amigo mjaviergutierrez pidio utilizar HBSendmail() con HMG, sucede que hace tiempo hubo cambios minimos en la libreria HBTIP.
se requiere para compilar tener instalado OpenSSL y hay 2 versiones para instalar 32 y 64 bits.

http://slproweb.com/download/Win32OpenS ... 1_0_1f.exe
http://slproweb.com/download/Win64OpenS ... 1_0_1f.exe

esto copiara a su sistema los componentes SSLeay32.dll y Libeay32.dll con estos 2 componentes instalados podemos correr nuestra aplicacion que hace uso de la libreria HBTIP.

puede suceder que no funcione correctamente ya que falta incluir como en anteriores versiones de HMG las librerias en HMG.HBC

Code: Select all

# ***** include this lines *****

libs=hbssl
libs=libeay32
libs=ssleay32

# ***** include this lines *****
Extraer en C:\hmg.3.2\LIB las libs faltantes.
LIB.rar
(151.85 KiB) Downloaded 396 times
ahora ya funciona en HMG las funciones HBSendmail() y las funciones internas de HBTIP
adjunto la nueva aplicacion con algunos defectos a corregir de Incomming / Outgoing eMail que hice hace tiempo atras.
Incomming.png
Incomming.png (121.54 KiB) Viewed 6097 times
InOutEmail.rar
(986 KiB) Downloaded 486 times

Re: Correo electrónico entrante a través de SSL / incoming E

Posted: Wed Jan 08, 2014 11:37 pm
by danielmaximiliano
Hola a todos:
para que funcione la libreria HBTIP y la funcion HBSendmail() es necesario tener instalado en el sistema OpenSSL que se puede descargar desde http://slproweb.com/products/Win32OpenSSL.html
sus 2 versiones tanto para 32 y 64 bits en modo Liviano y de desarollo esto instalara en su carpeta de sistema

c:\Windows\System32
c:\Windows\SysWow64

los componentes Libeay32.dll y SSLeay32.dll que son usados para utilizar dicha libreria
debemos incluir las libs faltantes en la carpeta c:\hmg.3.2\lib e incluir en HMG.HBC las lineas
con esto debe funcionar HBTIP.

Code: Select all

# ***** include this lines *****

libs=hbssl
libs=libeay32
libs=ssleay32

# ***** include this lines *****
Translate Google

Hello everyone:
to operate the library HBTIP and HBSendmail() function you need to have OpenSSL installed on the system that can be downloaded from http://slproweb.com/products/Win32OpenSSL.html
its 2 versions for both 32 and 64 bit mode Lightweight and development.
install it in your system folder

c:\Windows\System32
c:\Windows\SysWow64


the components ssleay32.dll and Libeay32.dll that are used to use that library
we include the missing libs in c:\hmg.3.2\lib and include lines HMG.HBC
this should work with HBTIP.

Code: Select all

# ***** include this lines *****

libs=hbssl
libs=libeay32
libs=ssleay32

# ***** include this lines *****
LIB.rar
missing libs
Unzip in C:\HMG.3.2\LIB
(151.85 KiB) Downloaded 340 times

Re: Correo electrónico entrante a través de SSL / incoming E

Posted: Thu Jan 09, 2014 12:13 am
by Javier Tovar
Hola danielmaximiliano,

Ya realice todo lo indicado y si logro compilar el programa, pero a la hora de conectarme a GMail, Yahoo o Hotmail me sale este error:
ErrorEmail.jpg
ErrorEmail.jpg (148.39 KiB) Viewed 6087 times
A que se debe y como puedo solucionarlo?

Saludos

/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////

Hello danielmaximiliano,

You do all the above and if I compile the program, but when I logged into GMail, Yahoo or Hotmail I get this error:
ErrorEmail.jpg
ErrorEmail.jpg (148.39 KiB) Viewed 6087 times
A to be and how I can fix it?
regards

Re: Correo electrónico entrante a través de SSL / incoming E

Posted: Thu Jan 09, 2014 12:39 am
by danielmaximiliano
Hola Javier :
revisa el codigo en C:\Temp\InOutEmail\Source\incomming.prg, posiblemente tengas que cambiar

Code: Select all

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

Code: Select all

  aServers [3] := { 'Yahoo   Incomming Mail Server ' , 'pop.mail.yahoo.com' , '465' , 'yahoo.com' , 'smtp.mail.yahoo.com.mx' , '465' }
 
ya que utilizas Yahoo no necesitas utilizar @yahoo.com.mx en tu cadena de Usuario.