Oohg + harbour + mysql
343 views
Skip to first unread message
José Francisco Orozco Murillo
Jul 31, 2018, 11:22:08 PM7/31/18
to oo...@googlegroups.com
BN noches.
Estoy empezando a aprender el uso de MySQL , he visto un ejemplo que usa oosql, quisiera saber si está implementación, es lo suficientemente estable para producción, o si hay otro medio que lo sea.
Grácias.
JOSE OROZCO.
Colombia
David Field
Aug 1, 2018, 11:43:28 AM8/1/18
to oohg
Hola José,
Primeramente, FELICIDADES!!!
Bienvenido al presente. Te vas a maravillar con la velocidad y las grandes posibilidades que te da SQL.
No utilizo oosql, pero viendo el prg, veo que hay que crear un objeto oQuery que es el que en realidad hace la conexión y la extracción de datos SQL, me imagino podrá ser TMySql o cualquiera otro. OOSQL sirve como enlace para el XBROWSE pero también es un buen punto de partida para un objeto que te permita utilizarlo con acceso similar a una DBF.
En lo personal me ha gustado ADO ya que me permite sin casi ninguna diferencia acceder a MS SQL, MySQL, y cualquier otro SQL
Si utilizas MySQL con la libreria de Harbour (TMySQL) creo que requieres una DLL, si utilizas ADO necesitas instalar a la compu donde se vaya usar, el conector MySQL Connector/ODBC 5.3, Si usas ADO con MS SQL no hay necesidad ya que viene preinstalado con windows.
Saludos,
David Field
Edson Granados
Aug 1, 2018, 3:48:56 PM8/1/18
to oo...@googlegroups.com
Buenos días David,
Donde podemos echarle un vistazo a msql con ADO, ya que me parece interesante manejar las dos versiones y mirar cual es mas facil para migrar unas aplicaciones.
Gracias
--
Edson Granados
--
Has recibido este mensaje porque estás suscrito al grupo "oohg" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a oohg+uns...@googlegroups.com.
Para publicar en este grupo, envía un correo electrónico a oo...@googlegroups.com.
Visita este grupo en https://groups.google.com/group/oohg.
Para acceder a más opciones, visita https://groups.google.com/d/optout.
David Field
Aug 1, 2018, 8:33:18 PM8/1/18
to oohg
Edson,
En lo personal, normalmente voy a ADO Introduction para resolver mis dudas.
Aparte de eso esta Microsoft.
También existe en Harbour3.2\Extras\rddado que te puede servir. o Harbour3.0\examples\rddado
Saludos,
David Field
El miércoles, 1 de agosto de 2018, 14:48:56 (UTC-5), Edson Granados escribió:
Buenos días David,
Donde podemos echarle un vistazo a msql con ADO, ya que me parece interesante manejar las dos versiones y mirar cual es mas facil para migrar unas aplicaciones.
Gracias
miércoles, 01 agosto 2018, 10:43AM -05:00 de David Field david...@gmail.com:--
Edson Granados
--Hola José,Primeramente, FELICIDADES!!!Bienvenido al presente. Te vas a maravillar con la velocidad y las grandes posibilidades que te da SQL.No utilizo oosql, pero viendo el prg, veo que hay que crear un objeto oQuery que es el que en realidad hace la conexión y la extracción de datos SQL, me imagino podrá ser TMySql o cualquiera otro. OOSQL sirve como enlace para el XBROWSE pero también es un buen punto de partida para un objeto que te permita utilizarlo con acceso similar a una DBF.En lo personal me ha gustado ADO ya que me permite sin casi ninguna diferencia acceder a MS SQL, MySQL, y cualquier otro SQLSi utilizas MySQL con la libreria de Harbour (TMySQL) creo que requieres una DLL, si utilizas ADO necesitas instalar a la compu donde se vaya usar, el conector MySQL Connector/ODBC 5.3, Si usas ADO con MS SQL no hay necesidad ya que viene preinstalado con windows.Saludos,David Field
El martes, 31 de julio de 2018, 22:22:08 (UTC-5), José Francisco Orozco Murillo escribió:BN noches.Estoy empezando a aprender el uso de MySQL , he visto un ejemplo que usa oosql, quisiera saber si está implementación, es lo suficientemente estable para producción, o si hay otro medio que lo sea.Grácias.JOSE OROZCO.Colombia
Has recibido este mensaje porque estás suscrito al grupo "oohg" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a oohg+unsubscribe@googlegroups.com.
Jose Orozco
Aug 23, 2018, 10:15:57 AM8/23/18
to oo...@googlegroups.com
Buenos dias..
He progresado poco en realidad... hasta anoche pude conectarte al
servidor de mariasdb, ahora.. estoy usando solo adodb o ado.. solo
quisiera saber como hago un browse del recordset...
He progresado poco en realidad... hasta anoche pude conectarte al
servidor de mariasdb, ahora.. estoy usando solo adodb o ado.. solo
quisiera saber como hago un browse del recordset...
David Field
Aug 23, 2018, 11:12:14 AM8/23/18
to oohg
Hola José,
Contestando a tu pregunta de como hacer un browse de ADO
1.No puedes usar Browse, tienes que usar xBrowse
2. En la definicion de xBrowse WORKAREA (oADO) donde oADO es tu objeto ADO y debe ir entre parentesis
3. El objeto oADO debe tener un METHOD Skip() (ver mas abajo)
4. Para la definición del parámetro FIELDS del xBROWSE recomiendo definirlo con bloques (a menos que encuentres mejor forma):
FIELDS { {|o| o:Fields('nombre del campo'):Value }... }
o puedes hacer FIELDS {|o| o:Fields(numero de campo):Value }...} si sabes la posición del campo en el Recordset. Recuerda que las posiciones son 0,1,2 y no 1,2,3
xBrowse evalua cada block pasándole como parámetro el objeto oADO que enviaste
Este es el METHOD SKIP que uso yo
METHOD Function Skip(nSkip) CLASS DBADO
*-----------------------------------------------------------------------------*
Local n := 0
IF nSkip != 0
IF (oRs:EOF .and. nSkip >= 0) .or. (oRs:BOF .and. nSkip <= 0)
// IF (oRs:EOF .or. oRs:BOF)
Return 0
ENDIF
While nSkip <> n
IF nSkip > 0
oRs:Move( 1 )
// si está borrardo y aun no aceptada (update)
While !oRs:EOF .and. (oRs:EditMode = 4 .or. oRs:Status = adRecDeleted .or. oRs:Status = adRecDBDeleted) oRs:move(1)
Enddo
IF oRs:EOF
oRs:Move(-1) // MoveLast da error cuando no hay registros
exit
Else
n ++
Endif
ELSE // IF nSkip < 0
oRs:Move(-1)
While !oRs:BOF .and. (oRs:EditMode = 4 .or. oRs:Status = adRecDeleted .or. oRs:Status = adRecDBDeleted)
oRs:move(-1)
Enddo
IF oRs:BOF
oRs:Move(1)
Exit
Else
n --
Endif
ENDIF
ENDDO
nSkip := n
ENDIF
Return nSkip
*-----------------------------------------------------------------------------*
Local n := 0
IF nSkip != 0
IF (oRs:EOF .and. nSkip >= 0) .or. (oRs:BOF .and. nSkip <= 0)
// IF (oRs:EOF .or. oRs:BOF)
Return 0
ENDIF
While nSkip <> n
IF nSkip > 0
oRs:Move( 1 )
// si está borrardo y aun no aceptada (update)
While !oRs:EOF .and. (oRs:EditMode = 4 .or. oRs:Status = adRecDeleted .or. oRs:Status = adRecDBDeleted) oRs:move(1)
Enddo
IF oRs:EOF
oRs:Move(-1) // MoveLast da error cuando no hay registros
exit
Else
n ++
Endif
ELSE // IF nSkip < 0
oRs:Move(-1)
While !oRs:BOF .and. (oRs:EditMode = 4 .or. oRs:Status = adRecDeleted .or. oRs:Status = adRecDBDeleted)
oRs:move(-1)
Enddo
IF oRs:BOF
oRs:Move(1)
Exit
Else
n --
Endif
ENDIF
ENDDO
nSkip := n
ENDIF
Return nSkip
Saludos,
David Field
Jose Orozco
Mar 13, 2019, 1:18:11 PM3/13/19
to oo...@googlegroups.com
Buenos dias...
He estado un poco alejado de la programacion. Saludos a todos desde
Colombia.
Bueno..
Estoy en el proceso firme de migrar mis aplicaciones a el Motor
MySql/MariaDb. Tengo ya la base de datos y sus tablas creadas.
Estoy usando (o trantando de usar) ooSql (Ejemplos en Mysql y
* Grid_Mysql : No logre hacerla funcionar
* Mysql : Si ha compilado
Avances:
* Conectarme a el Servidor (Mysql), login con usuario
* Generar consulta (query) a una tabla
Dificultades
* usar xBrowse o Grid para visualizar la informacion
He estado un poco alejado de la programacion. Saludos a todos desde
Colombia.
Bueno..
Estoy en el proceso firme de migrar mis aplicaciones a el Motor
MySql/MariaDb. Tengo ya la base de datos y sus tablas creadas.
Estoy usando (o trantando de usar) ooSql (Ejemplos en Mysql y
* Grid_Mysql : No logre hacerla funcionar
* Mysql : Si ha compilado
Avances:
* Conectarme a el Servidor (Mysql), login con usuario
* Generar consulta (query) a una tabla
Dificultades
* usar xBrowse o Grid para visualizar la informacion
David Field
Mar 13, 2019, 5:03:06 PM3/13/19
to oohg
Hola José,
En algún tema anterior compartí un pgr llamado sqlado el cuál conecta y te permite hacer un xbrowse de cualquier tabla o comando selecto.
Avisame si no lo encuentras y te lo envío.
Saludos
David Field
En algún tema anterior compartí un pgr llamado sqlado el cuál conecta y te permite hacer un xbrowse de cualquier tabla o comando selecto.
Avisame si no lo encuentras y te lo envío.
Saludos
David Field
Rubens Hilmar Salazar Ayala
Mar 15, 2019, 5:13:33 PM3/15/19
to oohg
Luis...
Podrías por favor subirlo al grupo.
Muchísimas gracias.-
Cordiales saludos.-
Rubens
--
Has recibido este mensaje porque estás suscrito al grupo "oohg" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a oohg+uns...@googlegroups.com.
Para publicar una publicación en este grupo, envía un correo electrónico a oo...@googlegroups.com.
Visita este grupo en https://groups.google.com/group/oohg.
Para obtener más opciones, visita https://groups.google.com/d/optout.
David Field
Mar 19, 2019, 6:38:43 PM3/19/19
to oohg
Comparto nuevamente SqlAdo.prg para aquellos que deseen comenzar a usar ADO y SQL
Saludos,
David Field
El viernes, 15 de marzo de 2019, 15:13:33 (UTC-6), Rubens Hilmar Salazar Ayala escribió:
Luis...Podrías por favor subirlo al grupo.Muchísimas gracias.-Cordiales saludos.-Rubens
El mié., 13 de mar. de 2019 5:03 p. m., David Field <david...@gmail.com> escribió:
Hola José,
En algún tema anterior compartí un pgr llamado sqlado el cuál conecta y te permite hacer un xbrowse de cualquier tabla o comando selecto.
Avisame si no lo encuentras y te lo envío.
Saludos
David Field
--
Has recibido este mensaje porque estás suscrito al grupo "oohg" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a oohg+unsubscribe@googlegroups.com.
Rubens Hilmar Salazar Ayala
Mar 20, 2019, 9:04:02 AM3/20/19
to oohg
Muchísimas gracias David
El mar., 19 de mar. de 2019 6:38 p. m., David Field <david...@gmail.com> escribió:
Comparto nuevamente SqlAdo.prg para aquellos que deseen comenzar a usar ADO y SQLSaludos,David Field
El viernes, 15 de marzo de 2019, 15:13:33 (UTC-6), Rubens Hilmar Salazar Ayala escribió:
Luis...Podrías por favor subirlo al grupo.Muchísimas gracias.-Cordiales saludos.-Rubens
El mié., 13 de mar. de 2019 5:03 p. m., David Field <david...@gmail.com> escribió:
Hola José,
En algún tema anterior compartí un pgr llamado sqlado el cuál conecta y te permite hacer un xbrowse de cualquier tabla o comando selecto.
Avisame si no lo encuentras y te lo envío.
Saludos
David Field
--
Has recibido este mensaje porque estás suscrito al grupo "oohg" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a oohg+uns...@googlegroups.com.
Para publicar una publicación en este grupo, envía un correo electrónico a oo...@googlegroups.com.
Visita este grupo en https://groups.google.com/group/oohg.
Para obtener más opciones, visita https://groups.google.com/d/optout.
--
Has recibido este mensaje porque estás suscrito al grupo "oohg" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a oohg+uns...@googlegroups.com.
Para publicar en este grupo, envía un correo electrónico a oo...@googlegroups.com.
Visita este grupo en https://groups.google.com/group/oohg.
Para acceder a más opciones, visita https://groups.google.com/d/optout.
Jorge Garate
Mar 20, 2019, 10:16:28 AM3/20/19
to oohg
Bajado, Gracias.
Reply all
Reply to author
Forward
0 new messages