TDolphin Clase para manejar MySql

[RAMESHBABU]

Hello Mr.Daniel,

I was trying to Test the Examples of TDolphin. I could compile almost all the
examples which are all based on connect.ini (Remote Server)

But I could not compile the MySql Embeded example : TESTEMB1.PRG + BRW.PRG.

I am using XHB 1.1.0 (Simpex) + BCC55 + FWH 8.09

added to samples folder the files necessaries to run embedded server
the new script to build embedded samples are all finished with "_e", ie.
bldhm_e.bat, build the embedded server sample with microsoft compiler
(for now all are in console mode)

I tried to locate "bldhm_e.bat" in the SVN. But could not find such file.
Can you please give the .BAT file and their dependencies to compile and
test TESTEMB1.PRG, using XHB 1.1.0 (Simpex) + BCC55 + FWH 8.09.

My mail id is : aksharasoft at live dot com

Regards,

- Ramesh Babu P

[Daniel Garcia-Gil]

Hello Ramesh

please verify this post in blog (recently posted)

is a new way to build lib and samples

http://tdolphin.blogspot.com/2010/11/co ... d-lib.html

download recent changes from svn

Thanks

[CARLOALBATUN]

Hola Daniel una consulta podemos conectarnos con las bases de los dominios gratuitos ?

[Daniel Garcia-Gil]

Hola

Si se puede acceder

[Leo]

He compilado correctamente el ejemplo que postearon y tengo la siguiente duda, por qué me arroja este error de ejecución?

Code: Select all

Application
===========
   Path and name: C:\FWH\Work\consulta2.exe (32 bits)
   Size: 1,961,472 bytes
   Time from start: 0 hours 0 mins 0 secs 
   Error occurred at: 16/01/2013, 13:51:23
   Error description: Error MYSQL/1289  The 'InnoDB' feature is disabled; you need MySQL built with 'InnoDB' to have it working 
   Args:

Stack Calls
===========
   Called from: .\source\prg\tdolpsrv.prg => DOLPHIN_DEFERROR(2807)
   Called from: .\source\prg\tdolpsrv.prg => TDOLPHINSRV:CHECKERROR(793)
   Called from: .\source\prg\tdolpsrv.prg => TDOLPHINSRV:SQLQUERY(2024)
   Called from: .\source\prg\tdolpsrv.prg => (b)TDOLPHINSRV:TDOLPHINSRV(197)
   Called from:  => TDOLPHINSRV:EXECUTE(0)
   Called from: consulta2.prg => SYSCTRL:CREAPRUEBA(122)
   Called from: consulta2.prg => SYSCTRL:NEW(65)
   Called from: consulta2.prg => MAIN(21)

System
======
   CPU type: Intel(R) Core(TM) i5-2400 CPU @ 3.10GHz 3100 Mhz
   Hardware memory: -110 megs

   Free System resources: 90 %
        GDI    resources: 90 %
        User   resources: 90 %

   Compiler version: xHarbour build 1.2.1 Intl. (SimpLex) (Rev. 6406)
   Windows version: 6.1, Build 7601 Service Pack 1

   Windows total applications running: 0

Variables in use
================
   Procedure     Type   Value
   ==========================
   DOLPHIN_DEFERROR
     Param   1:    O    Class: TDOLPHINSRV
     Param   2:    N    1289
     Param   3:    L    .F.
     Param   4:    C    ""
     Local   1:    C    ""
     Local   2:    O    Class: ERROR
   TDOLPHINSRV:CHECKERROR
     Local   1:    N    1289
     Local   2:    U    
     Local   3:    O    Class: TDOLPHINSRV
     Local   4:    L    .F.
   TDOLPHINSRV:SQLQUERY
     Param   1:    C    "CREATE TABLE IF NOT EXISTS prueba ( cliente_id INT UNSIGNED NOT NULL AUTO_INCREMENT,no_folio             varchar(10) default ' ', no_suscriptor        varchar(10) default ' ', fecha        date NOT NULL, nombre     varchar(60) default ' ', PRIMARY KEY (cliente_id)) ENGINE = InnoDB"
     Local   1:    O    Class: TDOLPHINSRV
     Local   2:    N    281
     Local   3:    N    1
   (b)TDOLPHINSRV:TDOLPHINSRV
     Param   1:    O    Class: TDOLPHINSRV
     Param   2:    C    "CREATE TABLE IF NOT EXISTS prueba ( cliente_id INT UNSIGNED NOT NULL AUTO_INCREMENT,no_folio             varchar(10) default ' ', no_suscriptor        varchar(10) default ' ', fecha        date NOT NULL, nombre     varchar(60) default ' ', PRIMARY KEY (cliente_id)) ENGINE = InnoDB"
   TDOLPHINSRV:EXECUTE
     Param   1:    C    "CREATE TABLE IF NOT EXISTS prueba ( cliente_id INT UNSIGNED NOT NULL AUTO_INCREMENT,no_folio             varchar(10) default ' ', no_suscriptor        varchar(10) default ' ', fecha        date NOT NULL, nombre     varchar(60) default ' ', PRIMARY KEY (cliente_id)) ENGINE = InnoDB"
   SYSCTRL:CREAPRUEBA
     Local   1:    O    Class: SYSCTRL
     Local   2:    C    "CREATE TABLE IF NOT EXISTS prueba ( cliente_id INT UNSIGNED NOT NULL AUTO_INCREMENT,no_folio             varchar(10) default ' ', no_suscriptor        varchar(10) default ' ', fecha        date NOT NULL, nombre     varchar(60) default ' ', PRIMARY KEY (cliente_id)) ENGINE = InnoDB"
   SYSCTRL:NEW
     Local   1:    O    Class: SYSCTRL
   MAIN

Linked RDDs
===========
   DBF
   DBFFPT
   DBFBLOB
   DBFNTX

DataBases in use
================

Classes in use:
===============
     1 ERROR
     2 HASHENTRY
     3 HBCLASS
     4 HBOBJECT
     5 SYSCTRL
     6 TDOLPHINSRV
     7 TREG32

Memory Analysis
===============
      194 Static variables

   Dynamic memory consume:
      Actual  Value:          0 bytes
      Highest Value:          0 bytes

¿Cómo transformo mi DB en una InnoDB?

[Leo]

Bueno amigos, cambie el ENGINE = INNODB por ENGINE = MyISAM y salté este error, pero me aparece otro.

Code: Select all

Application
===========
   Path and name: C:\FWH\Work\consulta2.exe (32 bits)
   Size: 1,961,472 bytes
   Time from start: 0 hours 0 mins 0 secs 
   Error occurred at: 16/01/2013, 14:16:46
   Error description: Error BASE/1003  Variable does not exist: DATATYPE_USER
   Args:

Stack Calls
===========
   Called from: consulta2.prg => SETDOLPHIN(37)
   Called from: consulta2.prg => SYSCTRL:MAKEDIALOGO(160)
   Called from: consulta2.prg => SYSCTRL:NEW(70)
   Called from: consulta2.prg => MAIN(21)

System
======
   CPU type: Intel(R) Core(TM) i5-2400 CPU @ 3.10GHz 3100 Mhz
   Hardware memory: -110 megs

   Free System resources: 90 %
        GDI    resources: 90 %
        User   resources: 90 %

   Compiler version: xHarbour build 1.2.1 Intl. (SimpLex) (Rev. 6406)
   Windows version: 6.1, Build 7601 Service Pack 1

   Windows total applications running: 0

Variables in use
================
   Procedure     Type   Value
   ==========================
   SETDOLPHIN
     Param   1:    O    Class: TXBROWSE
     Param   2:    O    Class: TDOLPHINQRY
     Local   1:    L    .T.
     Local   2:    U    
     Local   3:    C    ""
     Local   4:    C    ""
     Local   5:    U    
     Local   6:    U    
     Local   7:    U    
     Local   8:    O    Class: TXBROWSE
     Local   9:    U    
     Local  10:    U    
     Local  11:    B    {|| ... }
   SYSCTRL:MAKEDIALOGO
     Local   1:    O    Class: SYSCTRL
     Local   2:    O    Class: SYSCTRL
     Local   3:    U    
     Local   4:    N    350.00
   SYSCTRL:NEW
     Local   1:    O    Class: SYSCTRL
   MAIN

Linked RDDs
===========
   DBF
   DBFFPT
   DBFBLOB
   DBFNTX

DataBases in use
================

Classes in use:
===============
     1 ERROR
     2 HASHENTRY
     3 HBCLASS
     4 HBOBJECT
     5 SYSCTRL
     6 TDOLPHINSRV
     7 TDOLPHINQRY
     8 TWINDOW
     9 TDIALOG
    10 TBRUSH
    11 TCONTROL
    12 TBUTTON
    13 TXBROWSE
    14 TFONT
    15 TREG32

Memory Analysis
===============
      194 Static variables

   Dynamic memory consume:
      Actual  Value:          0 bytes
      Highest Value:          0 bytes

[Leo]

Bueno amigos, ya resolví el problema, el foro es una gran instancia de ayuda y estoy muy agradecido de todos los aportes que aquí aparecen. Ahora tengo una pregunta, ¿Existe algún metodo filter?

[Armando]

Leo:

Si bien resolviste el primer problema creo que cambiar de Innodb a myisam pierdas algunas bondades que te ofrece Innodb
entre las mas interesantes esta la facilidad de usar Transacciones.

Te recomiendo que leas algo sobre las diferencias entre InnoDb y MyIsam.

Saludos

[jnavas]

Daniel
Recibe un cordial Saludo,
Soy Juan Navas , creador de AdaptaPro, me gustaria conversar contigo sobre tu excelente clase. Antonio me comento sobre tu excelente trabajo.
Puedes escribirme al 0414-3000518 o jnavas@datapronet.com

[Marcelo Roggeri]

Hola Daniel buenos días, necesito consultarte como hago para usar una base de datos que tengo en un hosting contratado a traves de ssh.
He hecho uso de los ejemplos ya sea en forma local, intranet y funciona ok como tambien probe tu servidor y anduvo. Ahora bien quiero hacer uso del servidor de pago que tengo pero no he logrado acceder a la base de datos, de hecho me cambie de plan a vps porque de esa manera podria hacerlo pero no se como. A la base de datos he podido ingresar con un pograma administrador, pero lo que necesito es accede desde mi aplicativo.
Espero haberme explicado y si alguien sabe como es le agradezco mucho.
Tambien estoy empezando a probar fiveweb pero aun no logre avances, pero bueno esto ya va en otro hilo.
Muchas gracias
Marcelo

[Daniel Garcia-Gil]

Marcelo

Debes habilitar esa opcion en tu servidor pago, que se pueda acceder a mysql desde otras direcciones fuera del mismo servidor (yo tuve que hacerlo para habilitar el servidor de dolphin)

[Marcelo Roggeri]

Hola Danien, ya lo hice a eso, ya habilite el acceso de base de datos externas al servidor.
El acceso desde dolphin como seria? cambia algo? por ejemplo el puerto a utilizar? ya que para acceder por ssl me dan otro diferente.
Espero ansioso la ayuda porque este es un paso importante para mi, para poder acceder a la base de datos a traves del app.
Saludos
Marcelo

[Daniel Garcia-Gil]

Hola

lamentablemente desconozco como seria el acceso usando ssl... con dolphin simplemente no lo uso

[Daniel Garcia-Gil]

voy a tratar de documentarme un poco para darte una opcion, enviame una forma de conectarme a tu servidor para hacer pruebas, por cual via podemos hablar directamente?

[Daniel Garcia-Gil]

al parecer solo bastaria llamar la funcion mysql_ssl_set() del api de mysql, antes de realizar la conexion