asp.net2.0 DropDownList数据绑定实现

 

方法：

#Region "Dorpdownlistのデータをセット"
    ''' <summary>
    ''' Dorpdownlistのデータをセット
    ''' </summary>
    ''' <param name="DataSql">SQL文</param>
    ''' <param name="myDorpDownList">コントロール</param>
    ''' <param name="balnkRow">空白行追加(False:ない)</param>
    ''' <remarks></remarks>
    Public Shared Sub BindData_DropDownList(ByVal DataSql As String, _
                                            ByVal myDorpDownList As DropDownList, _
                                            Optional ByVal balnkRow As Boolean = True)

        Dim dt As DataTable
        Dim objDbHelper As DbHelper

        objDbHelper = New DbHelper

        dt = objDbHelper.FillDataTable(DataSql)

        myDorpDownList.DataSource = dt
        myDorpDownList.DataTextField = "Name"
        myDorpDownList.DataValueField = "code"
        myDorpDownList.DataBind()
        '空白行を追加
        If balnkRow = True Then
            myDorpDownList.Items.Insert(0, New ListItem("", "0"))
        End If

        objDbHelper.Dispose()

        dt.Clear()
        dt.Dispose()
    End Sub

#End Region

调用：

        'プロジェクト名を実装
        BindData_DropDownList(GetSQL("M_PROJECT", "PROJECT_CODE as code", "PROJECT_Name as Name"), Me.DrpProject_code)