ASP编程 PHP编程 JSP编程 NET编程 CGI编程 XML编程 
Google adsense申请技巧本站核心代理域名注册主机业务 快速发布你的买卖域名买卖网站信息 1元注册 cn域名
站长每日新闻导读 √ ·推荐万网空间¥120元 150m 站长网:站长必上的网站网站联盟大全本站代理万网域名55空间120元
 2006-12-10 10:07:41

DPC: Creating a multicolumn Dropdownlist[等级:初 中]

来源: 字体:[ ]
Creating a multicolumn Dropdownlist
Click here to return to my article index
One of the frequently asked questions over at Asplists.com is: "How do I create a multicolumn dropdownlist?". I have come up with two ways to accomplish this task.

The first technique combines the two columns in the SQL query used to create the resultset and then binds the resultset to the dropdownlist. More AspAlliance SQL articles can be found here.

Code:
    Sub FillDropDownSQL()
    Dim myConnection As SqlConnection = new SqlConnection("Data Source=test; User Id=test; Password=test; Initial Catalog=pubs")
    Dim myCommand As SqlCommand = New SqlCommand("Select pub_id + ',' + pub_name As IDAndName From publishers", myConnection)
    
    myConnection.Open()

    DropDownList1.DataTextField = "IDAndName"

    DropDownList1.DataSource = myCommand.ExecuteReader(CommandBehavior.CloseConnection)
        DropDownList1.DataBind()
    End Sub



Result:
0736,New Moon Books 0877,Binnet & Hardley 1389,Algodata Infosystems 1622,Five Lakes Publishing 1756,Ramona Publishers 9901,GGG&G 9952,Scootney Books 9999,Lucerne Publishing

The second technique combines the two columns while looping through a SqlDataReader. The combination of the two columns is then programmatically added to the dropdownlist. More information on the SqlDataReader can be found here.

Code:
    Sub FillDropDownCode()
    Dim myConnection As SqlConnection = new SqlConnection("Data Source=test; User Id=test; Password=test; Initial Catalog=pubs")
    Dim myCommand As SqlCommand = New SqlCommand("Select pub_id,pub_name From publishers", myConnection)
    Dim myDataReader As SqlDataReader

    myConnection.Open()
    myDataReader = myCommand.ExecuteReader()
    
    While myDataReader.Read()
        DropDownList2.Items.Add(myDataReader.GetString(0) & "," & myDataReader.GetString(1))
    End While

    myDataReader.Close()
    myConnection.Close()
    End Sub


Result:


网站地图 - 域名注册续费虚拟主机代理 - 交易论坛 - 网站投稿 - 广告服务 - 帮助中心 - 联系我们
Copyright ©2003-2007 www.Admin5.com All Rights Reserved