E:\web\learnaspcom\htdocs\freebook\learn\ubtoc.xml LearnAsp.com - ASP ASP.net Free Lessons
Search Search

#1 worldwide
FREE Coding Lessons

since 1996
   THE BEST WAY to learn ASP & Asp.net!
Advertise Here!
click for details
Credits Host:
DiscountASP.net
Server Admin:
The "Team"
Contact Info.
Charles M. Carroll
<Asp.net blog>
<personal site>
xxx

Radio Button/Check Box Lists from Databases by Charles Carroll

This page demonstrates how to display a list of options contained in a dataset and how to customize the layout of the resultant list. First we will code the simplest list bound control, a checkbox. (OLEDB/Access example)

   filename=\experiments\databinding\oledbcheckbox.aspx

<Test Script Below>


<%@ Import Namespace="System.Data.OLEDB" %>
<script language="VB" runat="server">
Sub Page_Load(Src As Object, E As EventArgs)
    Dim strConn as string ="PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=" & server.mappath("/experiments/data/biblio.mdb") & ";" 
    Dim strSQL as string ="select distinct state from publishers"
    Dim Conn as New OLEDBConnection(strConn)
    Dim Cmd as New OLEDBCommand(strSQL,Conn)
    Conn.Open()
    data1.DataSource = Cmd.ExecuteReader(system.data.CommandBehavior.CloseConnection)
    data1.DataBind()
End Sub
</script>
<html><head>
<title>Checkboxes</title>
</head>
<body bgcolor="#FFFFFF">
<form runat="server">
<font face="Verdana"><h3>CheckBoxes</h3></font>
<ASP:checkboxlist id="data1" datavaluefield="state" runat="server"/>
</form>
</body></html>

Now we will show many of the possibilities that can setup multiple columns with minimal effort. (OLEDB/Access example)

   filename=\experiments\databinding\oledbradio.aspx

<Test Script Below>


<%@ Import Namespace="System.Data.oledb" %>
<script language="VB" runat="server">
Sub Page_Load(Src As Object, E As EventArgs) 
    Dim strConn as string ="PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=" & server.mappath("/experiments/data/biblio.mdb") & ";" 
    Dim strSQL as string ="select distinct state from publishers"
    
    Dim Conn as New OLEDBConnection(strConn)
    Dim Cmd as New OLEDBCommand(strSQL,Conn)
    Conn.Open()
    st.DataSource = Cmd.ExecuteReader(system.data.CommandBehavior.CloseConnection)
    st.DataBind()

    Dim Conn2 as New OLEDBConnection(strConn)
    Dim Cmd2 as New OLEDBCommand(strSQL,Conn2)
    Conn2.Open()
    st2.DataSource = Cmd2.ExecuteReader(system.data.CommandBehavior.CloseConnection)
    st2.DataBind()

    Dim Conn3 as New OLEDBConnection(strConn)
    Dim Cmd3 as New OLEDBCommand(strSQL,Conn3)
    Conn3.Open()
    st3.DataSource = Cmd3.ExecuteReader(system.data.CommandBehavior.CloseConnection)
    st3.DataBind()

End Sub
</script>
<html><head>
<title>Radio Buttons from States</title>
</head>
<body bgcolor="#FFFFFF">
<h3>State(s) to Query</font></h3>
<form runat="server">
<hr>
repeatcolumns 8, repeatdirection horizontal, repeatlayout table<br>
<ASP:radiobuttonList 
	repeatcolumns="8" repeatdirection="horizontal" repeatlayout="table"
	id="st" datatextfield="state" DataValueField="state" runat="server"/>
<br>
<hr>
repeatcolumns 6, repeatdirection vertical, repeatlayout table<br>
<ASP:radiobuttonList 
	repeatcolumns="6" repeatdirection="vertical" repeatlayout="table"
	id="st2" datatextfield="state" DataValueField="state" runat="server"/>
<hr>
repeatlayout flow<br>
<ASP:radiobuttonList 
	repeatlayout="flow"
	id="st3" datatextfield="state" DataValueField="state" runat="server"/>
<hr>
</form>
</body></html>

For maximum speed on SQL7/2000 use the sqlclient assembly instead.

   filename=\experiments\databinding\sqlclientcheckbox.aspx

<Test Script Below>


<%@ Import Namespace="System.Data.OLEDB" %>
<script language="VB" runat="server">
Sub Page_Load(Src As Object, E As EventArgs)
    Dim strConn as string ="PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=" & server.mappath("/experiments/data/biblio.mdb") & ";" 
    Dim strSQL as string =select distinct state from publishers
    Dim Conn as New OLEDBConnection(strConn)
    Dim Cmd as New OLEDBCommand(strSQL,Conn)
    Conn.Open()
    data1.DataSource = Cmd.ExecuteReader(system.data.CommandBehavior.CloseConnection)
    data1.DataBind()
End Sub
</script>
<html><head>
<title>Checkboxes</title>
</head>
<body bgcolor="#FFFFFF">
<form runat="server">
<font face="Verdana"><h3>CheckBoxes</h3></font>
<ASP:checkboxlist id="data1" datavaluefield="state" runat="server"/>
</form>
</body></html>

Now the multiple columns with sqlsclient assembly instead.

   filename=\experiments\databinding\sqlclientradio.aspx

<Test Script Below>


<%@ Import Namespace="System.Data.oledb" %>
<script language="VB" runat="server">
Sub Page_Load(Src As Object, E As EventArgs) 
    Dim strConn as string ="PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=" & server.mappath("/experiments/data/biblio.mdb") & ";" 
    Dim strSQL as string =select distinct state from publishers
    
    Dim Conn as New OLEDBConnection(strConn)
    Dim Cmd as New OLEDBCommand(strSQL,Conn)
    Conn.Open()
    st.DataSource = Cmd.ExecuteReader(system.data.CommandBehavior.CloseConnection)
    st.DataBind()

    Dim Conn2 as New OLEDBConnection(strConn)
    Dim Cmd2 as New OLEDBCommand(strSQL,Conn2)
    Conn2.Open()
    st2.DataSource = Cmd2.ExecuteReader(system.data.CommandBehavior.CloseConnection)
    st2.DataBind()

    Dim Conn3 as New OLEDBConnection(strConn)
    Dim Cmd3 as New OLEDBCommand(strSQL,Conn3)
    Conn3.Open()
    st3.DataSource = Cmd3.ExecuteReader(system.data.CommandBehavior.CloseConnection)
    st3.DataBind()

End Sub
</script>
<html><head>
<title>Radio Buttons from States</title>
</head>
<body bgcolor="#FFFFFF">
<h3>State(s) to Query</font></h3>
<form runat="server">
<hr>
repeatcolumns 8, repeatdirection horizontal, repeatlayout table<br>
<ASP:radiobuttonList 
	repeatcolumns="8" repeatdirection="horizontal" repeatlayout="table"
	id="st" datatextfield="state" DataValueField="state" runat="server"/>
<br>
<hr>
repeatcolumns 6, repeatdirection vertical, repeatlayout table<br>
<ASP:radiobuttonList 
	repeatcolumns="6" repeatdirection="vertical" repeatlayout="table"
	id="st2" datatextfield="state" DataValueField="state" runat="server"/>
<hr>
repeatlayout flow<br>
<ASP:radiobuttonList 
	repeatlayout="flow"
	id="st3" datatextfield="state" DataValueField="state" runat="server"/>
<hr>
</form>
</body></html>

There are many worthy charities!!. But perhaps help starving children in Africa or South America AND help Charles too. a $5 tip buys him lunch at McDonalds, a $20 tip buys his kid Hitoshi a new computer game, a $39 tip buys his daughter Michiko a few nice outfits. See our donor list.