Hola!!!
Tengo un problema estoy jalando una base de datos en access a Visual Basic, ya hago consultas generales en un MSflexigrid y altas pero también quiero hacer consultas individuales registro por registro, y ya medio lo hago hacia adelante con movenext pero hacia atrás nadamás no puedo me dice que esa acción no esta permitida no sé si tengo que darle alguna parámetro o algo al momento de abrir la base de datos, aqui está mi código a ver si alguien me puede ayudar.
Dim conexion As ADODB.Connection
Dim cadena_SQL As String
Dim cadena_c As String
cadena_c = "DSN=Nike;uid=;pwd=;"
Set conexion = New ADODB.Connection
conexion.Open cadena_c
Set consulta = New ADODB.Command
Set consulta.ActiveConnection = conexion
cadena_SQL = "select * from Avion"
consulta.CommandText = cadena_SQL
Set res = consulta.Execute()
Botón Siguiente
Private Sub Siguiente_Click()
res.MoveNext
If res.EOF = True Then
Siguiente.Enabled = False
Else
For x = 0 To cont
Text1(x).Text = res.Fields(x)
Next
End If
End Sub
Botón Anterior
Private Sub Anterior_Click()
res.MovePrevious
If res.BOF = TrueThen
Anterior.Enabled = False
else
For x = 0 To cont
Text1(x).Text = res.Fields(x)
Next
End If
End Sub
Gracias!!
