buscar registro en control adodc
Hola a todos:
Estoy empezando a ver el control de acceso a datos ADO y no se como se busca un registro en la base de datos, con el motor jet lo buscaba con "seek" pero aqui parece no funcionar.
Agradezco vuestra colaboraci贸n.
Saludos.
Estoy empezando a ver el control de acceso a datos ADO y no se como se busca un registro en la base de datos, con el motor jet lo buscaba con "seek" pero aqui parece no funcionar.
Agradezco vuestra colaboraci贸n.
Saludos.
Mira, lo que yo hago es lo siguiente:
En la db de access en su respectiva tabla le coloco un codigo a cada registro (en este caso es busqueda de estudiantes) y de ahi hago la busqueda por codigo, lo puedes hacer de esta manera:
Private Sub cmdbuscar_Click()
AdoInscripcion.Recordset.MoveFirst
dato = InputBox("POR FAVOR, INGRESE EL C脫DIGO DEL ALUMNO:", "BUSQUEDA")
If dato = "" Then
Exit Sub
End If
AdoInscripcion.Recordset.Find ("C贸digo=" + "'" + dato + "'")
If AdoInscripcion.Recordset.EOF Then
MsgBox "EL CODIGO QUE INGRESO NO EXISTE, POR FAVOR INTENTELO DE NUEVO", 64, "AVISO"
AdoInscripcion.Recordset.MoveFirst
Exit Sub
End If
End Sub
Espero y te sirva
Saludos
En la db de access en su respectiva tabla le coloco un codigo a cada registro (en este caso es busqueda de estudiantes) y de ahi hago la busqueda por codigo, lo puedes hacer de esta manera:
Private Sub cmdbuscar_Click()
AdoInscripcion.Recordset.MoveFirst
dato = InputBox("POR FAVOR, INGRESE EL C脫DIGO DEL ALUMNO:", "BUSQUEDA")
If dato = "" Then
Exit Sub
End If
AdoInscripcion.Recordset.Find ("C贸digo=" + "'" + dato + "'")
If AdoInscripcion.Recordset.EOF Then
MsgBox "EL CODIGO QUE INGRESO NO EXISTE, POR FAVOR INTENTELO DE NUEVO", 64, "AVISO"
AdoInscripcion.Recordset.MoveFirst
Exit Sub
End If
End Sub
Espero y te sirva
Saludos
Voy a hacer las pruebas correspondientes a ver si lo adapto a lo que estoy haciendo.
Gracias y saludos.
Gracias y saludos.
Muchas gracias por la programacion de buscar, pues teniamos problemas con esta programacion, debido a que donde nosotras vivimos es muy limitada la informacion sobre programacion.
Cordialmente
Marisol Cabrera
Norma Dussan
Libano Tolima
Bueno la verdad es que no he le铆do los nombres de los que han dado soluci贸n a la b煤squeda dentro de la Base de Datos. Soy aficionado a la programaci贸n de VBASIC 6, la verdad no tengo tiempo para estudiar, pero quiero agradecer esta consulta, ten铆a dificultades con la sintaxis, pero pr谩cticamente era mi respuesta. MUCHAS GRACIAS. DIOS LE BENDIGA A TODOS. SALUDOS
