VB DAO ListBox

Question

Bonsoir,
Je vais essayer d'etre la plus claire possible. J'ai r&#233;alis&#233; un r&#233;pertoire en VB avec une base de donn&#233;es Access, et j'ai utlis&#233; la m&#233;thode DAO.
J'affiche les Noms et les pr&#233;noms dans une listbox  par ordre alphab&#233;tique: 
List1.AddItem ContactRst("NOM") & ", " & ContactRst("pr&#233;nom") 
et je souhaiterai pouvoir supprimer ceux que je d&#233;sire avec un bouton supprimer en les choisissant dans la listbox. Or ca me met Erreur 3021 aucun enregistrement en cours. J'ai mis ca pour la suppression :

Private Sub Supprimer_Click(Index As Integer)
List1.RemoveItem (List1.ListIndex)
Repertoire.Execute "DELETE CONTACT.* FROM CONTACT"
ContactRst.Edit
ContactRst.Delete
ContactRst.Update
End Sub

J'esp&#233;re que quelqu'un a une ptite id&#233;e... Merci.

cs_frop01 · Answer

ICI CA PARLE DE PHP et non de VB 

c'est normal puisque tu as supprimer tout les enregistrements 

DELETE CONTACT.* FROM CONTACT WHERE CHAMPINDEX=" & List1.Text

ensuite 

List1.RemoveItem (List1.ListIndex)

 [mailto:cyberscorp2004@msn.com MSN]  [mailto:frop01@yahoo.fr YAHOO] 

Membre du club CodeS-SourceS

cs_frop01 · Answer

Ca ne veux rien dire le code suivant et tu n'en as pas besoin  :

ContactRst.Edit
ContactRst.Delete
ContactRst.Update

 [mailto:cyberscorp2004@msn.com MSN]  [mailto:frop01@yahoo.fr YAHOO] 

Membre du club CodeS-SourceS

cs_Sandy084 · Answer

Merci, mais tu sais comment je pourrai supprimer l'enregistrement s&#233;lectionn&#233; dans la listbox au lieu de tout?

JoJo738 · Answer

Bonjour, en utilisant WHERE ca='condition'



<hr>

VB DAO ListBox

4 réponses

Votre réponse

Discussions similaires