空调出风口宽度:DropDownList 绑定sqldatareader?

Private Sub DataGrid1_ItemDataBound(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.DataGridItemEventArgs) Handles
Dim constr As String = "SELECT h2 FROM History_sp "
Dim conn As String = _
"Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=C:\spdb.mdb;" & _
"User ID=Admin;" & _
"Password="
Dim mycon As OleDb.OleDbConnection = New OleDb.OleDbConnection(conn)
Dim myreader As OleDb.OleDbDataAdapter = New OleDb.OleDbDataAdapter(constr, conn)
mycon.Open()
Dim ds As New DataSet
myreader.Fill(ds, "History_sp")
If e.Item.ItemType = ListItemType.Item Or e.Item.ItemType = ListItemType.AlternatingItem Then
Dim da As DropDownList
da = CType(e.Item.Cells(0).FindControl("DropDownList1"), DropDownList)
da.DataSource = ds
da.DataBind()
End If
'在此处放置初始化页的用户代码
End Sub