problema con consulta sql

[the walrus]

hola quiero ejecutar una consulta en ms access desde la vista sql, aqui viene el problema al ejecutar la consulta no me da ningún resultado.
Probé la misma consulta desde otro gestor y funciona espero que me puedan ayudar

Código SQL [-]
SELECT *
FROM tabla
WHERE Fecha >= :MiParametro1
AND Fecha<=:MiParametro2;

[avmm2004]

Si los campos que le pasas a miparametro1 y mi parametro2 son de tipo Date debería funcionar. Otra cosa es que el rango este vacío.

[Neftali [Germán.Estévez]]

¿Puedes poner el código que estás utilizando desde Delphi?
¿Cómo pasas los parámetros?
¿No estarás haciendo un ExecSQL en lugar de un Open?

[the walrus]

Empezado por avmm2004

Si los campos que le pasas a miparametro1 y mi parametro2 son de tipo Date debería funcionar. Otra cosa es que el rango este vacío.

los parametros que le paso son tipo fecha que serian 01/01/2018 y 31/01/2018

Empezado por Neftali [Germán.Estévez]

¿Puedes poner el código que estás utilizanndo desde Delphi?
¿Cómo pasas los parámetros?
¿No estarás haciendo un ExecSQL en lugar de un Open?

lo que intento hacer es pasar la consulta anteriormente comentada a un query
en la parte de los parametros que le quiero pasar son 01/01/2018 y 31/01/2018
lo que busco hacer es borrar registros que cumplan con un rango de fecha este es mi codigo

Código Delphi [-]
begin
query.close;
query.sql.clear;
query.SQL.Add('delete from tabla where (fecha BETWEEN :fecha1 AND :fecha2 ');
query.Parameters.ParamByName('fecha1').DataType := ftdate;
query.Parameters.ParamByName('fecha1').Value := Datetimepicker1.Date;
query.Parameters.ParamByName('fecha2').DataType := ftdate;
query.Parameters.ParamByName('fecha2').Value := Datetimepicker1.Date;
query.open;
query.ExecSQL;
end;

[Casimiro Notevi]

query.open;  //   <---- Eso no vale.
query.ExecSQL;

Open cuando es select

[Neftali [Germán.Estévez]]

No puedes poner Open y ExecSQL a la vez, no tiene sentido.

OPEN: Cuando quieres recuperar datos de una consulta (SELECT).
EXECSQL: cuando quieres ejecutar un comando (INSERT/DELETE/UPDATE).

En este caso y al ponerlos los 2, seguramente te está cogiendo el último (EXECSQL) y por eso no te trae registros.

[the walrus]

si, ya borre el open pero todavía tengo el problema de la consulta

[Casimiro Notevi]

Pues puede ser que no tengas registros con esos parámetros.

[the walrus]

es imposible es mas te comento que probé con otras fechas

[Casimiro Notevi]

Hay básicamente 3 condiciones, que la consulta sea correcta, que los parámetros sean correctos, y que existan registros que cumplan con esos parámetros.
Si se cumplen las 3 condiciones, debe retornar esos datos.
Si no devuelve nada es que falla una de las 3. No hay más.

[Neftali [Germán.Estévez]]

Empezado por the walrus

si, ya borre el open pero todavía tengo el problema de la consulta

No entiendo...
Primero has puesto un SELECT. Para eso tienes que usar el OPEN.
Luego has puesto un DELETE, para esa debes utilizar el EXECSQL.

Ahora no entiendo lo que no te está funcionando.

[the walrus]

sigue sin funcionar

Código Delphi [-]
begin
query.Close;
query.SQL.Clear;
query.SQL.Text:=(' delete  from tabla where fecha BETWEEN :fecha1 AND :fecha2 ');
query.Parameters.ParamByName('fecha1').DataType := ftdate;
query.Parameters.ParamByName('fecha1').Value := Datetimepicker1.Date;
queryParameters.ParamByName('fecha2').DataType := ftdate;
query.Parameters.ParamByName('fecha2').Value := Datetimepicker1.Date;
query.ExecSQL;
end;

[Casimiro Notevi]

Empezado por the walrus

sigue sin funcionar

¿Crees que con esa información tan escueta podemos ayudarte?
Es como si te digo: "la moto sigue sin andar".
¿Qué me contestarías?

[Neftali [Germán.Estévez]]

Empezado por the walrus

sigue sin funcionar

¿Error?
¿No borra nada?
¿Borra lo que no debería?
Lo dicho por [Casimiro]...


Estás utilizando en las 2 fechas/parámetros el mismo componente. No se si es correcto.

[identsoft]

Por decir algo:
prueba

Código Delphi [-]
query.Parameters.ParamByName('fecha1').Value := Trunc(Datetimepicker1.Date); 
.. 
query.Parameters.ParamByName('fecha2').Value := Trunc(Datetimepicker1.Date);

[the walrus]

Empezado por Neftali [Germán.Estévez]

¿Error?
¿No borra nada?
¿Borra lo que no debería?
Lo dicho por [Casimiro]...


Estás utilizando en las 2 fechas/parámetros el mismo componente. No se si es correcto.

ahora que lo veo es cierto

Empezado por identsoft

Por decir algo:
prueba

Código Delphi [-]
query.Parameters.ParamByName('fecha1').Value := Trunc(Datetimepicker1.Date); 
.. 
query.Parameters.ParamByName('fecha2').Value := Trunc(Datetimepicker1.Date);

ahora si funciono , tengo otro pequeño problema cuando elimino los registros la grilla se queda en blanco pero cuando ejecuto el programa por segunda vez esta todo normal

[Casimiro Notevi]

Empezado por the walrus

ahora que lo veo es cierto
ahora si funciono , tengo otro pequeño problema cuando elimino los registros la grilla se queda en blanco pero cuando ejecuto el programa por segunda vez esta todo normal

La otra guía de estilo.

[Neftali [Germán.Estévez]]

Empezado por the walrus

elimino los registros la grilla se queda en blanco pero cuando ejecuto el programa por segunda vez esta todo normal

¿Que esté todo normal es bueno, no?
Suscribo lo que ha dicho [Casimiro]

[the walrus]

Empezado por Neftali [Germán.Estévez]

¿Que esté todo normal es bueno, no?
Suscribo lo que ha dicho [Casimiro]

no me exprese del todo bien
cuando elimino los registros la grilla me queda como esta en la foto, lo que no me muestran son el resto de los registros

[Casimiro Notevi]

Que no somos adivinos, que pongas el código.