Discussion :

[thomas.dusart]

Bonjour,

je souhaire incrémenter dans ma base de données Access un numéro automatique qui soit de la forme suivante:

"S" & année en cours& "_" &numéro incrémenté(0001,0002....)

Le principe est que lorsque l'on réalise une nouvelle réservation via un formulaire, ce numéro automatique vient s'incrémenter automatiquement ds une table comportant d'autres champs.

Comment est-il possible d'arriver à cela?

Cordialement.

Thomas DUSART

[hajeahmad]

bonjour
essaie cette solution

Code :

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

1
2
3
 
Control_ini = "0002"
Control_new = "S" & Year(Date) & "_" & Format([Control_ini] + 1, "0000")

Control_new = S2010_0003

ahmad

[thomas.dusart]

Merci.

Mais le problème c que j'aimerai que le contrôle_ini soit le résultat d'une requête.

C'est possible?

[hajeahmad]

bonjour,

je ne suis pas sur d'avoir bien compris mais une piste possible
-si par requete tu entend variable ca ne pose pas probleme
-et si control_ini= S2010_0002
avec la fonction
control_ini = right(control_ini,4) tu isoles 0002
ensuite tu incremente ton controle dans control_new
??

ahmad

[thomas.dusart]

Non en fait j'ai fait une requête à partir d'une table, dans lequel j'ai stocker le numéro 0001 par exemple.

Et je voudrai que ce 0001 soit stocker dans ce formulaire. Sachant que ce formulaire ne contient pas en source la requête.

Voila.

Cordialement.

[Jeannot45]

Peut-être en regardant du coté de la
Comment créer son propre numéro automatique

Bonne continuation

[Alain36]

Bonjour,

Ton numéro automatique est le champ d'une table n'est-ca pas ?

Control_ini = "0002"
Control_new = "S" & Year(Date) & "_" & Format([Control_ini] + 1, "0000")

Ceci est un bon départ, mais le problème est déterminer la valeur de Control_Ini, c'est à dire la dernière valeur attribuée au numéro automatique. Tu peux essayer quelque chose du genre :

Code :

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

Control_Ini = DMax("Right$(TonChampNuméroté,4)","TaTable")

[thomas.dusart]

J'ai réussi à incrémenter le numéro dans le formulaire à l'aide d'une requête.

Le problème est que je travaille sur plusieurs postes en même temps.

Quand deux personnes ouvrent le formulaire en même temps, ce numéro ne s'actualise pas ce qui donne une erreur car le deuxième enregistrement ne se fait pas.

Plusieurs personnes seront amenés à réaliser une réservation en même temps et le numéro doit s'actualiser.

Quel est le moyen d'y arriver?

Cdt.

Thomas DUSART

[Alain36]

Il peut y avoir conflit s'il s'écoule "un certain temps" entre la détermination de ton nouveau numéro et la création effective de ton enregistrement. Un autre opérateur a le temps de créer un nouveau numéro égal au tien. Au moment de la création de l'enregistrement, comme ton champ numéro est sûrement une clé primaire, alors Boum !!!

Je te suggère de créer l'enregistrement dès que ton nouveau numéro est calculé avec un truc du genre :

Code :

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

1
2
3
4
DoCmd.SetWarnings False
DoCmd.RunSQL "INSERT INTO TaTable (TonChampNuméroté) VALUES ('" & ControlNew & "');"
DoCmd.SetWarnings True

où l'on suppose que la nouvelle valeur du numéro se trouve dans la variable ControlNew

Ensuite, il ne te reste plus qu'à ouvrir ton formulaire sur ce numéro :

Code :

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

1
2
DoCmd.OpenForm "TonFormulaire", , , "[TonChampNuméroté]='" & ControlNew & "'"

Ainsi un autre opérateur n'a quasiment pas le temps de créer un numéro égal au tien.