Correo electrónico entrante a través de SSL / incoming Email

HMG Samples and Enhancements

Moderator: Rathinagiri

paimar
Posts: 64
Joined: Wed May 23, 2012 8:52 pm

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

Post by paimar » Mon Feb 04, 2013 8:11 pm

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
Gipuzkoa - ESPAÑA

paimar
Posts: 64
Joined: Wed May 23, 2012 8:52 pm

Post by paimar » Tue Feb 05, 2013 7:49 pm

Hola.

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

un saludo
Gipuzkoa - ESPAÑA

User avatar
danielmaximiliano
Posts: 2153
Joined: Fri Apr 09, 2010 4:53 pm
Location: Argentina
Has thanked: 162 times
Been thanked: 26 times
Contact:

Post by danielmaximiliano » Tue Feb 05, 2013 10:16 pm

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")
*´¨)
¸.·´¸.·*´¨) ¸.·*¨)
(¸.·´. (¸.·` *
.·`.HMG : It's magic !
(¸.·``··*

Saludos / Regards
DaNiElMaXiMiLiAnO

Whatsapp. : +54901169026142
Telegram Name : DaNiElMaXiMiLiAnO

paimar
Posts: 64
Joined: Wed May 23, 2012 8:52 pm

Post by paimar » Wed Feb 06, 2013 8:48 pm

Muchas gracias Daniel y Fox si que habría sin problemas las de minigui no?
Gipuzkoa - ESPAÑA

User avatar
danielmaximiliano
Posts: 2153
Joined: Fri Apr 09, 2010 4:53 pm
Location: Argentina
Has thanked: 162 times
Been thanked: 26 times
Contact:

Post by danielmaximiliano » Wed Feb 06, 2013 9:52 pm

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.
Last edited by danielmaximiliano on Sat Feb 09, 2013 2:21 am, edited 1 time in total.
*´¨)
¸.·´¸.·*´¨) ¸.·*¨)
(¸.·´. (¸.·` *
.·`.HMG : It's magic !
(¸.·``··*

Saludos / Regards
DaNiElMaXiMiLiAnO

Whatsapp. : +54901169026142
Telegram Name : DaNiElMaXiMiLiAnO

paimar
Posts: 64
Joined: Wed May 23, 2012 8:52 pm

Post by paimar » Thu Feb 07, 2013 9:10 pm

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.
Gipuzkoa - ESPAÑA

User avatar
danielmaximiliano
Posts: 2153
Joined: Fri Apr 09, 2010 4:53 pm
Location: Argentina
Has thanked: 162 times
Been thanked: 26 times
Contact:

Post by danielmaximiliano » Wed Jan 08, 2014 11:05 pm

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 206 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 3068 times
InOutEmail.rar
(986 KiB) Downloaded 285 times
*´¨)
¸.·´¸.·*´¨) ¸.·*¨)
(¸.·´. (¸.·` *
.·`.HMG : It's magic !
(¸.·``··*

Saludos / Regards
DaNiElMaXiMiLiAnO

Whatsapp. : +54901169026142
Telegram Name : DaNiElMaXiMiLiAnO

User avatar
danielmaximiliano
Posts: 2153
Joined: Fri Apr 09, 2010 4:53 pm
Location: Argentina
Has thanked: 162 times
Been thanked: 26 times
Contact:

Post by danielmaximiliano » Wed Jan 08, 2014 11:37 pm

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 183 times
Last edited by danielmaximiliano on Thu Jan 09, 2014 10:50 am, edited 1 time in total.
*´¨)
¸.·´¸.·*´¨) ¸.·*¨)
(¸.·´. (¸.·` *
.·`.HMG : It's magic !
(¸.·``··*

Saludos / Regards
DaNiElMaXiMiLiAnO

Whatsapp. : +54901169026142
Telegram Name : DaNiElMaXiMiLiAnO

Javier Tovar
Posts: 1275
Joined: Tue Sep 03, 2013 4:22 am
Location: Tecámac, México
Has thanked: 1 time
Been thanked: 2 times

Post by Javier Tovar » Thu Jan 09, 2014 12:13 am

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 3058 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 3058 times
A to be and how I can fix it?
regards

User avatar
danielmaximiliano
Posts: 2153
Joined: Fri Apr 09, 2010 4:53 pm
Location: Argentina
Has thanked: 162 times
Been thanked: 26 times
Contact:

Post by danielmaximiliano » Thu Jan 09, 2014 12:39 am

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.
*´¨)
¸.·´¸.·*´¨) ¸.·*¨)
(¸.·´. (¸.·` *
.·`.HMG : It's magic !
(¸.·``··*

Saludos / Regards
DaNiElMaXiMiLiAnO

Whatsapp. : +54901169026142
Telegram Name : DaNiElMaXiMiLiAnO

Post Reply