Voici le code que j'utilise pour supprimer un enregistrement(numero
d'armoire) selectionné dans une liste s'appelent Numero.
j'utilise un RecordSetClone pour retrouver l'enregistrement dans la base de
donnée et puis le supprimer.
mais j'ai un pb: il m'affiche le messag suivant quand je clique sur le
bouton supprimer: type incompatible et du coup il ne supprime meme pas
l'enregistrement. je ne sais pas pourkoi car le champnum_armoire dans la
table armoire est une String et chNomRecherche aussi.
est ce que vous voyez d'où le pb peut provenir??
 
Merci d'avance.
 
 
Private Sub supprimer_Click()
On Error GoTo Err_supprimer_Click
     
    Dim rst As Recordset
    Dim chNomRecherche As String
 
    Set rst = Me.RecordsetClone
    chNomRecherche = Str(Me!Numero)
    rst.FindFirst "num_armoire = " & chNomRecherche
        If rst.NoMatch Then
            MsgBox "Armoire non trouvée"
        Else
            Me.Bookmark = rst.Bookmark
        End If
    rst.Close
     
    DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
    DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70
 
Exit_supprimer_Click:
    Exit Sub
 
Err_supprimer_Click:
    MsgBox Err.Description
    Resume Exit_supprimer_Click
     
End Sub

Essaye ça :
rst.FindFirst "num_armoire = '" & chNomRecherche & "'"

yop yop couitchy a raison quand tu veux rechercher comme dans une requete sql pour un where tu dois mettre

merci, mais ca ne marche toujours pas

comment ça, ça ne marche pas ?

http://forum.hardware.fr/hardwaref [...] 4834-1.htm

Le type du recordset lié à la liste est-il correct ?

ben g toujours la meme erreur: type incompatible pour le probleme du haut, pour celui la je vais regarder

G reglé mon pb. Merci à tous.
@+