Re: Creación De Una Estructura Mysql En Local Extrayendo Los Campos De Forma Remota.
Me explico:
Ante la dificultad de realizar un programa distinto de instalación para cada nueva versión de software que realizo, se me ha ocurrido hacer un programa de instalación que tome los datos de una base de datos remota que puede estar en mi servidor.
De esta forma, la definición de tablas y campos que deberán estar presentes en el Mysql del servidor.
El programa de instalación consultara al servidor que campos debe crear localmente y por tanto podrá ejecutarse el código de forma simple y eficaz.
La pregunta es....
Como puedo extraer la estructura de una base de datos Mysql desde gambas3?
es decir... conocer las tablas y campos que la componen así como sus atributos?
Muchas gracias de antemano.
Un saludo.
Bueno creo que lo que debes hacer es crear la función de conexión con los datos donde se encuentra alojada la base de datos.
Luego haces la consulta con el comando sql
PUBLIC SUB mostrar_descripcion()
DIM hresul AS Result
tabla_descripcion.rows.count = 0
' muestra la descripcion de la tabla que escribas
hresul = hconn.Exec("desc personas;")
'hresul es la variable que trae los resuntados
'hconn =es la variable de conexion que breviamente deveras haber especificado en la funcion de conexion
DO WHILE hresul.Available
'carga toda la descripcion en un gribvie llamadodo tabla_descripcion[
tabla_descripcion.rows.count = tabla_descripcion.rows.count + 1
tabla_descripcion[tabla_descripcion.rows.count - 1, 0].Text = hresul["Field"]
tabla_descripcion[tabla_descripcion.rows.count - 1, 1].Text = hresul["Type"]
tabla_descripcion[tabla_descripcion.rows.count - 1, 2].Text = hresul["Null"]
tabla_descripcion[tabla_descripcion.rows.count - 1, 3].Text = hresul["Key"]
tabla_descripcion[tabla_descripcion.rows.count - 1, 4].Text = hresul["Default"]
tabla_descripcion[tabla_descripcion.rows.count - 1, 5].Text = hresul["Extra"]
hresul.MoveNext
LOOP
END
bueno esto fue lo que entendi de tu pregunta..
Kowloon
Foro 
dos hermanas, sevilla
