RECORDSET EN ADO
Publicado por David (3 intervenciones) el 04/06/2007 15:08:12
HOLA BUENAS.
TENGO UNA RUTINA QUE HACE LO SIGUIENTE:
Set consulta_pre = New ADODB.Recordset
consulta_pre.Open "SELECT* FROM tbl_preguntas", conn, adUseClient, adLockOptimistic
aleatoria
frm_princi.lblPregunta.Caption = consulta_pre.Fields(1).Value
Set consulta_con = New ADODB.Recordset
cadena_pre = "select * from tbl_respuestas where fld_codrespuesta like '" & consulta_pre.Fields(0).Value & "_*'"
consulta_con.Open cadena_pre, conn, adUseClient, adLockOptimistic.
LA CONSULTA LA HAGO EN UNA BASE DE DATOS ACCES.
PUES BIEN. ESA CONSULTA SI LA HAGO EN EL EDITOR DE CONSULTAS ACCES (LA SEGUNDA CONSULTA) ME DEVUELVE REGISTRO, PERO HACIENDO LA CONSULTA DESDE VISUAL NO ME DEVUELVE NADA, Y NO SE EL ERROR QUE ESTOY COMETIENDO.
HABER SI ME PODEIS AYUDAR. GRACIAS.
TENGO UNA RUTINA QUE HACE LO SIGUIENTE:
Set consulta_pre = New ADODB.Recordset
consulta_pre.Open "SELECT* FROM tbl_preguntas", conn, adUseClient, adLockOptimistic
aleatoria
frm_princi.lblPregunta.Caption = consulta_pre.Fields(1).Value
Set consulta_con = New ADODB.Recordset
cadena_pre = "select * from tbl_respuestas where fld_codrespuesta like '" & consulta_pre.Fields(0).Value & "_*'"
consulta_con.Open cadena_pre, conn, adUseClient, adLockOptimistic.
LA CONSULTA LA HAGO EN UNA BASE DE DATOS ACCES.
PUES BIEN. ESA CONSULTA SI LA HAGO EN EL EDITOR DE CONSULTAS ACCES (LA SEGUNDA CONSULTA) ME DEVUELVE REGISTRO, PERO HACIENDO LA CONSULTA DESDE VISUAL NO ME DEVUELVE NADA, Y NO SE EL ERROR QUE ESTOY COMETIENDO.
HABER SI ME PODEIS AYUDAR. GRACIAS.
Valora esta pregunta
0