Consulta!
¿Hola nuevamente como andas?
Te comento que necesito cargar una tabla de una BD hecha en access..
Por lo tanto lo quiero cargar en una MSflexgrid, lo raro es que cuando lo ejecuto no me tira ningún error, pero tampoco me carga la tabla en la grilla... Mi código es el sig...
Dim micn As ADODB.Connection
Dim mirs As ADODB.Recordset
Private Sub MDIForm_Load()
Set micn = New ADODB.Connection
micn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=G:\Orders.mdb;Persist Security Info=False"
micn.Open
Set mirs = New ADODB.Recordset
mirs.Open "orders", micn, adOpenDynamic, adLockOptimistic
Set MSHFlexGrid1.DataSource = mirs
MSHFlexGrid1.Refresh
End Sub
Me gustaría que me digas en que me estoy equivocando...
Gracias..
Disculpa las molestias
Diego
Te comento que necesito cargar una tabla de una BD hecha en access..
Por lo tanto lo quiero cargar en una MSflexgrid, lo raro es que cuando lo ejecuto no me tira ningún error, pero tampoco me carga la tabla en la grilla... Mi código es el sig...
Dim micn As ADODB.Connection
Dim mirs As ADODB.Recordset
Private Sub MDIForm_Load()
Set micn = New ADODB.Connection
micn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=G:\Orders.mdb;Persist Security Info=False"
micn.Open
Set mirs = New ADODB.Recordset
mirs.Open "orders", micn, adOpenDynamic, adLockOptimistic
Set MSHFlexGrid1.DataSource = mirs
MSHFlexGrid1.Refresh
End Sub
Me gustaría que me digas en que me estoy equivocando...
Gracias..
Disculpa las molestias
Diego
