Try

            Dim cnn As SqlConnection = New SqlConnection(ConfigurationSettings.AppSettings("CnnStr"))


                cnn.Open()


            Dim cmdpass As New SqlCommand("SP_LIST_OF_INCOMING_Pass", cnn)
            Dim cmdfail As New SqlCommand("SP_LIST_OF_INCOMING_Fail", cnn)


                Dim drpass As SqlDataReader = cmdpass.ExecuteReader

            Me.ddlpass.DataSource = drpass
            Me.ddlpass.DataMember = "DESCRIPTION"
            Me.ddlpass.DataTextField = "DESCRIPTION"
                Me.ddlpass.DataBind()
                drpass.Close()

                Dim drfail As SqlDataReader = cmdfail.ExecuteReader(CommandBehavior.CloseConnection)


            Me.ddlfail.DataSource = drfail
            Me.ddlfail.DataMember = "DESCRIPTION"
                Me.ddlfail.DataTextField = "DESCRIPTION"
                Me.ddlfail.DataBind()
                drfail.Close()



            Catch ex As Exception
                Me.Label3.Text = ex.ToString
            End Try