Visual Basic - Como Llenar un DataGrid????

Life is soft - evento anual de software empresarial
 
Vista:

Como Llenar un DataGrid????

Publicado por dr_x (1 intervención) el 25/01/2005 22:58:15
Tengo un recordset con una consulta de una BD en Acces200 y quiero mostrarlo en un DataGrid pero no tengo idea, por que no encuentro la forma de llevar cada registro a una fila.

¿Cual es mejor, un DataGrid ó un DbGrid?

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:Como Llenar un DataGrid????

Publicado por carlos (101 intervenciones) el 26/01/2005 00:32:12
si usas datagrid,debes enlazarlo con un adodc(en la propiedad datasource del datagrid) , y en el adodc programar el enlace a tu base de datos

-----------------------------------------------------------------------------------------------

adodc1.connectionstring= "Provider.....
adodc1.recordsource="select {campos} from {tabla} "
adodc1.refresh
datagrid1.datasource=adodc1
-----------------------------------------------------------------------------------------------

(perdona por no poner completa la cadena de coneccion, ahora no la tengo a mano, ademas, debes considerar si tu BD tiene contraseñas)

cualquier cosa, escribe y te envio un ejemplo
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:Como Llenar un DataGrid????

Publicado por Benjo (680 intervenciones) el 26/01/2005 15:17:53
Si lo que quieres es mantener tu código y prescindir del ADODC, debes utilizar una Clase con la propiedad DataSourceBehavior=1
'En Class
Private WithEvents cnn As ADODB.Connection
Private WithEvents rs As ADODB.Recordset
Private Str As String
Public Sub Update(): rs.Update: End Sub
Public Function Recordcount() As Integer: Recordcount = rs.Recordcount: End Function
Public Sub delete(): rs.delete: rs.Update: End Sub
Public Sub MoveLast(): rs.MoveLast: End Sub
Public Sub MoveFirst(): rs.MoveFirst: End Sub
Public Sub MoveNext(): rs.MoveNext: End Sub
Private Sub Class_Terminate()
rs.Close: cnn.Close
Set rs = Nothing: Set cnn = Nothing
End Sub
Public Sub dbOpen(ByVal strODBC As String, ByVal strSQL As String)
Set cnn = New ADODB.Connection
cnn.ConnectionString = "Provider=MSDASQL.1;Persist Security Info=False;Data Source=" & strODBC
cnn.Open
Set rs = New ADODB.Recordset
rs.Open strSQL, cnn, adOpenStatic, adLockOptimistic
End Sub
Private Sub Class_GetDataMember(DataMember As String, Data As Object)
Set Data = rs
End Sub
'En form
Private Sub Command1_Click()
'En donde Base es mi DSN y Sub la Tabla dentro de Base
Rec.dbOpen "Base", "SELECT * FROM Sub"
'Se enlaza el control DataGrid
Set DataGrid1.DataSource = Rec
End Sub
Espero que te sirva.
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:Como Llenar un DataGrid????

Publicado por Anaasinco (72 intervenciones) el 16/09/2005 11:34:33
Porque cuando hago lo que indicas me da el siguiente error??
Error de compilacion, no se ha definido el tipo definido por el usuario.

Ana
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