Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)
-   -   Consulta en Access (https://www.clubdelphi.com/foros/showthread.php?t=54817)

perillan 31-03-2008 21:30:48

Consulta en Access
 
ReportTransmiDestino.ADOquery1.Active := False;
ReportTransmiDestino.ADODataSet1.Active :=False;

ReportTransmiDestino.ADOquery1.SQL[1] := 'WHERE ' + VISTO + ' = :valor AND ' +ComboBox1.Items[ComboBox1.ItemIndex] + ' = >= :valor1';
ReportTransmiDestino.ADOquery1.ParamETERS[0].VALUE :='TRANSMISIONES';
ReportTransmiDestino.ADOquery1.ParamETERS[1].VALUE :='1'; //

Buenas tardes: Este código lo tengo en una consulta que no me da los resultados esperados. Es una base datos Access relacionada con otra y el resultada que espero de la consulta es que me saque el listado de todos los datos de de la maestro y si tiene datos en la relacionada los muestre.

VISTO = Variable con el nombre del campo a buscar en la maestro
ComboBox1 = Nombre del campo de la segunda secuencia de búsqueda y que se introduce en un combo.
TRANSMISIONES= Valor a buscar dentro del campo guardado en VISTO.
>=:valor1 = El resultado del campo (ComboBox1) si es mayor a 1.

Un saludo.

Caral 31-03-2008 21:39:03

Hola
Esta un poco extraña la consulta, pero:
Código Delphi [-]
ReportTransmiDestino.ADOquery1.Active := False;
ReportTransmiDestino.ADODataSet1.Active :=False;

ReportTransmiDestino.ADOquery1.SQL[1] := 'WHERE ' + VISTO + ' = :valor AND ' +ComboBox1.Items[ComboBox1.ItemIndex] + ' >= :valor1';
ReportTransmiDestino.ADOquery1.ParamETERS[0].VALUE :='TRANSMISIONES';
ReportTransmiDestino.ADOquery1.ParamETERS[1].VALUE :='1'; //
Raro, muy raro.
Saludos

perillan 01-04-2008 13:44:57

Gracias Caral, esto ya funciona bien.
Un saludo


La franja horaria es GMT +2. Ahora son las 13:08:41.

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