controlar Dbgrid por codigo
Publicado por daju_k (34 intervenciones) el 30/03/2007 17:36:51
que tal gente estoy realizando varios programas y la verdad que me gusta controlar las bases de datos por codigo, el tema es el siguiente yo ya controlo la base de datos (agregar datos, modificar, eliminar, etc), pero a la hora de volcar los datos en un dbgrid acudo al famoso control ADODC, pero me gustaria saber como puedo controlar el dbgrid por codigo sin necesidad de dicho control
mi codigo de coneccion a la base de datos es
Dim strConnection As String
Dim cnCli As New ADODB.Connection
Dim rsCli As New ADODB.Recordset
strConnection = "Provider=Microsoft.Jet.OLEDB.3.51;"
strConnection = strConnection & "Persist Security Info=False;"
strConnection = strConnection & "Data Source=C:\Software\GenClave\archivo.mdb;"
strConnection = strConnection & "Mode=ReadWrite;"
cnCli.ConnectionString = strConnection
cnCli.ConnectionTimeout = 10
cnCli.CursorLocation = adUseNone
cnCli.Open
rsCli.Open "Select * from clientes", cnCli, adOpenDynamic, adLockOptimistic, adCmdText
con los dim inicializo las variables, strConneccion es la cade de conexion para la base de datos, cncli es la coneccion propiamente dicha y rscli es el recordset.
les agradeceria si me pueden dar una mano en esto. gracias
mi codigo de coneccion a la base de datos es
Dim strConnection As String
Dim cnCli As New ADODB.Connection
Dim rsCli As New ADODB.Recordset
strConnection = "Provider=Microsoft.Jet.OLEDB.3.51;"
strConnection = strConnection & "Persist Security Info=False;"
strConnection = strConnection & "Data Source=C:\Software\GenClave\archivo.mdb;"
strConnection = strConnection & "Mode=ReadWrite;"
cnCli.ConnectionString = strConnection
cnCli.ConnectionTimeout = 10
cnCli.CursorLocation = adUseNone
cnCli.Open
rsCli.Open "Select * from clientes", cnCli, adOpenDynamic, adLockOptimistic, adCmdText
con los dim inicializo las variables, strConneccion es la cade de conexion para la base de datos, cncli es la coneccion propiamente dicha y rscli es el recordset.
les agradeceria si me pueden dar una mano en esto. gracias
Valora esta pregunta


0