base de donnee

Question

slt a tous

Voila j avais deja pose cette question ya qques tps et on m avait gentiment repondu....le probleme et que je ne suis tjrs pas sorti de mon probleme....

Voila je souhaite pouvoir supprimer des donnees dans ma base access...en fait je voudrait que quand je clik ds une listbox, l'elemznt selectionne se suppprime egalement dans ma base de donnees...

voila mon code... (g 3 listbox reliee entre elles):

Private Sub Command4_Click()

Set rs = Db.OpenRecordset("contact", dbOpenTable)

rs.MoveFirst

rs.Move List1.ListIndex
rs.Move List2.ListIndex
rs.Move List3.ListIndex
rs.Delete

List1.RemoveItem List1.ListIndex
List2.RemoveItem List2.ListIndex
List3.RemoveItem List3.ListIndex

End Sub

Voila dc si qqun pouvai m aider ca serai cool...car on m a deja propose des solution en sql ms je pe pas m en servir...

Merci d avance :big)

plaineR · Answer

Pourquoi n'utilise pas une datalist ?

cs_vichenzo · Answer

comment ca une dartalist???
Je deburte je sais pas trop comment ca marche :blush)

plaineR · Answer

Tu vas dans menu projet -> composant (ou ctrl + T), puis onglet controles et tu sélectionnes Datalist control

Dans ta boite à outils tu as 2 controles supplémentaires :
datalist et combolist

Dans les propriétés, il faut que tu renseignes 
  rowsource (ta source de données), 
  listfield (les éléments de ta liste)
  boundcolumn (code des éléments de ta liste (souvent la clé primaire de ta table)

à listfield correspond .text = valeur sélectionnée affiché
à boundcolumn correspond .boundtext = valeur sélectionnée associée à la valeur affichée

Ensuite tu n'as qu'à faire par exemple
rs.find "macolonne = " & datalist.boundtext
rs.delete adAffectCurrent 

et le tour est joué, et c'est plus simple que de devoir renseigner ta liste manuellement et de faire encore manuellement la correspondance entre ta liste et ton recordset...

Bon j'espère avoir été assez clair...

cs_vichenzo · Answer

slt,

Je te remercie de m avoir repondu...mias finalement g trouve une solution qui marche...
J ai utilise une boucle While Wend avec une textbox qui cherche les numero "id" de ma babse de donnee....

Et ca marche!!! :) 

merci pr tout

Base de donnee

4 réponses

Discussions similaires