Einzelnen Beitrag anzeigen

Jumpy

Registriert seit: 9. Dez 2010
Ort: Mönchengladbach
1.733 Beiträge
 
Delphi 6 Enterprise
 
#2

AW: Prüfen ob Tabelle existiert

  Alt 13. Sep 2011, 14:29
sowas vllt.:

Delphi-Quellcode:
function table_exists(tabelle:String):Boolean
//...
Query1.sql.clear;
Query1.sql.add('SELECT COUNT( * ) FROM sysobjects WHERE name = "'+tabelle+'"');
Query1.Open;
Result:=Query1.Active and (Query1.RecordCount>0);
Ralph
  Mit Zitat antworten Zitat