Consulta select con %

[edelphi]

Compañeros regrese a preguntar por que ahora el problemita esta un poquito mas dificil

se trata de que el campo con el cual quiero hacer la consulta se pase desde una variable algo asi

Código Delphi [-]
filtro:='Select * from agenda where '''+lowercase(campo)+''' like '''+TXTbusca.text+'%'+'''';

donde campo es el campo que esta convirtiendose a minusculas y TXTbusca es el valor cone el cual se compara para hacer la consulta

esta consulta no me corre no se por que de seguro la posicion de los apostrofes esta mal por favor diganme como es la posicion correcta

[[maeyanes]]

El problema es que el nombre de los campos no debe ir entre comillado...

Código Delphi [-]
filtro := 'Select * from agenda where ' + lowercase(campo) + ' like ''' + TXTbusca.text + '%''';

Ahora también podrías usar:

Código Delphi [-]
Filtro := Format('select * from agenda where %s like ''%s%%''', [lowercase(campo), TXTBusca.Text]);

Saludos...

[edelphi]

amigo maeyanes probe los dos codigos que me mandaste pero ninguno me funciono me manda un mensaje de error diciendo error en sintaxis, por si acaso pueda servir estoy trabajando con mysql 5 y delphi 7 la conexion ado y bueno el problema mas que todo es al momento de mandar el campo por que si lo escribo de frente si me funciona de maravillas.

Espero les sirva el comentario para que me ayuden con mi problema gracias

[pborges36]

asi es como deberia funcionar:

Código Delphi [-]
filtro := 'Select * from agenda where ' + lowercase(campo) + ' like '" + TXTbusca.text + '%"';
 
ADOQ.SQL.Text:=filtro;

[ContraVeneno]

no creo que funcione, por la forma en que estan las comillas.

[[Ivanzinho]]

Código Delphi [-]
filtro := 'Select * from agenda where ' + lowercase(campo) + ' like ' + QuotedStr(TXTbusca.text + '%');
ADOQ.SQL.Text:=filtro;

[pborges36]

Empezado por pborges36

asi es como deberia funcionar:


Código Delphi [-]
filtro := 'Select * from agenda where ' + lowercase(campo) + ' like '" + TXTbusca.text + '%"';

ADOQ.SQL.Text:=filtro;

Es verdad, eso es lo que queria escribir:

Código Delphi [-]
filtro := 'Select * from agenda where ' + lowercase(campo) + ' like "' + TXTbusca.text + '%"';
 
ADOQ.SQL.Text:=filtro;

[[Lepe]]

Pues creo que se ha colado un error por ahí. Imaginemos que el campo en la base de datos se llama NOMBRE (escrito en mayúsculas).

Lowercase es una función de delphi, por tanto, la sql final sería:

Código SQL [-]
Select * from agenda where nombre  like 'pepe%'

Lo que ha hecho lowercase es pasar a minúsculas el nombre del campo, pero eso es lo de menos, SQL no es sensible a mayúsculas y minúsculas, así que... ni siquiera tiene sentido hacer el "Lowercase(campo)".

Si un cliente se llama PEPE (en mayúsculas) no será capaz de encontrarlo.

Lo que debemos usar es "Lower", función propia de SQL
La consulta debe ser:

Código Delphi [-]
query1.sql.text:= 'Select * from agenda where Lower(' + campo+ ')  like ' +QuotedStr(TXTbusca.text + '%');

El SQL de un ejemplo quedará:

Código SQL [-]
Select * from agenda where lower(nombre)  like 'pepe%'

Para que ahora si, por cada registro que encuentra, primero pasa a minúsculas el nombre del cliente y después lo compara con "like pepe% " dando las coincidencias que buscamos.

Saludos

[edelphi]

holas una consulta lo que deseo es hacer un query algo as masomenos

Código Delphi [-]
  MD.ADOfut.SQL.Text:='Select * from Futs where Fecha like'''+DateToStr(DateTimePicker1.date)+'and IDfut'''+Edit1.text+'''';

se trata de una consulta doble en la cual selecciono los campos escogidos en una fech y por un IDfut escrito en el edit1

espero me puedan ayudar

[ContraVeneno]

Código Delphi [-]
With MD.ADOfut do begin
 if active then close;
 SQL.Clear;
 SQL.Add('Select *');
 SQl.Add('From Futs');
 SQL.Add('where fecha = :Fecha');
 SQL.Add('and IDFut= :IDFut');
 Parameters.ParamByname('Fecha').AsDateTime:=DateTimePicker1.DateTime;
 Parameters.ParamByName('IDFut').AsString:=Edit1.Text;
 Open;
 .....
 ....
end; //with

[[Lepe]]

Empezado por edelphi

esta consulta no me corre no se por que de seguro la posicion de los apostrofes esta mal por favor diganme como es la posicion correcta

¿Veís? ¿veís? por eso es mejor usar QuotedStr

No he podido resistirme

Saludos