consulta sql en adodataset

[davidgaldo]

adoquery1.close;
adoquery1.SQL.Clear;
adoquery1.SQL.Add('select * from albaranes');
adoquery1.SQL.Add('where year(fecha)=''2005'' and month(fecha)=''11''');
adoquery1.open;

Aquí teneis el código, a ver si me podeis hechar una mano.

[epuigdef]

El 2005 y el 11 (año y mes) deben estar sin las comillas, ya que son datos numéricos.


Edu

[davidgaldo]

sigue sin irme

[epuigdef]

prueba esto:

Código Delphi [-]
ADOQuery1.sql.text := 'select * from albaranes where format(fecha, '''yyyy''')=:paramanyo and format(fecha, '''MM''')=:parammes';
ADOQuery1.parameters.paramByName('paramanyo').Value := 2005
ADOQuery1.parameters.paramByName('parammes').Value := 11
ADOQuery1.open;

Edu

[davidgaldo]

si pongo solo el año va pero con el and no va.

[epuigdef]

me pasas el código tal y como lo tienes puesto? Esto ya parece un Poltergeist! Qué raro!


Edu

[davidgaldo]

adoquery1.close;
adoquery1.SQL.Add('select * from albaranes');
adoquery1.SQL.Add('where year(fecha)=2005 and month(fecha)=11');
adoquery1.open;

[Epachsoft]

Hola,

Usualmente yo lo hago asi. Disculpen la sitnaxis va a pura memoria.

Var
S : TStringList;

begin
S:= TStringList.Create;
try
S.Clear;
s.add('select * from albaranes');
s.add('from albaranes');
s.add('where year(fecha)=:year and month(fecha)=:month');
adodataset.CommandText:=S.Text;
adodataset.Parameters.ParseSQL(S.text,true);
adodataset.Parameters.ParamByName('year').value:=2005;
adodataset.parameters.parambyname('month').value:=11;
adodataset.Open;
try
// haga algo
finally
adodataset.close;
end;
finally
S.Free;
end;

Si esta usando un adoquery, yo creo que aun agregando el texto al SQL tstring, el no detecta los parametros en runtime a menos que se llame el parsesql.

Si no va a usar parametros, es mejroq que use un Format y agregue los valores de fecha como %s.