consulta con like

[*Caro*]

Hola ramphi, como te dice Roman desde Access si funciona con * pero desde delphi tienes que hacerlo con %, por lo que veo tu error estaba en el campo que le pasas como parametro ya que no tiene que ser con comillas.

Empezado por ramphi

consulta:= 'SELECt * FROM tesis WHERE ' + quotedstr(combobox1.text)+' LIKE '+ quotedstr('%'+edit1.Text+'%');

Tu consulta debería quedar así:

Código Delphi [-]
  consulta:= 'SELECt * FROM tesis WHERE '+combobox1.text+' LIKE '+QuotedStr('%'+edit1.Text+'%');
  datamodule2.ADOQuery1.Close;
  datamodule2.ADOQuery1.SQL.Clear;//No te olvides limpiar 
  datamodule2.ADOQuery1.SQL.Add(consulta);
  datamodule2.ADOQuery1.Open;

Saluditos

[ramphi]

Empezado por Caro

Hola ramphi, como te dice Roman desde Access si funciona con * pero desde delphi tienes que hacerlo con %, por lo que veo tu error estaba en el campo que le pasas como parametro ya que no tiene que ser con comillas.



Tu consulta debería quedar así:

Código Delphi [-] consulta:= 'SELECt * FROM tesis WHERE '+combobox1.text+' LIKE '+QuotedStr('%'+edit1.Text+'%'); datamodule2.ADOQuery1.Close; datamodule2.ADOQuery1.SQL.Clear;//No te olvides limpiar datamodule2.ADOQuery1.SQL.Add(consulta); datamodule2.ADOQuery1.Open;


Saluditos

pues corregi eso y me dice que hoy error en syntaxis

y cuando quito los dos quotedstr() me da error de "falta operador"

salu2

[[Lepe]]

y ahora llega el novato de access diciendo.... ¿no era con comillas dobles? usea:

Código SQL [-]
SELECT * FROM tesis WHERE campo LIKE "%MARIA%"

Código Delphi [-]
consulta:= 'SELECt * FROM tesis WHERE ' + quotedstr(combobox1.text)+' LIKE "%' + edit1.Text+'%"';

saluditos.

[ramphi]

Empezado por Lepe

y ahora llega el novato de access diciendo.... ¿no era con comillas dobles? usea:

Código SQL [-]SELECT * FROM tesis WHERE campo LIKE "%MARIA%"



Código Delphi [-]consulta:= 'SELECt * FROM tesis WHERE ' + quotedstr(combobox1.text)+' LIKE "%' + edit1.Text+'%"';


saluditos.

bueno de esta forma no me da error pero no pasa nada, en la dbgird siguen los mismo datos y le agrego un refresh y nada, hay algo mas que agregar??

Código Delphi [-]
 procedure TForm1.Button1Click(Sender: TObject);
VAR consulta: string;
begin consulta:= 'SELECt * FROM tesis WHERE '+quotedstr(combobox1.Text)+' LIKE "'+edit1.Text+'%"';
datamodule2.ADOQuery1.Close;
datamodule2.ADOQuery1.SQL.Clear;
datamodule2.ADOQuery1.SQL.Add(consulta);
datamodule2.ADOQuery1.Open;
dbgrid1.Refresh;
end;

[[Lepe]]

Pues la verdad, deberías ver algún resultado o ver el grid vacio. Pregunta obligada: ¿seguro que el dbgrid está asociado al mismo adoquery? (un error tonto es muy común en estos casos)

en la base de datos, "maria" estará escrita en mayúsculas ¿verdad?, y sin tilde ¿siii?

para las mayúsculas puedes usar:

Código SQL [-]
select * from tabla where Upper(campo) like "%MARIA%"

Saludos

[*Caro*]

Hola, yo siempre lo hice comilla simple y me ha funcionado acabo de hacer la prueba con comilla doble y también funciona. A parte de lo que te dice el amigo Lepe debes quitar el QuotedStr de tu campo.

Código Delphi [-]
 consulta:= 'SELECt * FROM tesis WHERE '+quotedstr(combobox1.Text)+' LIKE "'+edit1.Text+'%"';

Saluditos

[ramphi]

gracias ya pude resolver el problema, habia una mala conexion con el query y las comillas del campo,

salu2