[VB6] Ajouter numero à champ table qui est en numautomatique

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.

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:

---

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é

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

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

Code:

---

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.

Citation:

---

Envoyé par bb62

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)