最近做一个页面需要用到这个两个控件，之前虽然看过，但是没有动手实践过。突然要做这么一个页面，并用上，真的有点着急。于是乎，网上疯狂找datagrid与DropDownList 的例子，找了很多很多，看了，并实践了，但是不是我想要的效果。昨天晚上琢磨了好几个小时，都没有弄好，后来干脆不弄了，躺在床上想了又想，结合网上找的案例，应该是灵感突现，今天一来到公司就动手实践。实践是检验最好的标准。实现了，成功了。

很高兴，急着把它写成笔记，一来记录，二来分享吧。开始贴码。

一、页面代码

<%@ Page Language="vb" AutoEventWireup="false" CodeBehind="datagridyuDropDownList.aspx.vb" Inherits="firstwebVbTest.datagridyuDropDownList" %>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<html xmlns="http://www.w3.org/1999/xhtml">

<head runat="server">

    <title></title>

    <style type="text/css">

    .dghotelRange

{

     min-width:900px;

     width:auto;

}

    </style>

</head>

<body>

    <form id="form1" runat="server">

    <div>

     <asp:DataGrid ID="dgtest" runat="server" AutoGenerateColumns="False"

                 CssClass="dghotelRange">

                <AlternatingItemStyle BackColor="#E0E0E0"></AlternatingItemStyle>

                <HeaderStyle Font-Bold="True" ForeColor="#E7E7FF" BackColor="#4A3C8C"></HeaderStyle>

                <Columns>

                <asp:TemplateColumn HeaderText="编号">

                    <ItemTemplate>

                      <asp:Literal    ID="labId" runat="server" Text='<%# Container.DataItem("Id") %>'></asp:Literal>

                    </ItemTemplate>

                    </asp:TemplateColumn>

                   <asp:BoundColumn DataField="Name" HeaderText="名字"></asp:BoundColumn>

                    <asp:TemplateColumn HeaderText="父编号">

                    <ItemTemplate>

                     <asp:textbox id="txtparenetId" runat="server" Text='<%# Container.DataItem("parenetId") %>' width="50px"></asp:textbox>

                    </ItemTemplate>

                    </asp:TemplateColumn>

                     <asp:TemplateColumn HeaderText="类别">

                    <ItemTemplate>

                      <asp:DropDownList ID="ddlUsers" runat="server" ></asp:DropDownList>

                    </ItemTemplate>

                    </asp:TemplateColumn>

                     <asp:BoundColumn DataField="memo" HeaderText="备注"></asp:BoundColumn>

                </Columns>

            <PagerStyle Mode="NumericPages"></PagerStyle>

     </asp:DataGrid>

        <asp:Button ID="btnGet" runat="server" Text="显示" />

    </div>

    </form>

</body>

</html>

二、后台代码

连接数据库的代码有点丑陋了。

Imports System.Data

Imports System.Data.SqlClient

Public Class datagridyuDropDownList

    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

    End Sub

    Dim str As String = "Data Source=xxxxx;Initial Catalog=Mytest;Integrated Security=True"

    Dim conn As SqlConnection = New SqlConnection(str)

    Dim cmd As SqlCommand = New SqlCommand()

    Dim ad As SqlDataAdapter = New SqlDataAdapter()

    ''' <summary>

    ''' DataGrid 绑定数据下拉列表绑定数据显示---关联的(另一个表的text值)

    ''' </summary>

    ''' <remarks></remarks>

    Public Sub getDataTable()

        Dim ds As DataSet = New DataSet()

        Dim strsql = "select   top 10 Id, Name, parenetId, memo from test"

        Try

            conn.Open()

            cmd.CommandText = strsql

            cmd.Connection = conn

            ad.SelectCommand = cmd

            ad.Fill(ds)

            dgtest.DataSource = ds.Tables().DefaultView

            dgtest.DataBind()

            '这一段代码就是绑定下拉类别一出来的值 这个是关联的 实现这个花了很多时间

            For i As Integer =  To dgtest.Items.Count -

                Dim NID As Literal = dgtest.Items.Item(i).FindControl("labId")

                Dim Users As DropDownList = dgtest.Items.Item(i).FindControl("ddlUsers")

                GetDataUser(Users)

                Users.SelectedValue = NID.Text

            Next

        Catch ex As Exception

        Finally

            cmd.Dispose()

            ad.Dispose()

            conn.Close()

        End Try

    End Sub

    ''' <summary>

    ''' 初始时绑定数据

    ''' </summary>

    ''' <param name="ddlUsers"></param>

    ''' <remarks></remarks>

    Public Sub GetDataUser(ByVal ddlUsers As DropDownList)

        Dim strsql = "select  top 10  Id, Names from Users"

        Dim ds As DataSet = New DataSet()

        conn.Close()

        Try

            conn.Open()

            cmd.CommandText = strsql

            cmd.Connection = conn

            ad.SelectCommand = cmd

            ad.Fill(ds)

            ddlUsers.DataSource = ds.Tables().DefaultView

            ddlUsers.DataTextField = "Names"

            ddlUsers.DataValueField = "Id"

            ddlUsers.DataBind()

        Catch ex As Exception

        Finally

            cmd.Dispose()

            ad.Dispose()

            conn.Close()

        End Try

    End Sub

    ''' <summary>

    ''' 下拉绑定数据 拥有更改时

    ''' </summary>

    ''' <returns></returns>

    ''' <remarks></remarks>

    Public Function GetUsersDataTable() As DataTable

        Dim strsql = "select  top 10  Id, Names from Users"

        Dim dt As DataTable = New DataTable()

        Dim ds As DataSet = New DataSet()

        Try

            conn.Open()

            cmd.CommandText = strsql

            cmd.Connection = conn

            ad.SelectCommand = cmd

            ad.Fill(ds)

            dt = ds.Tables()

        Catch ex As Exception

        Finally

            cmd.Dispose()

            ad.Dispose()

            conn.Close()

        End Try

        Return dt

    End Function

    ''' <summary>

    ''' 这个是参考更改下拉数据代码 只是我这里没有做修改和添加的代码 所以在这里没有用

    ''' </summary>

    ''' <param name="sender"></param>

    ''' <param name="e"></param>

    ''' <remarks></remarks>

    Protected Sub dgtest_ItemDataBound(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.DataGridItemEventArgs) Handles dgtest.ItemDataBound

        If e.Item.ItemType = ListItemType.EditItem Then

            Dim ddl As DropDownList = CType(e.Item.FindControl("ddlUsers"), DropDownList)

            ddl.DataSource = GetUsersDataTable()

            ddl.DataValueField = "Id"

            ddl.DataTextField = "Names"

            ddl.DataBind()

            Dim dv As DataRowView = CType(e.Item.DataItem, DataRowView)

            ddl.SelectedIndex = ddl.Items.IndexOf(ddl.Items.FindByText(dv("Names").ToString()))

        End If

    End Sub

    ''' <summary>

    ''' 显示数据

    ''' </summary>

    ''' <param name="sender"></param>

    ''' <param name="e"></param>

    ''' <remarks></remarks>

    Protected Sub btnGet_Click(ByVal sender As Object, ByVal e As EventArgs) Handles btnGet.Click

        getDataTable()

    End Sub

End Class

三、显示的结果如下图

总结

付出，还是有收获的。

参考链接：

http://www.cnblogs.com/skylaugh/archive/2006/03/17/352333.html

http://wzoot.blog.163.com/blog/static/41638800200791643035837/

datagrid与DropDownList关联使用的更多相关文章

  1. DataRead 和DataSet区别

    dataset表示一个数据集,是数据在内存中的缓存. 可以包括多个表DatSet 连接数据库时是非面向连接的.把表全部读到Sql中的缓冲池,并断开于数据库的连接 datareader 连接数据库时是面 ...

  2. 转载 感受K2.Net 2003工作流解决方案

    接触SourceCode公司的工作流产品K2.NET 2003有一段时间了,想把一些心得分享出来,和各位共同探讨一下,抛砖引玉,希望能对相关人士以启发. K2.Net 2003是基于微软.Net Fr ...

  3. asp.net几个重要对象

    DataSet是用来做连接sql的一种方法,意思是把数据库的副本存在应用程序里,应用程序开始运行时,把数据库相关数据保存到DataSet.DataTable表示内存中数据的一个表.常和DefaultV ...

  4. easyui datagrid中关联combox

    datagrid中列上关联combobox{ field: 'SysCode', title: '系统代码', width: 150, align: 'left', editor: { type: ' ...

  5. datagrid加下拉列表dropdownlist

    datagrid中代码: <asp:datagrid id="dgList" runat="server" ItemStyle-HorizontalAli ...

  6. 序列化表单为json对象,datagrid带额外参提交一次查询 后台用Spring data JPA 实现带条件的分页查询 多表关联查询

    查询窗口中可以设置很多查询条件 表单中输入的内容转为datagrid的load方法所需的查询条件向原请求地址再次提出新的查询,将结果显示在datagrid中 转换方法看代码注释 <td cols ...

  7. EasyUI中tree,Datagrid,pagenation的使用EasyUI中Datagrid和pagenation进行关联时，再次点击pagenation时让表格数据显示的问题

    // 获取选中一行的情况,下面的一个参数可以代表一个DataGridfunction getSelected(dialogEle,dataFileTextEle) { // 获取选中一行的情况. va ...

  8. Yii 1开发日记 -- 后台搜索功能下拉及关联表搜索

    Yii 1 实现后台搜索,效果如下: 一. 下拉搜索: 1.模型中和常规的一样 if (isset($_GET['agency']['status']) && $_GET['agenc ...

  9. WPF DataGrid常用属性记录

    WPF DataGrid常用属性记录 组件常用方法: BeginEdit:使DataGrid进入编辑状态. CancelEdit:取消DataGrid的编辑状态. CollapseRowGroup:闭 ...

随机推荐

  1. Spring-1-H Number Sequence（HDU 5014）解题报告及测试数据

    Number Sequence Time Limit:2000MS     Memory Limit:65536KB     64bit IO Format:%I64d & %I64u Pro ...

  2. configparser模块来生成和修改配置文件

    1. 安装configparser模块 pip3 install configparser ##python2.7模块名为ConfigParser 2. 创建配置文件 import configpar ...

  3. redis 慢查询日志

    说明:针对慢查询日志,可以设置两个参数,一个是执行时长,单位为微秒,另一个是慢查询日志的长度.如果超过该长度,当一个新的命令被写入日志时,最老的一条会从命令日志队列中被移除. 编辑配置文件redis. ...

  4. snapshot与release

    总结自:https://www.jianshu.com/p/084fd2408d9a 这两个概念是用于描述jar包,jar包提供给其他系统作为依赖. 1. snapshot版本代表不稳定.尚处于开发中 ...

  5. saltstack之keepalived的安装配置

    使用saltstack编译安装keepalived: 创建相应的目录,并在目录下创建相应的sls配置文件 [root@node1 ~]# mkdir /srv/salt/prod/keepalived ...

  6. python之subprocess

    官网介绍:https://docs.python.org/3/library/subprocess.html Popen(): [root@oracle scripts]# cat sub_popen ...

  7. 20145215刘俊谦实验五 Java网络编程及安全

    实验内容 掌握Socket程序的编写: 掌握密码技术的使用: 设计安全传输系统. 实验步骤 本次实验由两人组队完成,20145321曾子誉是我本次实验的搭档,链接为:http://www.cnblog ...

  8. 20145328 《Java程序设计》实验五实验报告

    20145328 <Java程序设计>实验五实验报告 实验名称 Java网络编程 实验内容 用书上的TCP代码,实现服务器与客户端. 客户端与服务器连接 客户端中输入明文,利用DES算法加 ...

  9. ISSCC 2017论文导读 Session 14 Deep Learning Processors，A 2.9TOPS/W Deep Convolutional Neural Network SOC

    最近ISSCC2017大会刚刚举行,看了关于Deep Learning处理器的Session 14,有一些不错的东西,在这里记录一下. A 2.9TOPS/W Deep Convolutional N ...

  10. centos 查询mysql配置文件位置

    具体指令: 1.which mysqld  (”which 文件名“ : 搜索命令所在路径及别名) 2./usr/sbin/mysqld --verbose --help | grep -A 1 'D ...