01/12/2005, 16:03
|
| | | Fecha de Ingreso: enero-2005
Mensajes: 45
Antigüedad: 19 años, 4 meses Puntos: 0 | |
| problemas con adodc
Hola
Tengo el siguiente codigo, probablemente este todo mal, pero es la primera vez que intento configurarlo, asi que el que controle del tema, que me perdone. El caso es que me da el siguiente error: variable de tipo object o la variable de bloque with no esta establecida.
Private Sub Command1_Click()
Dim i As Integer
Adodc1.Recordset.MoveFirst
While Not Adodc1.Recordset.EOF
If Adodc1.Recordset.Fields("equipo") = "sasoi eskabazioak" Then
grid1.TextMatrix(i, 0) = Adodc1.Recordset.Fields("dorsal")
grid1.TextMatrix(i, 1) = Adodc1.Recordset.Fields("nombre")
grid1.TextMatrix(i, 2) = Adodc1.Recordset.Fields("goles")
End If
i = i + 1
Adodc1.Recordset.MoveNext
Wend
End Sub
¿Alguien me puede ayudar?
Gracias de antemano. |