Zugrif Access über ADO schreiben in Tabelle

[matashen]

Hallo,

ich steh aufn Schlauch

Ich hab eine Tabelle, die nicht von mir ist.

Darin möchte ich Daten schreiben.

Das auslesen klappt, nur wenn ich einen Datensatz rein schreiben will bekomm ich eine Fehlermeldung.

Fehlermeldung:
Ein Parameterobjekt ist nicht ordnungsgemäß definirt.
Inkonsistente oder unvollständige Informationen wurden angegeben.

Ich hab aber keine Ahnung was die Fehlermeldung mir sagen will.

hier mal mein Code zum schreiben der Daten

Delphi-Quellcode:

procedure TOfenoption.Insert_Database(Profil: TProfildaten);
var a:String;
begin
a:='INSERT INTO RegistrationNumber(Barcode,Cbs1L1Set,Cbs1L2Set,,Cbs2L1Set,Cbs2L2Set,'+
    'CreationDate,CreationName,CreationPWLevel,CreationTime,I_Ready,'+
    'Intfc_ArrivedPulses_L1,Intfc_ArrivedPulses_L2,Intfc_GivenPulses_L1,'+
    'Intfc_GivenPulses_L2,Intfc_PcbDelayOff_L1,Intfc_PcbDelayOff_L2,'+
    'Intfc_PcbDelayOn_L1,Intfc_PcbDelayOn_L2,L_PrimaerIndex,ModificationDate,'+
    'ModificationName,ModificationPWLevel,ModificationTime,PBC_Length_1,'+
    'PBC_Length_2,'+
    'PcbJamPulses_L1,PcbJamPulses_L2,PcbL1Set,PcbL2Set,'+
    'PcbLength,Recipe,RegistrationNumber'+
    ')'+
    'VALUES('+Profil.Barcode+','+profil.Cbs1L1Set+','+profil.Cbs1L2Set+','+profil.Cbs2L1Set+','+profil.Cbs2L2Set+','+
      Profil.CreationDate+','+Profil.CreationName+','+Profil.CreationPWLevel+','+Profil.CreationTime+','+Profil.I_Ready+','+
      Profil.Intfc_ArrivedPulses_L1+','+Profil.Intfc_ArrivedPulses_L2+','+Profil.Intfc_GivenPulses_L1+','+
      Profil.Intfc_GivenPulses_L2+','+Profil.Intfc_PcbDelayOff_L1+','+profil.Intfc_PcbDelayOff_L2+','+
      Profil.Intfc_PcbDelayOn_L1+','+Profil.Intfc_PcbDelayOn_L2+','+Profil.L_PrimaerIndex+','+profil.ModificationDate+','+
      Profil.ModificationName+','+Profil.ModificationPWLevel+','+Profil.ModificationTime+','+Profil.PBC_Length_1+','+
      Profil.PBC_Length_2+','+
      Profil.PcbJamPulses_L1+','+Profil.PcbJamPulses_L2+','+Profil.PcbL1Set+','+Profil.PcbL2Set+','+
      Profil.PcbLength+','+Profil.Recipe+','+Profil.RegistrationNumber+')';
ADOQuery1.SQL.Text:=a;
ADOQuery1.execsql;
timer1.Enabled:=true;

end;

Bitte echte Hinweise und keine Links quer durchs Forum. Ich les jetzt schon den ganzen Tag zeugs was ich gegoogelt und in der Forenhilfe gefunden hab aber irgendwie find ich keine Lösung.