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)
-   -   Buscar un registro en una tablaAdo (https://www.clubdelphi.com/foros/showthread.php?t=15025)

Telemaco 07-10-2004 17:55:49

Buscar un registro en una tablaAdo
 
Estoy trabajando con SQL Server 2000, y tengo una tabla Ado, necesito poder localizar un registro que el usuario me soliciata a traves de un edit, he pensado en hacer una consulta como esta:

select *
from tabla
where campo1 like 'aqui ira el valor de usuario'

mi duda es como pasar el parametro? alguien podria ayudarme.

Gracias.

tcp_ip_es 07-10-2004 18:00:17

Tu consulta quedaría asi:

Código SQL [-]
select * 
from tabla
where campo1 like :parametro

y el parámetro se lo pasarías tal que asi:

Código Delphi [-]
Query.ParamByName('parametro').Asstring := '%' + variable + '%';

Saludos, Tony

Telemaco 08-10-2004 08:40:42

El problema es que trabajo con tablas ADO y no me permite utilizar en ParamByName de tipo AsString, y si lo pongo con Value no puedo utilizar el like en el sql, sabrias como hacerlo con ADO??

de todas formas gracias por tu respuesta.

Cita:

Empezado por tcp_ip_es
Tu consulta quedaría asi:

Código SQL [-]
select * 
 from tabla
 where campo1 like :parametro

y el parámetro se lo pasarías tal que asi:

Código Delphi [-]
 Query.ParamByName('parametro').Asstring := '%' + variable + '%';

Saludos, Tony


Telemaco 08-10-2004 09:24:19

Ya he conseguido poner los datos en el parametro
Código:

  variable:=  Enum.Text;
  dm.Datos.ADOQuery1.Parameters.ParamByName('param').value := '%' + variable + '%';
  dm.Datos.adoquery1.open;
  dm.Datos.ADOQuery1.First;

ahora lo que quisiera es posicionarme en el registro y mostrarlo en los edits que tengo el el form, y que actuan de maestro de un grid que me muestra los datos asociados a ese regisro. ¿como puedo hacerlo?

gracias.


La franja horaria es GMT +2. Ahora son las 02:12:10.

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