Discussion :

[daily14]

Salut,

Encore bloqué dans mon projet:

J'ai ajouter une CheckedListBox et je voudrai avoir à l'interieur : les données de ma table logiciel.
L'utilisateur pourra cocher les logiciels disponible.

Voila mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Dim DLog As SqlDataReader
Dim TLog As New DataTable
TLog.Columns.Add("Display")
Dim RqtLog As sqlCommand
RqtLog = New SqlCommand("select nomlogiciel from logiciel", Connexion.***)
DLog = RqtLog.ExecuteReader

après je ne sais pas trop comment insérer dan la checkedlistBox


Merci.

[Pol63]

tu supprimes la création de datatable dans ton code et après l'executereader tu fais

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
while DLog.read
  monchecklistbox.items.add(dlog.items(0).tostring)
end while

[daily14]

Merci Pol63

ça fonctionne, reste plus qu'à récupérer la valeur des cases cochées ; et de les inserer dans la base. D'ailleurs je ne sais pas comment je pourrais faire parce que sur un pc on peut avoir plusieurs logiciels .

[Pol63]

si le but est juste de mettre à jour un booléen dans la base, ca va etre des requete type update

update table set bool = valeur where uneclé = valeurclé

donc faire un for each sur ton checkedlistbox
récupérer l'état checked de l'item courant, construire la requete et l'exécuter


d'ailleurs, en théorie il faudrait aussi le lire pour cocher les cases à l'ouverture de la fenetre, tu ne fais que lire la liste des logiciels dans ton traitement actuellement