Prova det här
Dim item as listitem
Do while rdr.read
item = new listitem
item.text = rdr("val")
if rdr("chk") = 1 then
item.selected = true
end if
check1.items.add(item)
Loop
5 svar · 304 visningar · startad av ironhead
Hej!
Har skapat en Checkboxlist som heter Check1 där jag lägger till mina kryssrutor dynamiskt med:
Dim myArr as Arraylist = new Arraylist
Dim rdr as SqlDataReader
'SQL-sats
Do while rdr.read
myArr.Add(rdr("val"))
'if rdr("chk")=1 Then
'ikryssad ruta
'end if
Loop
...i databasen har jag ett fält som heter "chk" (bit) där 1 motsvarar ikryssad och 0 ej ikryssad...men hur ska jag kunna sätta att den dynamiskt skapade krysrutan till ikryssad?
...eller måste man skapa separata kryssrutor ?
Prova det här
Dim item as listitem
Do while rdr.read
item = new listitem
item.text = rdr("val")
if rdr("chk") = 1 then
item.selected = true
end if
check1.items.add(item)
Loop
Snyggt...mycket snyggt! Tack!
fick dock göra en mindre ändring:
if rdr("chk") = True then
Drinks on the house :D
Tack Dino & andreas_lindh, blev ju kanonbra :)