ASP.NET：优化DataGrid控件的编辑功能

最新推荐文章于 2021-05-07 14:17:18 发布

donetk

最新推荐文章于 2021-05-07 14:17:18 发布

阅读量541

点赞数

分类专栏： asp.net 文章标签： datagrid 优化 asp.net dataset server mysql

asp.net 专栏收录该内容

493 篇文章

订阅专栏

本文介绍如何使用DataGrid控件实现批量更新功能，通过实例展示如何优化编辑属性并减少服务器负担。涉及技术包括FindControl方法及数据库操作。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

尽管在上面的实例中我们已经实现了DataGrid的在线编辑功能，但是，如果我们已经习惯了C/S 结构的程序，就会感觉到上个实例中编辑的不足：提交数据频繁，加重了服务器的负担。在这一节中，我们利用一个实例来演示优化后的DataGrid控件的编辑功能，其中的技术就是引入批量更新数据。引入的一个新知识就是控件的FindControl方法。

我们来看具体实例。首先在DataCon Web项目里，添加一个Web Form，命名为DataGrid_Sample6.aspx，然后添加一个DataGrid控件，由于我们做了DataGrid控件的显示模版，并且为了优化其编辑属性，我们特别利用<asp:TemplateColumn ><ItemTemplate></ItemTemplate></asp:TemplateColumn >属性添加了DropDownList控件和CheckBox控件。为了便于实例应用和读者理解，我们新建一个TeacherInfor.mdb数据库，该数据库包含一个teacher数据表，字段类型和虚拟数据如图9.11和9.12所示。

ASP.NET：优化DataGrid控件的编辑功能
图9.11 teacher数据表中的字段属性

ASP.NET：优化DataGrid控件的编辑功能
图9.12 teacher数据表中数据记录

DataGrid_Sample6.aspx的主要HTML代码如下：
<body topMargin="0" MS_POSITIONING="GridLayout">
<form id="Form1" method="post" runat="server">
<FONT face="宋体"><b>经济管理学院教师信息</b>
   <asp:DataGrid id="DataGrid1"
      runat="server" AutoGenerateColumns="False" Width="320px" PageSize="4"
AllowPaging="True">
<AlternatingItemStyle BackColor="WhiteSmoke"></AlternatingItemStyle>
<ItemStyle BackColor="GhostWhite"></ItemStyle>
  <HeaderStyle BackColor="LightSteelBlue"></HeaderStyle>
  <Columns>
   <asp:BoundColumn DataField="id" HeaderText="编号"></asp:BoundColumn>
   <asp:BoundColumn DataField="name" HeaderText="姓名"></asp:BoundColumn>
  <asp:TemplateColumn HeaderText="性别">
   <ItemTemplate>
    <asp:DropDownList id="sex" runat="server" SelectedIndex='<%# Cint(DataBinder.Eval(Container,"DataItem.sex")) %>' >
       <asp:ListItem Value="0">男</asp:ListItem>
     <asp:ListItem Value="1">女</asp:ListItem>
    </asp:DropDownList>
    </ItemTemplate>
  </asp:TemplateColumn>
  <asp:TemplateColumn HeaderText="所获学位">
   <ItemTemplate>
    <asp:DropDownList id="degree" runat="server" SelectedIndex='<%# cint(DataBinder.Eval(Container,"DataItem.degree")) %>'>
     <asp:ListItem Value="0">学士</asp:ListItem>
     <asp:ListItem Value="1">硕士</asp:ListItem>
     <asp:ListItem Value="2">博士</asp:ListItem>
     </asp:DropDownList>
    </ItemTemplate>
</asp:TemplateColumn>
<asp:TemplateColumn HeaderText="性别">
   <ItemTemplate>
    <asp:DropDownList id="title" runat="server" SelectedIndex='<%# Cint(DataBinder.Eval(Container,"DataItem.title")) %>' >
     <asp:ListItem Value="0">讲师</asp:ListItem>
     <asp:ListItem Value="1">副教授</asp:ListItem>
     <asp:ListItem Value="2">教授</asp:ListItem>
     </asp:DropDownList>
   </ItemTemplate>
</asp:TemplateColumn>
  <asp:TemplateColumn HeaderText="婚否">
   <ItemTemplate>
    <asp:CheckBox Runat=server Checked ='<%# DataBinder.Eval(Container,"DataItem.marry") %>' ID="marry" Text ="婚否">
    </asp:CheckBox>
    </ItemTemplate>
    </asp:TemplateColumn>
</Columns>
<PagerStyle BackColor="LightSteelBlue" Mode="NumericPages"></PagerStyle>
</asp:DataGrid>
        <asp:button id="Button1"
       runat="server" Text="批量更新">
         </asp:button></FONT>
</form>
</body>

在上面HTML代码中，注意DataGrid控件值的数据绑定：

SelectedIndex='<%# cint(DataBinder.Eval(Container,"DataItem.degree")) %>'
DataGrid_Sample6.aspx.vb中的逻辑代码如下：
'----code begin ----------
'-省略命名空间的引用
Public Class DataGrid_Sample6
    Inherits System.Web.UI.Page
#Region " Web 窗体设计器生成的代码 "
'此处省略窗体设计器生成的代码
#End Region
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        '在此处放置初始化页的用户代码
        If Not IsPostBack Then
            getdata()
        End If
End Sub
    '读取数据
    Sub getdata()
        Dim mycon As OleDb.OleDbConnection
        viewstate("constr") = "provider=microsoft.jet.oledb.4.0;data source=" + Server.MapPath(".") + "/TeacherInfor.mdb"
        '使用viewsate保存Connection连接字符串
        Dim mycmd As OleDb.OleDbDataAdapter
        '声明DataAdapter对象
        Dim mysql As String
        '声明Command命令的 SQL字符串
        Try
            mycon = New OleDb.OleDbConnection(viewstate("constr"))
            '实例化Connection对象
            mysql = "Select id,name, sex ,degree, title,marry from teacher"
            '设置SQL语句，即查询数据库中所有内容
            mycmd = New OleDb.OleDbDataAdapter(mysql, mycon)
            Dim dt As Data.DataSet = New Data.DataSet
            '声明DataSet对象，并实例话
            mycmd.Fill(dt)
            '填充数据，即在内存中生成DataSet模型数据库
            DataGrid1.DataSource = dt.Tables(0)
            '为DataGrid1控件指定数据源
            DataGrid1.DataBind()
            '执行绑定
        Catch ex As Exception
            Response.Write("程序出错，信息描述如下：<br>" & ex.Message)
        Finally
            mycon.Close()
        End Try
End Sub
    '翻页事件
Private Sub DataGrid1_PageIndexChanged(ByVal source As Object, ByVal e As System.Web.UI.WebControls.DataGridPageChangedEventArgs) Handles DataGrid1.PageIndexChanged
        DataGrid1.CurrentPageIndex = e.NewPageIndex
        getdata()
End Sub
    '批量更新过程
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim mysql As String
        Dim sex As DropDownList
        Dim degree As DropDownList
        Dim title As DropDownList
        Dim marry As CheckBox
        Dim mycon As OleDb.OleDbConnection = New OleDb.OleDbConnection(viewstate("constr"))
        mycon.Open()
        Dim mycmd As OleDb.OleDbCommand
        Try
            Dim item As DataGridItem
            '定义item变量，代表这DataGrid控件的每一个Item项
            For Each item In DataGrid1.Items
                '遍历DataGrid1的Item项
                sex = item.FindControl("sex")
                '利用FindControl方法实例化性别字段的列表控件
                degree = item.FindControl("degree")
                '利用FindControl方法实例化学位字段的列表控件
                title = item.FindControl("title")
                '利用FindControl方法实例化职称字段的列表控件
                marry = item.FindControl("marry")
                '利用FindControl方法实例化婚否字段的列表控件
                '下面为mysql语句赋值，利用已经实例化的控件，就可以获取它的值。
                mysql = "update teacher set sex='" & sex.SelectedValue & "',degree='" & degree.SelectedValue & "'," & _
                     "marry=" & marry.Checked & ",title='" & title.SelectedValue & "' where id=" & item.Cells(0).Text
                mycmd = New OleDb.OleDbCommand(mysql, mycon)
                '写入更新
                mycmd.ExecuteNonQuery()
            Next
        Catch ex As Exception
            Response.Write("程序出错，信息描述如下：<br>" & ex.Message)
        Finally
            mycon.Close()
            Response.Write("<script>alert('恭喜您！/n你已经成功的更新了记录！');</script>")
            '提示更新成功！
        End Try
        getdata()
End Sub
End Class
'------code end ---------