Deletar todas as datas menores que 60 dias en paradox
28/11/2005
0
Preciso deletar todas as datas menores que 60 dias em paradox ,
gostaria de fazer direto na querie
algo tipo assim :
where data < ( now - 60 days )
gostaria de fazer direto na querie
algo tipo assim :
where data < ( now - 60 days )
Demostenesjr
Curtir tópico
+ 0
Responder
Posts
28/11/2005
Okama
Var
Data: TDate;
begin
Data := IncDay( Now, -60 );
SQL.Text := ´Delete TABELA where Campo_Data <= ´+
QuotedStr( FormatDateTime( ´mm/dd/yyyy´, Data ) );
Responder
14/02/2007
Juarezber
Na minha tabela não deu certo. De onde vem o SQL.Text?
Abraços
Juarez
Abraços
Juarez
Responder
15/02/2007
Juarezber
Ja descobri.
var SQL: String;
Data: TDate;
Data_string: String;
begin
Query1.Close;
Query1.Sql.Clear;
Data:= IncDay(Date(), -1);
Data_string:= FormatDateTime(´mm/dd/yyyy´, Data);
SQL:= ´DELETE FROM Paradas WHERE data < ´´´ + Data_string + ´´´´;
Query1.SQL.Add(SQL);
Query1.ExecSQL;
Table1.Open;
end;
var SQL: String;
Data: TDate;
Data_string: String;
begin
Query1.Close;
Query1.Sql.Clear;
Data:= IncDay(Date(), -1);
Data_string:= FormatDateTime(´mm/dd/yyyy´, Data);
SQL:= ´DELETE FROM Paradas WHERE data < ´´´ + Data_string + ´´´´;
Query1.SQL.Add(SQL);
Query1.ExecSQL;
Table1.Open;
end;
Responder
Clique aqui para fazer login e interagir na Comunidade :)
