FiveTech Support Forums

FiveWin / Harbour / xBase community
Board indexAll discussionsLogin (GitHub)
Board index FiveWin para Harbour/xHarbour TDolphin Clase para manejar MySql
Ruben Fernandez
Posts: 366
Joined: Wed Aug 30, 2006 05:25 PM
Re: TDolphin Clase para manejar MySql
Posted: Tue Jul 13, 2010 10:48 PM

Gracias Daniel...

Al fin pude conectarme a una bases de datos MySql.

Gracias...y como todo...mas ejemplos.

Gracias de nuevo.

Gracias y Saludos

Ruben Fernandez - Uruguay

FWH 11.06, Harbour, Borland 5.82
Daniel Garcia-Gil
Posts: 2365
Joined: Wed Nov 02, 2005 11:46 PM
Re: TDolphin Clase para manejar MySql
Posted: Wed Jul 14, 2010 03:49 PM

Saludos

Ya he dejado un ejemplo para configurar xbrowse el uso de busqueda incremental y el ordenamiento de columnas

our best documentation is the source code
Isla de Margarita Venezuela.
danielgarciagil@gmail.com
http://tdolphin.blogspot.com/
https://www.dropbox.com/referrals/NTI5Njk4MDc1OQ?src=global9
Marcelo Via Giglio
Posts: 1088
Joined: Fri Oct 07, 2005 03:33 PM
Re: TDolphin Clase para manejar MySql
Posted: Wed Jul 14, 2010 03:57 PM

Daniel,

3 cosas

1.- Gracias por tu trabajo
2.- Hay algun ejemplo de como construir una aplicacion con MySQL incrustado?
3.- Pensaste en definir un capa de abstraccion de manera de poder tener diferentes DBMS y utilizarlos con
la misma logica

Gracias

Marcelo

Daniel Garcia-Gil
Posts: 2365
Joined: Wed Nov 02, 2005 11:46 PM
Re: TDolphin Clase para manejar MySql
Posted: Wed Jul 14, 2010 05:10 PM

Marcelo

Aun no he hecho el ejemplo para el Uso de MySql embebido, espero pronto hacerlo

our best documentation is the source code
Isla de Margarita Venezuela.
danielgarciagil@gmail.com
http://tdolphin.blogspot.com/
https://www.dropbox.com/referrals/NTI5Njk4MDc1OQ?src=global9
Daniel Garcia-Gil
Posts: 2365
Joined: Wed Nov 02, 2005 11:46 PM
Re: TDolphin Clase para manejar MySql
Posted: Sat Aug 21, 2010 10:41 PM

Dolphin ahora disponible para MSVC 32 y 64 bits

http://tdolphin.blogspot.com/

our best documentation is the source code
Isla de Margarita Venezuela.
danielgarciagil@gmail.com
http://tdolphin.blogspot.com/
https://www.dropbox.com/referrals/NTI5Njk4MDc1OQ?src=global9
jose_murugosa
Posts: 1279
Joined: Mon Feb 06, 2006 04:28 PM
Re: TDolphin Clase para manejar MySql
Posted: Sun Aug 22, 2010 02:35 AM
Daniel Garcia-Gil wrote:Dolphin ahora disponible para MSVC 32 y 64 bits

http://tdolphin.blogspot.com/


Gracias por tan interesante contribución, La semana pasada estuvimos hablando de ella con unos amigos, estoy por iniciar un pequeño proyecto nuevo, y pienso probarla en él.
Saludos/Regards,

José Murugosa

"Los errores en programación, siempre están entre la silla, el teclado y la IA!!"
AIDA
Posts: 880
Joined: Fri Jan 12, 2007 08:35 PM
Re: TDolphin Clase para manejar MySql
Posted: Sun Aug 22, 2010 09:20 PM

Prometo que cuando termine mi programita me pondre a estudiar y hacer mi tarea en TDolphin :mrgreen:

Saluditos :wink:

Que es mejor que programar? creo que nada :)
Atropellada pero aqui ando :P

I love Fivewin

séʌǝɹ ןɐ ɐʇsǝ opunɯ ǝʇsǝ
Daniel Garcia-Gil
Posts: 2365
Joined: Wed Nov 02, 2005 11:46 PM
Re: TDolphin Clase para manejar MySql
Posted: Sun Aug 22, 2010 11:08 PM

Aida, Jose

estoy a la orden

our best documentation is the source code
Isla de Margarita Venezuela.
danielgarciagil@gmail.com
http://tdolphin.blogspot.com/
https://www.dropbox.com/referrals/NTI5Njk4MDc1OQ?src=global9
sysctrl2
Posts: 1144
Joined: Mon Feb 05, 2007 07:15 PM
Re: TDolphin Clase para manejar MySql
Posted: Wed Sep 22, 2010 10:00 PM
Alguien me puede explicar las diferencias de los siguientes metodos?

Code (fw): Select all Collapse
METHOD Seek()
METHOD Locate()
METHOD Find()


saludos.
Cesar Cortes Cruz

SysCtrl Software

Mexico



' Sin +- FWH es mejor "
Daniel Garcia-Gil
Posts: 2365
Joined: Wed Nov 02, 2005 11:46 PM
Re: TDolphin Clase para manejar MySql
Posted: Thu Sep 23, 2010 12:21 AM
Todas las busquedas en Dolphin se hacen a bajo nivel

METHOD Seek( uSeek, cnField, nStart, nEnd, lSoft, lRefresh )
Hace una busqueda usando un algoritmo llamado en computacion "arbol binario" (usado comunmente en los diccionarios),
por lo general lo que hace es que va directo al medio de la consulta, y si no encuentra la palabra entonces salta a la
otra mitad (la primera mitad o la segunda mitad de la busqueda) dependiendo de si la palabra encontrada
es mayor o menor que la que se busca, y así sucesivamente hasta encontrarla. (algoritmo sugerido por willi Quintana, gracias)
uSeek es el valor buscado
cnField Nombre/Numero del campo a buscar
nStart Registro de inicio para la busqueda
nEnd Registro final de la busqueda
lSoft Valor logico que determinara en estado .T. la busqueda "suave" del dato a buscar, .F. el dato exacto
lRefresh Carga el registro en contrado en el buffer (aRow/hRow)
el valor de retorno es el numero del registro encontrado o devuelve 0 de no encontarse

Observacion: La consulta debe estar ordenada por el campo a buscar

La busqueda con este algoritma es realmente rapida
ejemplo de los resultados...
http://tdolphin.blogspot.com/2010/07/rapido-fast.html
antes seek usaba una busqueda secuencial ( que ahora lo hace find )


METHOD Locate( aValues, aFields, nStart, nEnd, lRefresh )
Usa la misma tecnica de Seek pero para varios valores en varios campos

aValue Array de valores a buscar
aField Array de los nombres de campos a buscar en orden respectivo a los volores buscados


METHOD Find( aValues, aFields, nStart, nEnd, lRefresh )
Este metodo usa un algoritmo de busqueda secuencial, la consulta no necesita estar ordenada
our best documentation is the source code
Isla de Margarita Venezuela.
danielgarciagil@gmail.com
http://tdolphin.blogspot.com/
https://www.dropbox.com/referrals/NTI5Njk4MDc1OQ?src=global9
sysctrl2
Posts: 1144
Joined: Mon Feb 05, 2007 07:15 PM
Re: TDolphin Clase para manejar MySql
Posted: Thu Sep 23, 2010 01:12 AM

La explicacion es muy clara , gracias.

ahora que diferencia hay entre una busqueda por medio de los methodos ( Locate, seek, find ), y una consulta mediante un query.

DEFINE C_SIMPLE CHR( 39 )

DEFINE c_simple CHR( 39 )

function Consulta()
local cVar := '1'
local nRows

    oQry := ::oMain:oCon:Query(  "SELECT * FROM clientes WHERE no_folio=" + C_SIMPLE + cVar + C_SIMPLE +;

' ORDER BY no_folio LIMIT 1')

   nRows := oQry:nRecCount
   if nRows = 0
       msginfo('LO SIENTO , NO ENCONTRE NADA ...')
   ELSE
       ? oQry:no_folio //SI ENCONTRE ALGO.
   endif

return nil

perdon DANIEL por la lata, pero estoy tratando de dar el salto de DBF a SQL y estoy aprendiendo, y quiero aplicar la mejor tecnica
posible.

saludos. Cesar Cortes Cruz.

Cesar Cortes Cruz

SysCtrl Software

Mexico



' Sin +- FWH es mejor "
sysctrl2
Posts: 1144
Joined: Mon Feb 05, 2007 07:15 PM
Re: TDolphin Clase para manejar MySql
Posted: Thu Sep 23, 2010 01:18 AM
Daniel la explicacion es muy clara y precisa, GRACIAS.

Pero me salta otra duda, que diferencia existe entre una busqueda LOCATE, FIND, SEEK y una consulta desde un query normal.

cual tecnica seria la mas idonea y mas rapida ?


Code (fw): Select all Collapse
FUNCTION Consulta()
     local cVar := '1'
     local nRows 

    oQry := ::oMain:oCon:Query(  "SELECT * FROM clientes WHERE no_folio=" + C_SIMPLE + cVar + C_SIMPLE +;
   ' ORDER BY no_folio LIMIT 1')
   
   nRows := oQry:nRecCount

   if nRows = 0
      ? 'NO HAY NADA'
   ELSE
      ? oQry:no_folio, oQry:nombre
   endif

return nil


Perdon por la lata Daniel, pero estoy tratando de dar el salto de dbf a sql, y quiero utilizar la mejor tecnica posible.
Saludos, Cesar Cortes.
Cesar Cortes Cruz

SysCtrl Software

Mexico



' Sin +- FWH es mejor "
Daniel Garcia-Gil
Posts: 2365
Joined: Wed Nov 02, 2005 11:46 PM
Re: TDolphin Clase para manejar MySql
Posted: Thu Sep 23, 2010 01:35 AM
Cesar

LOCATE, FIND, SEEK actuan sobre el query activo no sobre la tabla

para que tengas una idea seria algo asi:

Code (fw): Select all Collapse
oQry := ::oMain:oCon:Query(  "SELECT * FROM clientes ORDER BY no_folio") // consulta de todos los clientes
nSeek = oQry:Seek( C_SIMPLE + cVar + C_SIMPLE, "no_folio" )
if nSeek == 0
 ? "no hay nada"
else
 ? oQry:no_folio, oQry:nombre
endif


como te comentaba anteriormente todo actua sobre la consulta (traduccion de query)
our best documentation is the source code
Isla de Margarita Venezuela.
danielgarciagil@gmail.com
http://tdolphin.blogspot.com/
https://www.dropbox.com/referrals/NTI5Njk4MDc1OQ?src=global9
sysctrl2
Posts: 1144
Joined: Mon Feb 05, 2007 07:15 PM
Re: TDolphin Clase para manejar MySql
Posted: Thu Sep 23, 2010 01:53 AM

Gracias Daniel,
voy a seguir probando.
saludos..

Cesar Cortes Cruz

SysCtrl Software

Mexico



' Sin +- FWH es mejor "
devtuxtla
Posts: 392
Joined: Tue Jul 29, 2008 01:55 PM
Re: TDolphin Clase para manejar MySql
Posted: Fri Sep 24, 2010 06:14 PM

Hola Daniel.

Existe un LINK directo para bajar la clase?

Saludos

Visite Chiapas, el paraiso de México.
Static archive · New replies & topics via GitHub Discussions