Fórum Parâmetro Data em ADOQuery. #230342
06/05/2004
0
D4rk Schn31d3r
Curtir tópico
+ 0Posts
06/05/2004
Edineidaniel
tenho outra forma de passar parâmetros para um Query ou IBQuery:
//Consultar períodos reservados, para este objeto, nesta data;
With DmManCR01.IBQryRes Do
Begin
Close;
SQL.Clear;
Sql.Add(´ Select t02.vrcNomUsu, t03.vrcDesPer, t04.vrcDesDst, t01.vrcStaRes ´);
Sql.Add(´ From TbResPer t01 ´);
Sql.Add(´ Where t01.intCodObj = :p01 and ´);
Sql.Add(´ t01.dteDtrRes = :p02 and ´);
Sql.Add(´ Order By t03.vrcDesPer ´);
Params[00].AsInteger := RxDBLkpCmbintCodObj.KeyValue;
Params[01].AsDate := DtEdtdteDtrRes.Date;
Open;
End;
Nunca tive problemas...
t+
Edinei
Gostei + 0
06/05/2004
D4rk Schn31d3r
Gostei + 0
07/05/2004
Aroldo Zanela
Eu nunca precisei alterar os tipos de dados usandos os componentes ADO, apenas utilizo o FormateDateTime para passar os parâmetros, quando necessário.
Gostei + 0
07/05/2004
D4rk Schn31d3r
frmDm.qryConsMov.Close; frmDm.qryConsMov.Parameters.ParamByName(´prmDatInic´).Value := StrToDate(edtDatInic.Text); frmDm.qryConsMov.Parameters.ParamByName(´prmDatFin´).Value := StrToDate(edtDatFin.Text); frmDm.qryConsMov.Open;
Na query do BDE, conseguia definir .AsDate ao invés de .Value, será q isso tem algo a ver?
Gostei + 0
07/05/2004
Comodelphi
Nunca falha.
Gostei + 0
07/05/2004
D4rk Schn31d3r
Gostei + 0
07/05/2004
Comodelphi
Quando é string:
qryCliente.ParamByName(´Nome´).Value := QuotedStr(ValorStr);
Quando é inteiro:
qryCliente.ParamByName(´Nome´).Value := ValorInt;
e na query não precisa usar nenhuma função para converter e nem mudar o tipo do parametro
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)