Estoy tratando de cargar los datos de una tabla hecha en mysql a un Dataview pero no lo logro.
Tengo una base de datos llamada "interes_compuesto" con una tabla llamada "tabla_interes", cuyos campos son los siguientes:
Nombre Tipo
id INTEGER AutoIncrementable
capital FLOAT
interes FLOAT
tiempo INTEGER
monto FLOAT
id INTEGER AutoIncrementable
capital FLOAT
interes FLOAT
tiempo INTEGER
monto FLOAT
Tengo un form con un DataSource1 y un Dataview1, en el evento Form_Open tengo el siguiente codigo:
DIM conexion AS NEW Connection
conexion.Host = "localhost"
conexion.Type = "mysql"
conexion.User = "root"
conexion.Password = "*******"
conexion.Name = "interes_compuesto"
conexion.Open
DataSource1.Table = "tabla_interes"
WITH DataView1.GridView
.Columns.Count = 5
.Columns[0].Text = "ID"
.Columns[0].Width = 4
.Columns[1].Text = "Capital"
.Columns[1].Width = 20
.Columns[2].Text = "Interes"
.Columns[2].Width = 10
.Columns[3].Text = "Tiempo"
.Columns[3].Width = 4
.Columns[4].Text = "Monto"
.Columns[4].Width = 20
END WITH
conexion.Host = "localhost"
conexion.Type = "mysql"
conexion.User = "root"
conexion.Password = "*******"
conexion.Name = "interes_compuesto"
conexion.Open
DataSource1.Table = "tabla_interes"
WITH DataView1.GridView
.Columns.Count = 5
.Columns[0].Text = "ID"
.Columns[0].Width = 4
.Columns[1].Text = "Capital"
.Columns[1].Width = 20
.Columns[2].Text = "Interes"
.Columns[2].Width = 10
.Columns[3].Text = "Tiempo"
.Columns[3].Width = 4
.Columns[4].Text = "Monto"
.Columns[4].Width = 20
END WITH
Tengo activados los componentes gb.db, gb,db.forms, gb.db.mysql
el programa corre pero solo me presenta un messagebox: "No current conection"
Esto es lo que he podido codificar según varios ejemplos que he visto por ahí. Por favor sugerirme que pasos debo tomar para mostrar los datos de la tabla y luego poder editar los datos.