Hi zusammen
Neueste Fehlermeldung:
Zitat:
---------------------------
Im Projekt SQLiteTestProject.exe ist eine
Exception der Klasse ESQLiteNativeException mit der Meldung '[FireDAC][Phys][SQLite] ERROR: unknown database tbl_Html' aufgetreten.
---------------------------
Die bisher debattierte Funktion läuft nun durch (Und sollte die jetzt vemisste Tabelle erzeugen). Laut einem Journal wird sie das aber nicht. Das Journal lege ich mal bei.
Delphi-Quellcode:
if ConnectContentmasterDB then
begin
if ExecuteSQL(CreateTbl_Bld) then
if ExecuteSQL(CreateTbl_Galery) then
if ExecuteSQL(CreateTbl_Album) then
if ExecuteSQL(CreateTbl_bildtext) then
if ExecuteSQL(CreateTblCSS) then
if ExecuteSQL(CreateTblJavascript) then
if ExecuteSQL(CreateTblHtml) then
if ExecuteSQL(CreateIndexTbl_Html_Tbl_CSS1) then
Das ist die Reihenfolge der Aufrufe. Der Code läüft also durch und die Tabelle wird (scheinbar?) erzeugt. Anbei die Funktion Execute, die das
SQL-Statement ausführt
Delphi-Quellcode:
function TDMLSQLite.ExecuteSQL(ASQL : String) : Boolean;
begin
try
FDSQLiteConnection.ExecSQL(ASQL);
Result := True;
except
on E: EDatabaseError do
begin
ShowMessage('Fehler beim Ausführen des Statements:' + #13#13 + ASQL + #13#13 + E.Message);
Result := False;
end;
end;
end;
Wenn die Tabelle also nicht erzeugt wurde, hätte die Fehlermeldung angezeigt werden müsssen...
Gruss
Delbor