谁能给一个从数据库中读取数据并绑定到Dropdownlist控件的例子?

Question

dim temp as string
dim conn as new oledb.oledbconnection
conn.connectionstring="你的连接字段"
conn.open()
dim com as new oledb.oledbcommand("select 你要的字段 from 你的表 ",conn)
dim dr as oledb.oledbdatareader
dr=com.excutereader
while dr.read
 temp=dr.getsting(0)
  dropdownlisp.items.add(temp)
end while注：以上使用的是vb.net连接oracle数据库。

Answer 1

我这样做,怎么提示我dropdownlisp还没有绑定??下面是我的代码:
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
       
            Dim strcon As String = "provider=microsoft.Jet.OLedb.4.0; data source=" & Server.MapPath("data_x7bbs/x7bbs247.mdb")
            Dim conn As New OleDbConnection(strcon)
            Dim sql As String = "select NclassId,NclassName from bbsclass"
            Dim cmd As New OleDbCommand(sql, conn)
            Dim dr As OleDbDataReader
            conn.open()
            dr = cmd.ExecuteReader
            While dr.Read()
                Dim testlist As ListItem = New ListItem(dr.GetString(1), dr.GetInt32(0))
                boardList.Items.Add(testlist)
            End While
        End Sub

Answer 2

ICollection CreateDataSource()
{
     string mySQL = "SELECT fieldvalue,fieldtext FROM mytable";
     OleDbDataAdapter myDataAdapter = new OleDbDataAdapter(mySQL,myConnection);
     DataSet myDataSet = new DataSet();
     myDataAdapter.Fill(myDataSet,"mytable");
     return myDataSet.Tables["mytable"].DefaultView;
}private void BindList()
{
    myList.DataSource = CreateDataSource();
    myList.DataValueField = "valuefield";//对应DropDownList值的字段
    myList.DataTextField = "textfield";//对应DropDownList文本的字段
    myList.DataBind();
    
}

Answer 3

if(!IsPostBack)
{
ssyx=(string)Session["ssyx"];
//生成实验室下拉列表
DDLsysmc.Items.Add(new ListItem("<-请选择实验室->",""));
string sql_sel_sysmc="select sysb.bh,sysb.mc from sysb where sysb.ssdw='"+ssyx+"'" ; 
System.Data.SqlClient.SqlDataReader dr_sysmc;
dr_sysmc=SqlHelper.ExecuteReader(strConn1,CommandType.Text,sql_sel_sysmc);
while(dr_sysmc.Read())
DDLsysmc.Items.Add(new ListItem(dr_sysmc[1].ToString(),dr_sysmc[0].ToString().Trim()));
dr_sysmc.Close();}

Answer 4

谢谢 tiannet(田网－种田人的网) TOchinanewway(新路了无痕) 
Items.Add以后不需要在绑顶那个控件了就可以吗
可是VS。NET提示我控件没绑定