Usuário com melhor resposta
For Next CheckBoxList Checked=True

Pergunta
-
Como poderia carregar um CheckBoxList com a propriedade Checked=True após DropDownList.SelectedIndexChanged, sendo que codSemana varia de 1 até 7 conforme o código abaixo? O CheckBoxList retorna, por exemplo: 2s,9s,16s,23s,30s, ao selecionar: ano 2012, mes julho e dia semana segunda.
Dim Dadapter102 As OleDbDataAdapter = New OleDbDataAdapter Dadapter102.SelectCommand = New OleDbCommand("SELECT codDiaMesAno,diaMesAno,codDiaSemana,diaSemSigla1,codMesAno,codSemana, count(codMesAno) AS 'Count' FROM tbAgendaCalendario GROUP BY codDiaMesAno,diaMesAno,codDiaSemana,diaSemSigla1,codMesAno,codSemana ORDER BY codDiaMesAno", New OleDbConnection(My.Settings.SConecte)) Dadapter102.Fill(DSet, "TBCalendarioDia") ddlDia.Items.Clear() retDATASET.ReadXml(Server.MapPath("output.xml")) Dim ItemDataView As New DataView(retDATASET.Tables("TBCalendarioDia")) ItemDataView.RowFilter = "codMesAno = " & ddlMes.SelectedItem.Value & " AND CodSemana = " & ddlSemana.SelectedItem.Value ddlDia.DataSource = ItemDataView ddlDia.DataTextField = ("diaMesAno") ddlDia.DataValueField = ("codDiaMesAno") ddlDia.DataBind() ddlDia.Items.Insert(0, "") ddlDia.SelectedIndex = 0
Respostas
-
Resolvido com:
For Each item As ListItem In CheckBoxList.Items If ddlEntHora1.Visible = True Then item.Selected = True End If Next
- Marcado como Resposta Wilson Boris terça-feira, 17 de julho de 2012 13:14
Todas as Respostas
-
Resolvido com:
For Each item As ListItem In CheckBoxList.Items If ddlEntHora1.Visible = True Then item.Selected = True End If Next
- Marcado como Resposta Wilson Boris terça-feira, 17 de julho de 2012 13:14
-
Amigo,
Legal, mas marque como resposta para ajudar a quem procura. Assim fica claro que resolveu.
Thread original:
http://social.msdn.microsoft.com/Forums/pt-BR/vsvbasicpt/thread/15a96994-4926-451d-ac57-657d1319375a
É possível sim! Ponha isso na sua cabeça. É possível. "Steve Jobs"
Eduardo Pires
www.eduardopires.net.br