怎么获取插入datalist中的控件的值？


Dim xxxx1 AS RadioButton
xxxx1 = E.Item.FindControl("sd")Dim xxxx2 AS RadioButton
xxxx2 = E.Item.FindControl("dfdf")

解决方案 »

  1.   

    Sub DataList_OnDataBound(s as object, e as datalistitemeventargs)
        Dim xxxx1 AS RadioButton
        xxxx1 = E.Item.FindControl("sd")    Dim xxxx2 AS RadioButton
        xxxx2 = E.Item.FindControl("dfdf")
    End Sub
      

  2.   

    datalist会生成一个记录集，而不是单条记录，怎么区分是不同组的radiobutton呢
    （我用的是c#)
      

  3.   

    http://dking.dynip.com/Home/ASPX/0005.aspx
      

  4.   

    for(int i=0;i<datalist1.Items.Count;i++)
         {
            if ((CheckBox)(datalist1.Items[i].FindControl("yourcheckboxid"))).Checked
        .....
      

  5.   

    你看一看這一程序可不可以幫到你?
    <%@ Page Language="VB" AutoEventWireup="True" Debug="true"%>
    <%@ Import Namespace="System.Data" %>
    <%@ Import Namespace="System.Data.OleDb" %><html>
       <script runat="server">
         dim MyConnection as OleDbConnection
         dim cmdSelect as OleDbCommand
         dim dtrReader as OleDbDataReader      Sub Page_Load(sender As Object, e As EventArgs) 
          MyConnection = New OleDbConnection( "Provider=Microsoft.Jet.OLEDB.4.0; Data Source =" + Server.MapPath(".")+"/db/data.mdb")         If Not IsPostBack Then 
                BindGrid()
             End If
          End Sub      Sub BindGrid() 
          Dim MyCommand As OleDbDataAdapter = new OleDbDataAdapter("select * from [min]", MyConnection)
              Dim DS As DataSet = new DataSet()
              MyCommand.Fill(DS,"min") 
              MyDataGrid.DataSource =DS.Tables("min").DefaultView
              MyDataGrid.DataBind()
          End Sub   Sub MyDataGrid_ItemDataBound(S As Object, E As DataGridItemEventArgs)
              If(e.Item.ItemType=ListItemType.Item Or    e.Item.ItemType=ListItemType.AlternatingItem) Then
                 Dim cellTxt as string = Ctype(e.Item.FindControl("lblID"),Label).Text
         Response.Write(cellTxt)
     Dim cellTxt2 as string = Ctype(e.Item.FindControl("lblName"),Label).Text
         Response.Write(cellTxt2 & "<BR>")
              End If
      End Sub
    </script>
    <Form runat="server">
        <asp:DataGrid id="MyDataGrid" 
               runat="server"
       AutoGenerateColumns="False"
       OnItemDataBound="MyDataGrid_ItemDataBound"
       Width="300">
             <HeaderStyle BackColor="Navy" 
                          ForeColor="White" 
                          Font-Bold="True" />
          <Columns>
    <asp:TemplateColumn HeaderText="ID">
    <ItemTemplate>
            <asp:Label ID="lblID"  Text='<%# DataBinder.Eval(Container.DataItem, "id") %>' Runat=server />
    </ItemTemplate> 
    </asp:TemplateColumn> 
    <asp:TemplateColumn HeaderText="Name">
    <ItemTemplate>
            <asp:Label ID="lblName"  Text='<%# DataBinder.Eval(Container.DataItem, "Name") %>' Runat=server />
    </ItemTemplate> 
    </asp:TemplateColumn> 
          </Columns>
          </asp:DataGrid>
    </Form