Comment suprimer un regstrement sur BDD

gladiator1024 Messages postés 65 Date d'inscription vendredi 4 janvier 2008 Statut Membre Dernière intervention 1 février 2011 - 9 juin 2010 à 18:58
gladiator1024 Messages postés 65 Date d'inscription vendredi 4 janvier 2008 Statut Membre Dernière intervention 1 février 2011 - 10 juin 2010 à 14:00
salut et bon soir a tout
Je Besoin D'un solution de Cette command
le command pour supprimer un registre ment


x = MsgBox("Usted Seguro Eliminar el Registro", vbOKCancel + vbInformation, "Centro Del Atticioanr")


If x = vbOK Then
Data1.Recordset.Delete
Data1.Recordset.MoveNext


Select Case Err.Number
Case 3021
MsgBox "Nom de Fournisseur existe déja", vbCritical
Data1.Recordset.CancelUpdate '.CancelUpdate
End Select
Exit Sub
Else
If x = vbCancel Then


Cancel = 1
End If
Data1.Refresh
End If

'On Error Resume Next
'Data1.Recordset.Delete
'Text1.SetFocus
End Sub
merci pour tout

1 réponse

gladiator1024 Messages postés 65 Date d'inscription vendredi 4 janvier 2008 Statut Membre Dernière intervention 1 février 2011
10 juin 2010 à 14:00
Loooooool Svp Je très besoin de réponse
0
Rejoignez-nous