Discussion :

[juju05]

Bonjour,

Avant validation, je dois vérifier que ma clé numérique n'existe pas déjà dans ma table. Pour cela, j'ai codé:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Set oDb = CurrentDb
 
      Set oRst = oDb.OpenRecordset("SELECT @_ouv_cpte_en_attente.num_compte FROM @_ouv_cpte_en_attente WHERE @_ouv_cpte_en_attente.num_compte = '" & num_compte.Value & "'")
 
      If Not oRst.EOF Then
          MsgBox " Compte déjà existant.", , "Compte existant"
          Cancel = True
          Exit Sub
      End If
      oRst.Close
      Set oRst = Nothing

Sur ma requête sql de mon recordset, j'ai un code retour 3450: la clause de la requête est incomplète.

Je ne vois pas pourquoi.

Merci d'avance.
Julien.

[Jean-Philippe André]

Salut,

je ne sais pas qui t'a pondu les noms de tables, mais un @ c'est une belle idee de m****

Quelle est la valeur de ton num_compte.Value ?

Au lieu de faire un passage par un recordset, tu peux plus simplement passer par un DCount()

Code :

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

1
2
3
4
5
If DCount("num_compte","[@_ouv_cpte_en_attente]","num_compte = '" & num_compte.Value & "'")>=1 Then
 MsgBox " Compte déjà existant.", , "Compte existant"
          Cancel = True
          Exit Sub
End If

[juju05]

Merci beaucoup. Je ne connaissais pas cette fonction.