Visual Basic - controlar Dbgrid por codigo

Life is soft - evento anual de software empresarial
 
Vista:

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
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:controlar Dbgrid por codigo

Publicado por Luis Prieto (166 intervenciones) el 30/03/2007 18:12:12
Hola, daju_k !!

Yo te aconsejaria que uses el control Datagrid y no el DbGrid por que no es compatible con ADO.

Y tu codigo quedaria asi:

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

'solo agrege esta ultima linea
Set Datagrid1.datasource=rsCli

Espero te ayude.

Saludos!!

Pdta: Cualquier duda escribeme o conectate al msn.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:controlar Dbgrid por codigo

Publicado por daju_k (34 intervenciones) el 30/03/2007 19:02:10
probe con ese codigo pero da un error dice se requiere objeto que podra ser?
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:controlar Dbgrid por codigo

Publicado por Luis Prieto (166 intervenciones) el 30/03/2007 22:31:36
hola, daju_k!!!

El problema es que no has agregado el conrol Datagrid seguramente.

Saludos!!
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar