aspx frontpage |
<form id="form1" runat="server"> <div> <asp:DropDownList ID="DropDownList1" runat="server"></asp:DropDownList> </div> </form> |
code behind page |
Sub National_Database_Connection() Dim List As New DataTable("List") List.Columns.Add(New DataColumn("Index", GetType(String))) List.Columns.Add(New DataColumn("Nation", GetType(String))) Dim uu As Integer = 1 Dim connectionString1 As String = "Data Source=.\SqlExpress; Initial Catalog=soccer; Integrated Security=SSPI" Dim con1 As SqlConnection = New SqlConnection(connectionString1) con1.Open() Dim SqlString1 As String = "SELECT * FROM nation;" Dim cmd1 As SqlCommand = New SqlCommand(SqlString1, con1) Dim reader1 As SqlDataReader = cmd1.ExecuteReader() List.Rows.Add(List.NewRow) List.Rows(0)(0) = "" List.Rows(0)(1) = "" While (reader1.Read()) List.Rows.Add(List.NewRow) List.Rows(uu)(0) = reader1(0).ToString.Trim List.Rows(uu)(1) = reader1(1).ToString.Trim uu = uu + 1 End While reader1.Close() con1.Close() DropDownList1.DataTextField = "Nation" DropDownList1.DataValueField = "Index" DropDownList1.DataSource = List DropDownList1.DataBind() End Sub |