Chebox permettant de selectionner tous les CheckBox d'un datalist

goboben Messages postés 11 Date d'inscription mercredi 27 juillet 2005 Statut Membre Dernière intervention 28 août 2006 - 28 août 2006 à 11:37
goboben Messages postés 11 Date d'inscription mercredi 27 juillet 2005 Statut Membre Dernière intervention 28 août 2006 - 28 août 2006 à 15:45
Bonjour, Voila si quelqu'un peut m'aider ce serait simpa!

J'ai les infos d'un datalist, au bout de chaque ligne un checkbox (par defaut deselectionné). Dans l'entete de mon mon tableau je voudrai un checkbox permettant de selectionner l'ensemble des checkBox. Actuelement j'ai remplacé ce dernier par un lien car je n'arrive pas tout selectionner a partir du checkbox.
Voici mon code:

--------Datalist-----------------------------

            <SelectedItemStyle BackColor="Yellow">
         </SelectedItemStyle>
           
           
                <headerTemplate>
               
                   
                       
                        Id

                       
                       
                        Nom du voyage
                       
                       
                        Reference
                       
                       
                        Prix
                       
                       
                        Deja distribué
                       
                       
                        Tout selectionner
                       
                   
               
                </headerTemplate>
               
               ........
                

------------Sub Selectionner Tout------------------

Protected sub SelectAll (ByVal Sender As Object, ByVal e As DataListCommandEventArgs)



                 Dim  ctrl, ctrl2 as control
                 ctrl = sender.findControl("listRecherche")
                 Dim item as dataListitem
             

  

  for each item in CType(listRecherche, DataList).items
                     for each ctrl2 in item.controls
                         if ctrl2.id = "tableau" then
                         ctrl = ctrl2.findControl("tableau")
                         ctrl = ctrl.findControl("tabRow")
                         ctrl = ctrl.findControl("tabcellSelect")




                         if ctype(ctrl.findControl("cbSelect"),checkBox).checked then
                            ctype(ctrl.findControl("cbSelect"),checkBox).checked = false




                          else ctype(ctrl.findControl("cbSelect"),checkBox).checked = true
                         end if




                         end if
                     next
                next
           end sub

Voila, j'ai mis en bleu l'endroit ou j'aimerai mettre mon checkBox.

Merci d'avance

1 réponse

goboben Messages postés 11 Date d'inscription mercredi 27 juillet 2005 Statut Membre Dernière intervention 28 août 2006
28 août 2006 à 15:45
Pas d'idée?

Je n'ai peut être pas assez developpé le problème, si je remplace l'asp link par un checkbox, rien ne passe. Et en mettant un "onClick", il me dit "selectAll is undefined".
0
Rejoignez-nous