création d'une table avec un champs auto incrémenté

Question

Bonjours, je dois créer une table dans une base de données ACCESS dons un champs est auto-incrémenté, petit pb, je n'arrive pas à trouver le terme pour ca... :-(

lc'est le champs "Id" qui doit etre auto-incrémenté...

Public Function creatTableMess(nomTable As String)
    
    'déclaration des variables
    Dim requette As String
    Dim rstQuery As Recordset
    
    'requette de creation de table pour les messages
    requette = "CREATE TABLE [" & nomTable & "] ([Id] Integer --auto incrément--, [Trig] Text(3) not null, [Date] Integer not null, [Titre] Text(35) not null, [Texte1] Text(255));"
       
    'attribution d'une référence à la variable db
    Set dbBase = OpenDatabase(strDirBaseMess)
    'création de la table
    dbBase.Execute requette
    
End Function

Merci d'avance pour le coup de main... 

Ben... si j'était dieu..., ben..., je crorais pas en moi .....
Et si j'étais moi..., ben..., j'me méfirais....

janctil · Answer

Salut,
Essaie le mot clé suivant "AutoNumber", ça fonctionne chez moi... (Access 2000 - Anglais)

cs_wape · Answer

Ou éventuellement ceci :

requette = "CREATE TABLE [" & nomTable & "] ([Id] Counter, [Trig] Text(3) not null, [Date] Integer not null, [Titre] Text(35) not null, [Texte1] Text(255));"

@+

wape

manshivas · Answer

:-( :-( :-(

ca marche...., j'ai access 97 francais..

Ben... si j'était dieu..., ben..., je crorais pas en moi .....
Et si j'étais moi..., ben..., j'me méfirais....

manshivas · Answer

merci bien wape, counter marche tres bien, par contre pas auto number....

Ben... si j'était dieu..., ben..., je crorais pas en moi .....
Et si j'étais moi..., ben..., j'me méfirais....

Création d'une table avec un champs auto incrémenté

4 réponses

Discussions similaires