Registriert seit: 5. Jan 2005
Ort: Stadthagen
9.454 Beiträge
Delphi 10 Seattle Enterprise
|
AW: To_Date wird nicht erkannt
5. Okt 2011, 11:59
Delphi-Quellcode:
Query.Close;
Query.Sql.Clear;
Query.Sql.Add(' CREATE TABLE '+Tabelle+' ' );
Query.Sql.Add(' SELECT a.TEST1 Nummer, a.TEST2 IDNR, b.TEST2 IDNR2 ');
Query.Sql.Add(' FROM DATA_TEST2 a, DATA_TEST2 b ');
Query.Sql.Add(' WHERE a.IDNR= 4 ');
Query.Sql.Add(' AND b.IDNR= 5');
Query.Sql.Add(' AND a.IDNR LIKE "%'+Variable+' " ');
Query.Sql.Add(' AND a.IDNR2 = b.IDNR');
Database.StartTransaction;
try
Query.ExecSQL;
Database.Commit;
except
on E: Exception do
begin
Database.Rollback;
ShowMessage(E. Message);
end;
end;
Query.Close;
Query.SQL.Clear;
Query.SQL.Add(' SELECT * FROM '+Tabelle+' ');
Query.Open;
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ea 0a 4c 14 0d b6 3a a4 c1 c5 b9 dc 90 9d f0 e9 de 13 da 60)
|