Discussion :

[bb62]

Bonjour à tous,

Dans une base Access, j'ai une table1 avec un code1 qui est un numero automatique.

J'aimerai à partir de Visual Basic 6.0 ajouter un numero à code1: par exemple si le code1 etait 1 j'aimerai rajouter + 1 pour avoir 2 car c'est un nouvel enregistrement. Mais peut-on faire cela avec un numero automatique?

Merci d'avance.

[Pierre Fauconnier]

A mon avis, il n'est pas possible de numéroter un numautomatique. Ce serait illogique de pouvoir le faire.

Lorsque tu vas ajouter un nouvel enregistrement, le numéro automatique sera... automatiquement... incrémenté...

Pierre Fauconnier

EDIT=> Il est en fait tout à fait possible de forcer une numérotation automatique... J'ai donc dit une ânerie...

Code :

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

1
2
 
insert into table1 (Recordtag) values(54)

dans une table1 pourvue d'un champ Recordtag autonuméroté fonctionnera, avec les restrictions éventuelles d'une clé primaire ou d'un index sans doublons...

Voilà qui devait être précisé

[bb62]

En fait dans ma table1, j'ai qu'un seul champ "code1".

J'ai fais ceci avec un recordset et cela marche :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
Dim rstMainCourante As New ADODB.Recordset
 
With rstMainCourante
.ActiveConnection = connexion
.CursorType = adOpenDynamic
.LockType = adLockOptimistic
.Open "table1"
.AddNew
.Update
.Close
End With

Mais je trouve que c'est assez bizzard.

Si quelqu'un a une autre solution, il peut me l'expliquer.

Merci d'avance.

[ThierryAIM]

Mais je trouve que c'est assez bizzard.

et pourquoi donc, puisqu'un numero automatique est justement fait pour ça
A condition que le curseur du recordset soit coté serveur (ce qui est ton cas, puique c'est la valeur par défaut de CursorLocation)