Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   realizar consulta con Like!! (https://www.clubdelphi.com/foros/showthread.php?t=74106)

ezequiel913 31-05-2011 02:00:17

realizar consulta con Like!!
 
hola gente!!!

bue el problema que tengo es el siguiente, tengo una tabla proveedores en una base de datos SQL SERVER 2000, la tabla proveedores tiene un atributo RazonSocial, y tengo que poder buscar un proveedor por razon social con la sentencia LIKE, esta sentencia LIKE usa una parametro Consulta que despues a ese parametro le asigno el edit de razon social, el codigo que yo tengo es el siguiente:


Código Delphi [-]
Query.Close;
    Query.SQL.Clear;
    Query.ParamByName('consulta').AsString:= '%'+BusProvRaz.Text+'%';
    Query.Open;

en el Query que uso en la propiedad SQL le asigno la siguiente consulta:

Código SQL [-]
Select * from Proveedores where RazonSocial Like :consulta

pero no me funciona me dice que hay un problema con el parametro, y no logro darme cuenta como puedo solucionarlo.

saludos!! desde ya muchas gracias!!

ecfisa 31-05-2011 06:17:36

Hola ezequiel913.

Pareciera que tu consulta es correcta, por lo que entiendo estás haciendo algo así:
Código Delphi [-]
  with Query do
  begin
    SQL.Clear;
    SQL.Add('SELECT * FROM PROVEEDORES');
    SQL.Add('WHERE RAZONSOCIAL LIKE :CONSULTA');
    ParamByName('CONSULTA').AsString:= '%' + BusProvRaz.Text + '%';
    Open;
  end;
De ese modo tiene que funcionar.

Por cierto... Te olvidaste de mencionar que mensaje de error te está arrojando.

Saludos.

oscarac 31-05-2011 15:48:09

algo parecido me sucedio y era que en el IDE en el componente TQuery ) en el form), debia identificar el tipo de parametro

En El object Inspector donde dice parameters,...

debes colocar el tipo de parametro (Satring, integer, float, etc)


La franja horaria es GMT +2. Ahora son las 07:14:37.

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