Standardwert bei ADO-Abfrage

[dominikkv]

Hi,

ich versuche grade über ADO auf eine Access-Datenbank zuzugreifen.

Delphi-Quellcode:

procedure TDatenbank.DiscountExists(EAN: string);
begin
  if fConnection.Connected then
    with fQuery do
      begin
        Close;
        SQL.Clear;
       // Active := False;

       // fConnection.BeginTrans;

        SQL.Add('SELECT * FROM `Products`, `Discounts` WHERE (`Discounts`.ProduktFKID = `Products`.PKID) AND (EAN = ''0123456789'')');
        try
          Open;
         // fConnection.CommitTrans;
        except
         // fConnection.RollbackTrans;
        end;
      end;
end;

Jetzt kommt nach dem Open; aber immer die Fehlermeldung

Zitat:

---------------------------
Benachrichtigung über Debugger-Exception
---------------------------
Im Projekt MeinProgramm.exe ist eine Exception der Klasse EOleException mit der Meldung 'Parameter`Discounts`.ProduktFKID hat keinen Standardwert' aufgetreten.
---------------------------
Anhalten Fortsetzen Hilfe
---------------------------

Was mache ich falsch?

mfg.Dominik