Fehler in SQL-Syntax

[Delbor]

Hi TigerLilly

Zitat:

Im Attachten Log(?) ist die HTML-Tabelle NICHT zu finden.

Genau desshalb denke ich eigentlich, dass die Tabelle gar nicht erstellt wurde. Somit kann sie auch nicht gefunden werden. Mich irritiert aber, das die Connection nicht reklamiert...

Gruss
Delbor

[TigerLilly]

Wie gesagt, gib ALLE Exceptions aus, nicht nur EDatabaseError.

[nahpets]

Der Rückgabewert der Funktion ist nur False, wenn ein Datenbankfehler geworfen wird. In anderen Fällen ist Result entweder True oder undefiniert.
(Eigentlich müsste es eine entsprechende Compilermeldung geben - Rückgabewert könnte undefiniert sein. o. ä .)

Wenn FDSQLiteConnection.ExecSQL(ASQL) ausgeführt wird und keine Exception fliegt, ist der Rückgabewert der Funktion true, unabhängig davon, ob das erwartete erledigt wurde oder nicht.

Delphi-Quellcode:

function TDMLSQLite.ExecuteSQL(ASQL : String) : Boolean;
begin
  Result := False;
  try
    FDSQLiteConnection.ExecSQL(ASQL);
    // Hier sollte man noch prüfen, ob das, was in ASQL gemacht werden
    // soll, auch wirklich gemacht wurde.
    // Bei Insert, Update und Delete findet man die Anzahl der
    // Änderungen in RowsAffected.
    // Bei 'ner Tabelle, die erstellt werden sollte, könnte man noch ein
    // select * from tabelle
    // hier ausführen und nur, wenn das erfolgreich ist folgt:
    Result := True;
  except
    on E: EDatabaseError do begin
      ShowMessage('Fehler beim Ausführen des Statements:' + #13#13 + ASQL + #13#13 + E.Message);
    end;
  end;
end;

[Delbor]

Hi zusammen

Ich hab mal folgendes versucht:

Delphi-Quellcode:

  function TDMLSQLite.ExecuteSQL(ASQL : String) : Boolean;
    var ReportList: TStringlist;
  begin
    ReportList := TStringlist.Create;
    try
    try
      FDSQLiteConnection.ExecSQL(ASQL);
      FDSQLiteConnection.GetInfoReport(ReportList);
      if FileExists('M:\SQLite-DB Corner\ContentmasterData\GetInfoReport') then
        SQLiteTestMain.Memo1.Lines.LoadFromFile('M:\SQLite-DB Corner\ContentmasterData\GetInfoReport');

      SQLiteTestMain.Memo1.Lines.Add('********************');
      SQLiteTestMain.Memo1.Lines.AddStrings(ReportList);
      SQLiteTestMain.Memo1.Lines.SaveToFile('M:\SQLite-DB Corner\ContentmasterData\GetInfoReport');
      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;
    finally
      Reportlist.Free;
    end;
  end;

Das Resultat ist im Anhang ersichtlich - zum Ziel führts leider nicht.
Ich werde mal die Sache mit dem Select testen.

[TigerLilly]

Die genaue Fehlermeldung lautet: Unknown DATABASE(!) tbl_Html.

Das heisst, die Tabelle wird angelegt, sonst hättest du eine Fehlermeldung bekommen, aber dort, wo du auf die Tabelle zugreifst ist das Problem. Dort wird der Tabellenname als Datenbankname verstanden.

Zeig mal das SQL-Statement, in dem du das erste mal auf die Tabelle zugreifen möchtest.

[Delbor]

Guten Morgen, TigerLilly

Das ist das Statement:

Delphi-Quellcode:

function TDMLSQLite.CreateIndexTbl_Html_Tbl_CSS1 :String;  // Index tbl_Html-tbl_CSS1   ContentMasterData.
  var SQLString: String;
begin
  SQLString := 'CREATE INDEX tbl_Html.fk_tbl_Html_tbl_CSS1_idx'+
               ' ON tbl_Html (tbl_CSS_idCSS)';
  Result := SQLString;
end;

Zu den auskommentierten Zeilen:
Der erste Ausdruck diente mir dazu, den Überblick beim Aufteilen des Scripts in einzelne Funktionen zu behalten
Der zweite Ausdruck: anfänglich hatte ich die DB explizit adressiert, was aber SQLite offenbar nicht akzeptiert.

Heute morgen fiel mir ein: Als ich in den letzten Tagen in der Embarcadero-Help u.a. durch die Themen zu TFDScripts blätterte, fiel mir auf, dass nach dem Aufruf von TFDScripts.executeall immer auch TFDScripts.validateall aufgerufen wurde. Dementsprechend bin ich jetzt dabei, in dieser Richtung zu recherchieren.

Gruss
Delbor

[TigerLilly]

Das sollte besser so lauten:

CREATE INDEX fk_tbl_Html_tbl_CSS1_idx ON tbl_Html (tbl_CSS_idCSS)

Siehe hier:
https://sqlite.org/lang_createindex.html

Das, was in der Grafik als Schema-Name bezeichnet wird, ist NICHT der Datenbankname.
https://sqlite.org/lang_naming.html

[Delbor]

Hi TigerLilly

Vielen Dank! Nachdem ich dies korrigiert hatte, wurde zwar noch einiges angemeckert, immer so im Stil "in der Nähe von".
Nebst zuwenigen waren dies auch zuviele Leerzeichen etc.

Gruss
Delbor

[TigerLilly]