FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour HDO v1.00. Ejemplos con la RDL para SQLite (RDLSQLITE)
Posts: 817
Joined: Sun Jun 15, 2008 07:47 PM
HDO v1.00. Ejemplos con la RDL para SQLite (RDLSQLITE)
Posted: Tue Jun 06, 2017 02:57 PM
Todos los que querais probarlos podeis mirar en: https://es.groups.yahoo.com/neo/groups/HDO_Harbour/info

sobre todo mirar el ej17.prg que explica como hacer un manteniento de una tabla con TRowSet

PD: No dudéis en hacer la preguntas que queráis en el foro de HDO en yahoo :-)
______________________________________________________________________________

Sevilla - Andalucía
Posts: 189
Joined: Wed Apr 05, 2006 09:48 PM
Re: HDO v1.00. Ejemplos con la RDL para SQLite (RDLSQLITE)
Posted: Fri Jul 28, 2017 10:46 AM

Manu, para cuando Hdo para mysql ?

Saludos
Gabriel
Granada

Posts: 817
Joined: Sun Jun 15, 2008 07:47 PM
Re: HDO v1.00. Ejemplos con la RDL para SQLite (RDLSQLITE)
Posted: Fri Jul 28, 2017 06:42 PM

Gabri...
Espero que esté en escena muy pronto!!! :D

______________________________________________________________________________

Sevilla - Andalucía
Posts: 817
Joined: Sun Jun 15, 2008 07:47 PM
Re: HDO v1.00. Ejemplos con la RDL para SQLite (RDLSQLITE)
Posted: Fri Aug 04, 2017 08:09 PM
Gabri, ya está en un 99%.

Pero antes hay que checar.
Espero tenerla la semana que viene.
:-)

Será totalmente compatible con HDO para SQLite.
Eso quiere decir que el mismo programa funcionará para las dos bases de datos. Sólo cambiará la elección del RDL y la conexión, yo hago esto en mis pruebas:

Code (fw): Select all Collapse
//------------------------------------------------------------------------------

#define SQLITE
#define MYSQL

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

#include "hdo.ch"
#include "inkey.ch"

#ifdef SQLITE
    REQUEST RDLSQLITE
    #define _DBMS   "sqlite"
    #define _DB     "hdodemo.db"
    #define _CONN
#else
    #ifdef MYSQL
        REQUEST RDLMYSQL
        #define _DBMS   "mysql"
        #define _DB     "hdodemo"
        #define _CONN   "127.0.0.1", "root", "root"
    #endif
#endif

//------------------------------------------------------------------------------
// Definiciones

#define STMT_SEL "SELECT * FROM test;"

//------------------------------------------------------------------------------
// Procedimiento principal

procedure main()

    local n  // Varios usos
    local oDb, oSelect, oRS, oBrw
    
    cls
     oDb := THDO():new( _DBMS )  //<----------------------------------------------------------------
    if oDb:connect( _DB, _CONN )   //<----------------------------------------------------------------

    // A partir de aqui todo igual....


Ya pondré los ejemplos la semana que viene :-)
______________________________________________________________________________

Sevilla - Andalucía

Continue the discussion