Listview DropDownList FindControl 没有编辑按钮答案

【问题标题】：Listview DropDownList FindControl without Edit ButtonListview DropDownList FindControl 没有编辑按钮
【发布时间】：2014-01-10 18:28:59
【问题描述】：

当下拉列表嵌入列表视图时，我无法从数据集中填充下拉列表。我得到“对象引用未设置为对象的实例。”因为，我相信，我没有使用 FindControl 正确访问下拉列表

我们不希望此列表视图上的编辑按钮，我们希望每一行都可以一次编辑。大多数在线示例都有编辑按钮。这可能是我的问题的一部分。

大多数在线示例也使用 ASPX 页面中定义的数据源。我们一直在专门使用 Oracle.DataAccess sys_refcursor 来填充数据集，然后将数据集用作数据源。所以我必须从 VB 端填充下拉列表，而不是使用 aspx 页面中的数据源。

我可以独立填充列表视图，独立填充下拉列表，但是走路和嚼口香糖是失败的。

所以这里是我得到的一些sn-ps：

<asp:ListView ID="lvMFGRS" runat="server">
    <ItemTemplate>
        <tr runat="server">
        <td runat="server">
           <asp:Label ID="NameLabel" runat="server" Text='<%#Eval("NEW_MANUFACTURER")%>' />
        </td>
        <td runat="server">
            <asp:dropdownlist ID="ddMFGRS"   runat="server" />
        </td>
        </tr>
    </ItemTemplate>
</asp:ListView>

然后在 vb 端是这样的：

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
   newmfglist() 'just sticks data in the "NameLabel" and databinds, and this works fine.
   For Each lvItem In lvMFGRS.Items
      Dim ddlist As DropDownList = lvMFGRS.FindControl("ddMFGRS")
         For Each tbl2 As DataTable In dsmfgrlist.Tables
             For Each dr2 As DataRow In tbl2.Rows
                Dim str1 As String
                Dim str2 As String
                str1 = "dog" 'dr2.Field(Of String)("DataValueField")
                str2 = "cat" 'dr2.Field(Of String)("DataTextField")
                ddlist.Items.Add(New ListItem(str2, str1))  'this is where I get the error
             Next
          Next
       Next

结束子

所以你认为我做错了什么......

【问题讨论】：

你曾经花几个小时在某件事上，在留言板上发帖，然后片刻之后才意识到自己的愚蠢？是的，就是我。而不是这个： Dim ddlist As DropDownList = lvMFGRS.FindControl("ddMFGRS") 我需要这个 Dim ddlist As DropDownList = lvItem.FindControl("ddMFGRS")
你可以在这里回答你自己的问题。实际上鼓励与其他开发人员分享您的知识。

标签： asp.net listview drop-down-menu findcontrol sys-refcursor

【解决方案1】：

答案是：

  Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
   newmfglist() 'just sticks data in the "NameLabel" and databinds, and this works fine.
   For Each lvItem In lvMFGRS.Items
      Dim ddlist As DropDownList = lvItem.FindControl("ddMFGRS")
         For Each tbl2 As DataTable In dsmfgrlist.Tables
             For Each dr2 As DataRow In tbl2.Rows
                Dim str1 As String
                Dim str2 As String
                str1 = "dog" 'dr2.Field(Of String)("DataValueField")
                str2 = "cat" 'dr2.Field(Of String)("DataTextField")
                ddlist.Items.Add(New ListItem(str2, str1))  'this is where I get the error
             Next
          Next
       Next

【讨论】：