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: Select all Expand view
//------------------------------------------------------------------------------
#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