Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   SQL (https://www.clubdelphi.com/foros/forumdisplay.php?f=6)
-   -   como hacer busqueda en mi bd (access) (https://www.clubdelphi.com/foros/showthread.php?t=18357)

jas010 10-02-2005 00:06:20

como hacer busqueda en mi bd (access)
 
Mis agradecimientos a todos los que sacan adelante este foro, por aclarar dudas a todos nosotros que recien nos incurcionamos en el mundo de la programacion ; ) .

como puedo hacer una consulta usando un adoquery (my bd esta en access)haciendo comparaciones desde tres edit, y hago mencion en el siguiente codigo
nombre de mis edit son:
cod_aul
aula_mod
mod_dia1

if adoquery1.SQL.text := 'SELECT cod_aul FROM presto_ WHERE cod_aul='+quotedStr(aula_mod.Text)'and hora_entrada='+quotedstr(mod_hora1.Text)'and mod_dia1='+(mod_dia1.date);

mi duda es la siguiente: si esta consulta encuentra informacion en la bd que coinciden con las tres edit que son condiciones entonces que me devuelva un showmessage mostrandome la informacion encontrada en el showmessage:confused:

saludos y gracias una vez mas:)

roman 10-02-2005 06:29:56

Luego de ejecutar la consulta prueba la propiedad EoF del AdoQuery. Si es true querrá decir que no encontró ninguna coincidencia. En caso contrario, estarás parado en el primer registro que haya cumplido las condiciones (toma en cuenta que podría haber más de un registro). Para obtener los valores de ese registro puedes usar el método FieldByName del AdoQuery:

Código Delphi [-]
ShowMessage(AdoQuery1.FieldByName('cod_aul').AsString);

Por otra parte, no deja de ser un poco rara la consulta SQL que estás haciendo. Estás seleccionando el campo `cod_aula`. Si un registro satisface las condiciones que pones, en particular satisfará la condición

'cod_aul='+quotedStr(aula_mod.Text)

de manera que necesariamente el valor de cod_aula será el que ya tienes en el edit aula_mod. En otras palabras, de antemano sabes cuál es la información encontrada ¿no?

// Saludos


La franja horaria es GMT +2. Ahora son las 08:20:30.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi