CB6 :TADOQuery +enregistrement dans une base ACCESS 2003

Bonjour
j'essaie d'ajouter un enregistrement dans ma table "Commune"

voici le code

Code:
bool __fastcall TDataEtik2::AddDatasToCommune(const AnsiString &
Commune,
const AnsiString & CodePostal)
{
bool Res= false;

if(_IsConnected){

try{

ADOConnect->BeginTrans(); //TADOConnection

AnsiString SQL="INSERT INTO Commune VALUES (:Commune,:CodePostal);";


ADOQuery->SQL->Clear();
ADOQuery->SQL->Add(SQL);


ADOQuery->Parameters->ParamByName("Commune")->Value=Commune;

ADOQuery->Parameters->ParamByName("CodePostal")->Value=CodePostal;

ADOQuery->ExecSQL();

ADOConnect->CommitTrans();
Res=true;


}catch(...){

ADOConnect->RollbackTrans();

}

}

return Res;
}



BCB me dit en execution :

---------------------------
Notification d'une exception du débogueur
---------------------------
Le projet EtikII.exe a provoqué une classe d'exception EOleException avec le
message 'Le nombre de valeurs de la requête doit coïncider avec le nombre de
champs destination'. Processus stoppé. Utilisez Pas-à-pas ou Exécuter pour
continuer.
---------------------------
OK Aide
---------------------------


Avez vous un idee
je ne voie pas du tout ;.....

ps: j'ai essaye de renommer le champ paramatre "Commune" en "Comm"
mais j'ai le meme probleme.

Outils CB6 pro +Win XP Sp1 +SGBD Access 2003
merci par avance
_________________
Cordialement,
Sarda Olivier
_________________________________


begin 666 icon_question.gif
M1TE&.#EA#P`/`,0:`$5%1?_J`/_.`/_)`/Z=`/^T`/_]$__^D^_;`']U````
M`-_-`/__Q\^^``\.`+^O`/_E`"\K`)^2`/__ZQ\<`%]7`-^P`.^\`+^7`&]F
M`````````````````````````"'Y! $``!H`+ `````/``\```5UH":*0%F.
MJ%9.S'$()PJPAA'<`@&,0&LLDHH$$<CM5 <#PD%)4!2+XJYG2T #RTQ@H ,D
ML8U;0Y'8%DJ'F[KAB! '9X!-'6@3S24!_:%XW"!<4WIB"5%;,"0"`A !5@^
71CR*`Q88%P.1,@`%G 5=*3PF1R,A`#L`
`
end

begin 666 icon_sad.gif
M1TE&.#EA#P`/`+,,`/_J`$5%10```/_.`/_)`/Z=`/^T`/_^D__]$___Q__E
M`/__ZP```````````````"'Y! $```P`+ `````/``\```18D$D9:IV8U97.
M&1<6< @"G$,13$$GG+"0KMKQPC&H)29P^R>"*G#H_6X$0^6 :P*2E9XSJ P,
DIB>%<&4]";[?ITXS&/P`"IF*52:XW;-,Q4 W##,L"VT2`0`[
`
end