Discussion :

[Didier100]

Dephi 7 Enterprise | Access 2000 | Win XP + SP2

Je souhaite inclure une clé Primaire auto incrémente dans une table en cours de création. La table s'appel "RENDEVOUS" et la clé primaire s'appel "RENDV_NO".

A quel endroit de mon programme doit j'intégrer l'instruction pour l'auto incrémentation ?
Comment s'appel l'instruction pour l'auto incrémentation ?

Remarque : Le composant AdoQuery1 est conncete à une base de données du type ACCESS 2000.

Voici le code actuel qui crée ma table sans " l'auto incrémentation ".

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
 
    try
      ADOQuery1.SQL.Clear;
      with ADOQuery1.SQL do
      begin
        Add('create table RENDEZVOUS(');
        Add('RENDV_NO Integer not null,');
        Add('RENDV_NO_BANQUE Integer,');
        Add('RENDV_NOM_BANQUE char(50) not null,');
        Add('RENDV_REL_DATE DateTime,');
        Add('RENDV_REL_REVEIL DateTime,');
        Add('RENDV_REL_ACTIVE YESNO,');
        Add('RENDV_REL_SUPPR YESNO,');
        Add('RENDV_REL_AGENT char(50),');
        Add('RENDV_REL_TYPE SmallInt,');
        Add('RENDV_REL_LETTRES char(50),');
        Add('RENDV_REL_MEMO char(255),');
        Add('primary key (RENDV_NO))');
      end;
      ADOQuery1.ExecSQL;
      MessageDlg('La table "RENDEZVOUS" à été crée avec succées.',mtCustom,[mbYes], 0);
    except
      MessageDlg('La table "RENDEZVOUS" na pas pu être crée!', mtWarning, [mbOK], 0);
    end;

Merci pour votre aide.

[Higgins]

A priori je dirais

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 Add('RENDV_NO Integer not null default autoincrement,');

Pour les question Access, l'idéal est le forum access

[Didier100]

Réponse à Higgins : Merci pour ton aide.

En cherchant .... et en expérimentant j'ai trouve l'instruction suivante qui fonctionne bien :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
Add('RENDV_NO integer identity,');

[heid]

n'oublies pas le tag résolu