VBA

Bonjour tt le monde jsuis débutant ds access et je veux faire un formulaire d'ajout des utilisateurs et bien sur il faut entre avoir un seul login pour chaque utilisateur mais je sais pas comment testé lors de la saisis de champs login si ya un dans la table ou pas donc plz aidez moi c trés urgent
meri d'avance

voila le code du bouton "ajouter un enregistrement"

---

Private Sub Commande6_Click()
On Error GoTo Err_Commande6_Click

Dim Ssql As String
Dim rst As DAO.Recordset

Ssql = "SELECT * FROM utilisateur WHERE nom = " & Chr(34) & Me.nom & Chr(34)
Set rst = CurrentDb.OpenRecordset(Ssql)
If rst.RecordCount > 0 Then
   MsgBox ("Déja exist")
  
   Else
          DoCmd.GoToRecord , , acNewRec
    
   End If
rst.Close

Exit_Commande6_Click:
    Exit Sub

Err_Commande6_Click:
    MsgBox Err.Description
    Resume Exit_Commande6_Click
   
End Sub

---

Et quelle erreur as-tu ? Où est-ce que ça coince ?

Essaie plutôt ta requête avec des apostrophes plutôt que des guillemets

Ssql = "SELECT * FROM utilisateur WHERE nom = " & Chr(39) & Me.nom & Chr(39)
ou
Ssql = "SELECT * FROM utilisateur WHERE nom = '" & Me.nom & "'"

en espérant que Me.nom contienne bien une bonne valeur (attention à la casse)

MPi

Dsl pour la dérangement mais j'ai une autre question

voila une requette et je sais pas ou est l'erreur

---

INSERT INTO Adherents ([Titre],[Nom], [Prenom], [Date_naissance],[Profession],[Date_inscription],[Etablissement_scolaire],[Classe_niveau],[Adresse],[Tel_F],[Tel_P],[E_mail],[service] ) VALUES ( '" & Me.Titre & "' , '" & Me.nom & "', '" & Me.prenom & "','" & Me.Datenaiss & "' , '" & Me.Profession & "', '" & Me.date_ins & "','" & Me.etablisse & "' , '" & Me.class & "', '" & Me.adr & "','" & Me.telf & "' , '" & Me.telp & "', '" & Me.email & "', 'Ateliers')

---

quant je mets juste quelque champs comme nom et prenom et service la requete marche trés bien
tt les champs sont correcte et je sais pas ou est le probleme merci de m'aidez