supprimer un ligne dans access

Question

J'ai cr&#233;er un base de donn&#233;e access.
Sous Vb6, j'ai une feuille avec deux textbox, un pour ma r&#233;f&#233;rence et l'autre pour le type. et j'ai un bouton ajouter et un bouton supprimer.


Pour enregistrer dans la base de donn&#233;e, pas de probl&#233;me, mais je n'arrive pas a supprimer un ligne enti&#233;re, comment faut t'il faire??
Mon code si dessous du bouton supprimer.

Si vous avez une autre m&#233;thode pour supprimer une ligne dans acess je suis preneur.


Merci d'avance


Private Sub Command2_Click()
Set Record = New ADODB.Recordset
        Record.Open "Modification", Ma_Base, adOpenKeyset, adLockOptimistic
        Record.Delete
        Record.Fields("TypeCartes").value = Text3.Text
        Record.Fields("RefCartes").value = Text4.Text
        Record.Update

  JIMM

edokt · Answer

Moi j'utilise dao3.6



je sais pas si &#231;a va t'aider 



Dim db as Dtabase

Set db =  OpenDatabase ("NomDeMDB")

Dim rs as Recordset

Set rs = db.OpenRecordset("NomDeTable")



'tu peux utiliser index si tu en a

rs.Index = "PrimaryKey"

rs.Seek "=", "ValeurAChercher"



If Not rs.NoMatch Then

    rs.Delete

End If



' ou tu peux faire do ... while

if Not rs.Eof then

rs.MoveFirst

Do While rs.Eof

    if  ".......Instructions.........." Then

    rs.Delete

    exit do

    end if

loop

end if

Supprimer un ligne dans access

1 réponse

Discussions similaires