EXECSQL verursacht eine Exception bei Zugriff erneutem Zugriff auf Tabelle

[nachtstreuner]

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