FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Nueva versi贸n de HDO
Posts: 817
Joined: Sun Jun 15, 2008 07:47 PM
Nueva versi贸n de HDO
Posted: Mon Nov 08, 2021 05:12 PM
Ya esta la versi贸n de HDO para MySQL/MariaDb est谩ndar y nativo, SQLite/SQLCipher, ODBC y SQLServer est谩ndar y nativo
Para plataformas de 32 y 64 bits (Windows incluyendo el 11, Linux varios sabores, iOS)
Adem谩s con pruebas en el Mod_Harbour.
Los compiladores de C usados son
Ms VisualC, MinGW, Bcc y CLan (todos ellos de 32 y 64 bits)
Para Linux solo disponible GCC y CLang de 64 bits
Y para iOS solo MinGW 64 bits

Especialmente para el Mod_Harbour hay creados varios metodos de recuperaci贸n de datos, mirad este ejemplo:

Code (fw): Select all Collapse
//------------------------------------------------------------------------------
#include "hdo.ch"
//------------------------------------------------------------------------------
// Aqui esta definida el RDL y los parametro de conexion del ejemplo:
#include "ejforall.ch"
//------------------------------------------------------------------------------

procedure main

聽 聽 local oCon, oRS, oDS, oStmt
聽 聽 local cQry := "SELECT * FROM test WHERE first like 'Homer%'"

聽 聽 oCon := THDO():new( _DBMS )
聽 聽 
聽 聽 // A nivel de base de datos
聽 聽 oCon:setAttribute( HDO_ATTR_STR_TRIM, .t. ) // Quita espacios

聽 聽 oCon:connect( _DB, _CONN )

聽 聽 oDS := TMemList():new( oCon:queryDirect( cQry, FETCH_ARRAY ) )
聽 聽 simpleBrowse( oDS, "Usando: MemList queryDirect" )
聽 聽 oDS:free()

聽 聽 oDS := THashList():new( oCon:queryDirect( cQry, FETCH_HASH ) )
聽 聽 simpleBrowse( oDS, "Usando: HashList queryDirect" )
聽 聽 oDS:free()

聽 聽 oDS := TMemList():new( oCon:execQuery( cQry, FETCH_ARRAY ) )
聽 聽 simpleBrowse( oDS, "Usando: MemList execQuery" )
聽 聽 oDS:free()

聽 聽 oDS := THashList():new( oCon:execQuery( cQry, FETCH_HASH ) )
聽 聽 simpleBrowse( oDS, "Usando: HashList execQuery" )
聽 聽 oDS:free()

聽 聽 oStmt := oCon:query( cQry )

聽 聽 oDS := TMemList():new( oStmt:fetchAllArray() )
聽 聽 simpleBrowse( oDS, "Usando: MemList", oStmt:listColNames() )
聽 聽 oDS:free()

聽 聽 oDS := THashList():new( oStmt:fetchAllHash() )
聽 聽 simpleBrowse( oDS, "Usando: HashList" )
聽 聽 oDS:free()

聽 聽 oStmt:free()

聽 聽 oRS := oCon:rowSet( cQry )
聽 聽 oRS:setAttribute( STMT_ATTR_STR_PAD, .t. ) // Rellena espacios
聽 聽 oRS:load()
聽 聽 simpleBrowse( oRS, "Usando: RowSet" )
聽 聽 oRS:free()

聽 聽 oCon:free()

return

//------------------------------------------------------------------------------


Salu2
______________________________________________________________________________

Sevilla - Andaluc铆a
Posts: 1364
Joined: Wed Jun 21, 2006 12:39 AM
Re: Nueva versi贸n de HDO
Posted: Tue Nov 09, 2021 01:43 PM

Hola Manuel, puedo conectarme a Mysql mediante ssh?

Saludos

Posts: 817
Joined: Sun Jun 15, 2008 07:47 PM
Re: Nueva versi贸n de HDO
Posted: Sat Nov 13, 2021 10:16 PM

Si puede Harbour y MySQL... HDO tambi茅n.

______________________________________________________________________________

Sevilla - Andaluc铆a
Posts: 990
Joined: Wed Oct 19, 2005 02:17 PM
Re: Nueva versi贸n de HDO
Posted: Sun Nov 14, 2021 12:03 PM
horacio wrote:Hola Manuel, puedo conectarme a Mysql mediante ssh?

Saludos


Hola Horacio,

quiz谩s los siguientes enlaces te sirvan:

https://dev.mysql.com/doc/refman/8.0/en/windows-and-ssh.html

https://juncotic.com/mysql-tunelizando-la-conexion-medio-ssh/

https://linuxize.com/post/mysql-ssh-tunnel/

Aqu铆 usando drivers ODBC con posibilidad de t煤neles ssh:

https://www.devart.com/odbc/mysql/docs/ssh.htm

https://www.cdata.com/kb/articles/mysql-ssh-tunnel.rst

Muchas gracias.

Saludos,
Posts: 990
Joined: Wed Oct 19, 2005 02:17 PM
Re: Nueva versi贸n de HDO
Posted: Sun Nov 14, 2021 12:43 PM
Hola Horacio,

tambi茅n podr铆as instalar stunnel d贸nde tengas tu programa de acceso a MySQL, configuras stunnel para que se conecte a MySQL y est茅 montar谩 un t煤nel con el servidor MySQL.

S贸lo tendr谩s que acceder a MySQl desde la direcci贸n de localhost (127.0.0.1) y el puerto que hayas asignado a la conexi贸n con MySQL.

Ejemplo de stunnel.conf

Code (fw): Select all Collapse
# Use it for client mode
client = yes

# Service-level configuration

[mysql]
accept  = 3306 # Podr铆as configurar otro puerto de escucha en el Servidor 
connect = IP remota de tu servidor MySQL:3307 # 3307 es el puerto que le hemos asignado a stunnel para conectar con MySQL


Es lo 煤nico que tendr谩s que cambiar en tu c贸digo para poder acceder a las BB.DD. MySQL.

Muchas gracias.

Saludos,
Posts: 74
Joined: Sun Aug 27, 2017 07:18 PM
Re: Nueva versi贸n de HDO
Posted: Tue Mar 01, 2022 11:38 AM

隆Buenos d铆as Manuel! Me gustar铆a saber c贸mo usar hdo para la conexi贸n incrustada.

Continue the discussion