Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)
-   -   SQL guardada en BD Access 97 con paso de parametros. (https://www.clubdelphi.com/foros/showthread.php?t=40053)

setry2 06-02-2007 13:23:52

SQL guardada en BD Access 97 con paso de parametros.
 
Hola de nuevo,

Os cuento. La idea es tener una bd Access 97 con consultas en SQL guardadas en una tabla en campos memo, y tener otra tabla con los parametros para esas consultas, y poder pasarle los valores de los parametros desde el programa directamente.

Tengo una SQL metida en un campo memo de una bd Access 97. Esa SQL la voy a ejecutar sobre otra bd.

En la SQL incluyo parametros, para luego pasarselos desde el programa en Delphi 5 que estoy haciendo. Ejemplo de como paso el parametro:

'SELECT * FROM tabla WHERE Cod = :param1 or Cod = :param2'

Desde el programa hago una consulta sobre la tabla donde tengo la SQL metida y la cojo, montando una consulta dentro del programa con esa SQL:

SQL.Add(sqlQueCojoDelCampoMemo);

Aparte de la tabla donde guardo la SQL, tengo otra tabla donde guardo los parametros (con su tipo de dato y valor) asignados a esa SQL, y que utilizo para montar la consulta:

p.e.
parametro tipoDato
param1 fecha
param2 fecha

Voy añadiendo a la consulta los parametros comprobando el tipo de dato (no entro en detalle):

While not (parametrosAsociadosAConsulta).Eof then
SQL.ParamByName(parametro).TipoDAto := valorPasadoDesdeElPrograma

La ejecuto y sin problemas, pero al sacar por pantalla la consulta
Show(SQL.text)

Los parametros de la consulta no se subtituyen por los valores, aparece '?'. He probado a pasar un único parametro y ocurre lo mismo.

Bueno, es un poco liosa la explic. pero a ver si alguien sabe porque no coge los valores.

GRacias!


La franja horaria es GMT +2. Ahora son las 12:26:11.

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