Ajout enregistrement formulaire Access
DR J
-
LatelyGeek Messages postés 1774 Date d'inscription Statut Membre Dernière intervention -
LatelyGeek Messages postés 1774 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Je travail access, j'ai un formulaire pour ajouter un Secteur, ma table secteur est composé d'un numéro, et je veux que le numéro s'ajoute automatiquement (mais pas en auto increment). Pour cela j'ai créer un évenement avec le code suivant:
Private Sub N_SECTEUR_Click()
Dim db As Database
Dim rs As Recordset
Dim sql As String
Dim i As Integer
Set db = CurrentDb
sql = "Select MAX (N_SECTEUR) from SECTEUR"
i = Val(sql)
i = i + 1
N_SECTEUR.Text = "" & i
db.Close
End Sub
Mon probléme est que le code m'affiche toujours 1 alors qu'à l'heure actuelle il devrait m'afficher 52, ma requête fonctionne bien je l'aio tester, je ne vois pas d'ou viens mon erreur, alors si vous savez d'ou cela vient, merci de me le dire
Je travail access, j'ai un formulaire pour ajouter un Secteur, ma table secteur est composé d'un numéro, et je veux que le numéro s'ajoute automatiquement (mais pas en auto increment). Pour cela j'ai créer un évenement avec le code suivant:
Private Sub N_SECTEUR_Click()
Dim db As Database
Dim rs As Recordset
Dim sql As String
Dim i As Integer
Set db = CurrentDb
sql = "Select MAX (N_SECTEUR) from SECTEUR"
i = Val(sql)
i = i + 1
N_SECTEUR.Text = "" & i
db.Close
End Sub
Mon probléme est que le code m'affiche toujours 1 alors qu'à l'heure actuelle il devrait m'afficher 52, ma requête fonctionne bien je l'aio tester, je ne vois pas d'ou viens mon erreur, alors si vous savez d'ou cela vient, merci de me le dire
A voir également:
- Ajout enregistrement formulaire Access
- Whatsapp formulaire opposition - Guide
- Formulaire de réclamation facebook compte désactivé - Guide
- Formulaire de reclamation instagram - Guide
- Ajout rapide snap - Forum Snapchat
- Erreur lors de l'enregistrement du contact - Forum Xiaomi
le code ne marche toujours pas il m'affiche 0 au lieu de 52