Einzelnen Beitrag anzeigen

nachtstreuner

Registriert seit: 21. Aug 2005
Ort: ESA
104 Beiträge
 
Delphi XE2 Professional
 
#1

EXECSQL verursacht eine Exception bei Zugriff erneutem Zugriff auf Tabelle

  Alt 5. Mai 2011, 12:19
Datenbank: mySQL • Version: 4 • Zugriff über: ZEOS
Hallo DB Experten,

folgenden CODE für ich aus, der Datensatz wird auch korrekt in die Tabelle geschrieben:
Delphi-Quellcode:
with dataM do begin
      SQLTEXT := 'INSERT into tbl_mailtext SET TEXT = :sMAILTEXT, SUCHTEXT = :sSUBJEKT';
      zQUeryMailTExt.SQL.Clear;
      zQueryMailtext.SQL.Text := SQLTEXT;
      zQueryMailText.ParamByName('sMAILTEXT').AsString := suiMemoMailtext.Text;
      zQUeryMailText.ParamByName('sSUBJEKT').AsString := suiEditBETREFF.Text;

      zQUeryMailText.ExecSQL;

    end;
Wenn ich aber danach auf eine DBLookup Komponete zugreifen möchte erhalte ich sofort die Fehlermeldung:

Can not open Resultset !!!

Stirnrunzel

Es gibt bestimmt gutgemeinte Ratschläge hierzu. Schon mal meinen besten dank
Alles wird gut -
  Mit Zitat antworten Zitat