Datum in Access DB schreiben

[Bernhard Geyer]

Zitat von DelphiManiac:

Hallo ich nutze :Microsoft.ACE.OLEDB.12.0

Wundert mich aber bei der Fehlermeldung: "ODBC-Treiber für Microsoft Access"

Zitat von DelphiManiac:

den JET Treiber bekomme ich mit den neuen Access Dateien nicht zum laufen.

JET geht nur bei MDB-Dateien, nicht beim neuen Dateiformat.

[DelphiManiac]

Hallo,

danke nochmal,

ich nehme jetzt eine MDB Access Datei und dann klappt es mit JET.
Mein Problem ist jetzt nur wie kann ich denn einen NULL Wert in den Update schreiben?

Delphi-Quellcode:

var
  qryUpdate: TADOQuery;
begin
  qryUpdate := TADOQuery.Create(Self);
  qryUpdate.Connection := ADOConnectionGeraet;
  qryUpdate.Active := false;
  qryUpdate.SQL.Text := 'UPDATE tblNSV80 set BEMERKUNG = :bemerk,' +
    'SERIALSAP= :serialsap , GEFERTIGT_AM= :gefertigt ' +
    ' where serialtube = :serialtube';
  qryUpdate.Parameters.ParamByName('bemerk').Value := edtBemerkung.Text;
  qryUpdate.Parameters.ParamByName('serialtube').Value := edtSerialTube.Text;
  qryUpdate.Parameters.ParamByName('serialsap').Value := edtSerialSAP.Text;
  if Length(edtSerialSAP.Text) > 0 then
  begin
    qryUpdate.Parameters.ParamByName('gefertigt').Value := now;
  end
  else
  begin
    qryUpdate.Parameters.ParamByName('gefertigt').Value := ????? // NULL
  end;

[Sir Rufo]

qryUpdate.Parameters.ParamByName('gefertigt').Value := NULL; Variants.NULL

[DelphiManiac]

Danke Dir!!!