MySql + ayuda

Mike Serra · Post by **Mike Serra** » Mon Oct 02, 2006 4:54 pm

BUenas tardes foro!

Os comento, he instalado el servidor de Mysql en mi maquina, he desempolvado los libros de bases de datos relacionales, he creado 2 tablas y he insertado tuplas (desde la consola del mysql). Ahora queda lo mejor, teneis un ejemplo que pueda analizar para conectar five con el servidor?

fw 2.5 (harbour y xharbour)

UN SALUDO y muchas gracias por todo

Post by **Antonio Linares** » Mon Oct 02, 2006 9:26 pm

Mike,

Haz una búsqueda por MySQL en estos foros (opción "search" arriba).

sjingo · Post by **sjingo** » Tue Oct 03, 2006 1:12 am

Mike

Como ya tienes instalado mysql, ahora debes instalar el MyOdbc que lo puedes bajar fácilmente de internet. Esto te permitirá acceder a las tablas mediante ADO.

Una vez instalado debes configurar el myodbc en: Panel de Control-> Herramientas administrativas -> Orígenes de Datos (ODBC), y en la pstaña DSN de usuario se agrega el nuevo tipo de conexión (MySql ODBC 3.51), ingresas los datos de nombre del servidor, usuario, pasword y base de datos. Si todo va bien obtendrás un "Succes, conection was made! "

Ahora tu aplicación debe poseer soporte para OLE, con xHarbour no tienes que hacer nada, porque tiene implementado por defecto, con Harbour debes añadir la librería HBOLE.lib.

El siguiente paso es crear tu aplicación. El siguiente código que lo he bajado de este mismo foro establece la conexion, se crea el objeto RecordSet, a éste puedes manipularlo desde tu aplicación haciendo uso de sus propiedades y métodos. Más información detallada de éstos lo puedes hallar en MSDN : http://msdn.microsoft.com/library/defau ... odbrec.asp. También lo puedes pasar a un array para visualizarlo con un browse:

#define adOpenForwardOnly 0
#define adOpenKeyset 1
#define adOpenDynamic 2
#define adOpenStatic 3

#define adLockReadOnly 1
#define adLockPessimistic 2
#define adLockOptimistic 3
#define adLockBatchOptimistic 4
#define adUseServer 2
#define adUseClient 3

cQuery:= "SELECT campo1,campo2,campo3 FROM mitabla"
cConnection := "DRIVER={MySQL ODBC 3.51 DRIVER};SERVER=localhost;DATABASE=tuDB;USER=usuario;PASSWORD=miclave"

oCon:=toleauto():new("adodb.connection")
oRS := TOleAuto():New("adodb.recordset")
oRs:CursorLocation = adUseClient
oRs:Open( cQuery , cConnection, adOpenKeyset, adLockOptimistic )

oRs:MoveFirst() // equivale a GO TOP
aDatos:={}

//paso los datos a un arreglo
WHILE !oRs:Eof()
aReg := {}
for nPos := 0 to oRs:Fields:Count() -1
AAdd(aReg,Value(oRs,nPos))
next
AAdd(aDatos,aReg)
oRs:MoveNext()
END

oRs:Close()

////////////////////////////////
Luego de pasado al arreglo lo puedes visualizar como tal

Puede ayudarte de mucho una excelente aplicación llamada TALLER, gentilmente cedida por Miguel Angel, que usa ADO para el acceso a datos.
http://chileforge.cl/frs/download.php/220/Taller.zip

No soy bueno explicando, pero espero te sirva de algo, y como dice Antonio, sigue buscando en el Foro y encontrarás más información

Un saludo

Marcelo Jingo

Mike Serra · Post by **Mike Serra** » Tue Oct 03, 2006 8:27 am

Muchas gracias Marcelo y Antonio:

Ya se que vienen cosas de mysql en el foro, pero por ejemplo, no he llegado a ver lo que me comentas de myodbc, porque ahí, precisamente fue donde me quede cuando ya tenía todo hecho, y era que me metía en herramientas administrativas >> orígenes de datos (odbc) y al agregar uno nuevo, no encontraba el driver de mysql.

Ahora que ya creo que puedo empezar a hacer algo, seguiré mirando en el foro.

MUCHAS GRACIAS y SALUDOS.

Baxajaun · Post by **Baxajaun** » Tue Oct 03, 2006 8:44 am

Mike,

también puedes usar Eagle1 de mi amigo Manu Expósito. Te puedes poner en contacto con él en manuexposito arroba terra.es

Eagle1 es una libreria (jerarquía de clases) para atacar directamente a MySQL.

Saludos.

goosfancito · Post by **goosfancito** » Tue Oct 03, 2006 12:03 pm

Baxajaun wrote:Mike,

también puedes usar Eagle1 de mi amigo Manu Expósito. Te puedes poner en contacto con él en manuexposito arroba terra.es

Eagle1 es una libreria (jerarquía de clases) para atacar directamente a MySQL.

Saludos.

Esa dire funciona? porque no llegan los mensajes a manu.

Baxajaun · Post by **Baxajaun** » Tue Oct 03, 2006 12:38 pm

Sí, si que funciona.

Saludos.

goosfancito · Post by **goosfancito** » Tue Oct 03, 2006 12:51 pm

Baxajaun wrote:Sí, si que funciona.

Saludos.

This is an automatically generated Delivery Status Notification

Delivery to the following recipient failed permanently:

manuexposito arroba terra.com

Technical details of permanent failure:
PERM_FAILURE: SMTP Error (state 9): 550 User unknown

lo separe. pero puse todo junto y cambie @

Baxajaun · Post by **Baxajaun** » Tue Oct 03, 2006 6:11 pm

Goos,

manuexpositoarrobaterra.es

cambia arroba por @ y debe llegarle los mensajes.

Saludos