Discussion :

[crashyear]

Bonjour a tous,
Je voudrais faire une focntion capable de me générer un identifiant de ma table. Mes identifiants seront 1,2,3,4,5, etc...
Je fais un test avant d'aplé mon code pour voir si ma requete retourne quelquechose pour verifier qu'il y a bien quelquechose dans ma table, avant de lancer ma fonction.
Mais j'ai un soucis lorsque j'execute mon code, l'identifiant 2 est généré puis le 3 mais après ca s'arete la et il me relande 3 donc ca plante puisqu'on ne peut pas avoir 2 identifiants identique.
Quelqu'un voit mon erreur?

Voici le code :

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
Public Function get_id(recordset, nomchamp As String) As Integer
 
  'mes variables
  Dim bool As Boolean
  'MsgBox ("le premier id est : " & nomchamp)
  MsgBox ("nombre d'enregistrement est : " & recordset.RecordCount)
  'recordset.MoveLast
  recordset.MoveFirst
  'récupération du premier identifiant
  get_id = nomchamp
  get_id = get_id + 1
  recordset.MoveNext
  '---parourir le recordset
  Do While recordset.EOF = False and bool = False
    If get_id = nomchamp Then
      get_id = nomchamp + 1
    Else
      get_id = get_id + 1
      bool = True
    End If
    recordset.MoveNext
  Loop
End Function

[AlainTech]

1. Veuillez mettre un titre qui décrive votre problème!

2. Veuillez utiliser les balises code.

Edit--> 3. Veuillez indiquer votre environnement de développement.

Merci

[DarkVader]

SVP
Veuillez éditer votre titre afin qu'il soit clair et précis
ainsi que le contenu de votre post (absence de balises de code)
afin de vous conformer aux régles d'utilisation des forums.

Prière de lire les régles d'utilisation avant de poster.

Merci

[ThierryAIM]

et profitez-en pour supprimer toutes ces lignes vides qui ne servent à rien

[Megaxel]

C'est vrai, quoi, c'est illisible! On n'est pas payé pour faire ce boulot, alors si tu veux qu'on t'aide, il faut y mettre du tien.
Sinon, j'ai l'impression que tu fais une requête qui te ramène le contenu de ta base, et qu'après tu parcours ce recordset pour trouver ton prochain identifiant libre. Si c'est ça, Aïe, aïe, aïe, bonjour la consommation de ressources...
Pourquoi ne fais-tu pas simplement un

Code :

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

SELECT Max(Identifiant) FROM MaTable

Puis tu rajoutes 1, et le tour est joué.
Non?

[ouskel'n'or]

Pour mettre les balises Code et /Code, tu sélectionnes ton code et tu fais un clic sur code - en haut de la fenêtre. Pas compliqué et tellement plus agréable pour ceux qui te lisent.
A+

[ThierryAIM]

Les balises de code et le titre, c'est pas encore cà

[crashyear]

Oui je sais j'ai déjà pensé à ca si je trouve pas c'est ce que je ferais.
Mais moi lorsque je fais un ajout je veux verifier si il n'y a pas d'identifiant qui manque exemple 1,2,4 je veux pouvoir mettre 3.

[Megaxel]

Je vois: tu fais des économies sur quelques pauvres petits trous dans ta séquence, mais ça ne t'embête pas de faire une requête qui te ramène un gros RecordSet...
Hum... Enfin, bon, pourquoi pas...
Mais ensuite, j'ai lu ton code, et je ne vois pas en quoi il va te permettre de boucher les trous. En fait, je ne comprend pas du tout comment il marche.
Il y a quoi, dans ton RecordSet? Les Id, ils sont dans RecordSet(0), RecordSet(1)... ?

[random]

tu as un bel effet de bord