Visual Basic - Crear conección adodc y enlace con datagrid

Life is soft - evento anual de software empresarial
 
Vista:

Crear conección adodc y enlace con datagrid

Publicado por jes (5 intervenciones) el 28/04/2001 14:00:33
me da error en 'datagrid1.datasource' dice que no encuentra en el miembro de datos o algo asi.
¿Es necesario tener cargado en el form el datagrid, como?.

Private Sub Command1_Click()
Fin = CDate(Text1.Text)
ffin = CDate(Text2.Text)

Dim Conn2 As New ADODB.Connection
Dim Errs2 As Errors
Dim Rs2 As New ADODB.Recordset
Dim i As Integer
Dim AccessConnect As String

AccessConnect = "Driver={Microsoft Access Driver (*.mdb)}; Dbq=bdatoscasino.mdb; DefaultDir=C:\casino"
Conn2.ConnectionString = AccessConnect
Conn2.Open AccessConnect
Rs2.CursorLocation = adUseClient
Rs2.Open "SELECT * FROM datos where fecha between fin and ffin", Conn2
DataGrid1.DataSource = Rs2

MsgBox "Finalizada la actualización", vbOKOnly, "Finalizado"
Exit Sub

End Sub

Private Sub Form_Load()
Set Rs2 = Nothing
Set Cmd2 = Nothing
Set Conn2 = Nothing
End Sub

Gracias.
Salu2


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:Crear conección adodc y enlace con datagrid

Publicado por Ariopolis (159 intervenciones) el 30/04/2001 13:22:35
Si tienes instalado el SP4 de VB prueba con:
AccessConnect = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=c:\casino\bdatoscasino.mdb"

Set DataGrid1.DataSource = Rs2

Un saludo
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