摘自孟子E章,供你参考:InsertableDataGrid.aspx<%@ Page Language="vb" AutoEventWireup="false" Codebehind="InsertableDataGrid.aspx.vb" Inherits="aspxWeb.InserTableDataGrid"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<title>WebForm1</title>
<meta name="GENERATOR" content="Microsoft Visual Studio.NET 7.0">
<meta name="CODE_LANGUAGE" content="Visual Basic 7.0">
<meta name="vs_defaultClientScript" content="JavaScript">
<meta name="vs_targetSchema" content="http://schemas.microsoft.com/intellisense/ie5">
</HEAD>
<body MS_POSITIONING="GridLayout">
<form id="Form1" method="post" runat="server">
  <asp:DataGrid id="DataGrid1" runat="server" BorderColor="#CC9966" BorderStyle="None" 
   BorderWidth="1px" BackColor="White" CellPadding="4" ShowFooter="True" AutoGenerateColumns="False">
    <SelectedItemStyle Font-Bold="True" ForeColor="#663399" BackColor="#FFCC66"></SelectedItemStyle>
    <ItemStyle ForeColor="#330099" BackColor="White"></ItemStyle>
    <HeaderStyle Font-Bold="True" ForeColor="#FFFFCC" BackColor="#990000"></HeaderStyle>
    <FooterStyle ForeColor="#330099" BackColor="#FFFFCC"></FooterStyle>
    <Columns>
      <asp:TemplateColumn HeaderText="Employee ID">
        <ItemTemplate>
          <asp:Label id=Label3 runat="server" Text='<%# DataBinder.Eval(Container, "DataItem.employeeid") %>'>
          </asp:Label>
        </ItemTemplate>
        <FooterTemplate>
          <asp:LinkButton id="LinkButton1" runat="server" CommandName="Insert">Insert</asp:LinkButton>
        </FooterTemplate>
        <EditItemTemplate>
          <asp:TextBox id=TextBox5 runat="server" Text='<%# DataBinder.Eval(Container, "DataItem.employeeid") %>'>
          </asp:TextBox>
        </EditItemTemplate>
      </asp:TemplateColumn>
      <asp:TemplateColumn HeaderText="Last Name">
        <ItemTemplate>
          <asp:Label id=Label1 runat="server" Text='<%# DataBinder.Eval(Container, "DataItem.lastname") %>'>
          </asp:Label>
        </ItemTemplate>
        <FooterTemplate>
          <asp:TextBox id="TextBox2" runat="server"></asp:TextBox>
        </FooterTemplate>
        <EditItemTemplate>
          <asp:TextBox id="TextBox1" runat="server"></asp:TextBox>
        </EditItemTemplate>
      </asp:TemplateColumn>
      <asp:TemplateColumn HeaderText="First Name">
        <ItemTemplate>
          <asp:Label id=Label2 runat="server" Text='<%# DataBinder.Eval(Container, "DataItem.firstname") %>'>
          </asp:Label>
        </ItemTemplate>
        <FooterTemplate>
          <asp:TextBox id="TextBox4" runat="server"></asp:TextBox>
        </FooterTemplate>
        <EditItemTemplate>
          <asp:TextBox id="TextBox3" runat="server"></asp:TextBox>
        </EditItemTemplate>
      </asp:TemplateColumn>
    </Columns>
    <PagerStyle HorizontalAlign="Center" ForeColor="#330099" BackColor="#FFFFCC"></PagerStyle>
  </asp:DataGrid>
</form>
</body>
</HTML>后台代码:
Imports System.Data
Imports System.Data.SqlClientPublic Class InserTableDataGrid
  Inherits System.Web.UI.Page
  Protected WithEvents DataGrid1 As System.Web.UI.WebControls.DataGrid#Region " Web Form Designer Generated Code "  'This call is required by the Web Form Designer.
  <System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()  End Sub  Private Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init
    'CODEGEN: This method call is required by the Web Form Designer
    'Do not modify it using the code editor.
    InitializeComponent()
  End Sub#End Region  Dim connstr As String = "Integrated Security=SSPI;User ID=sa;Initial Catalog=NorthWind;Data Source=.\netsdk"  Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    If Not Page.IsPostBack Then
      BindGrid()
    End If
  End Sub  Sub BindGrid()
    Dim cnn As New SqlConnection(connstr)
    Dim da As New SqlDataAdapter("select employeeid,lastname,firstname from employees", cnn)
    Dim ds As New DataSet()
    da.Fill(ds, "employees")    DataGrid1.DataSource = ds
    DataGrid1.DataBind()
  End Sub
  Private Sub DataGrid1_ItemCommand(ByVal source As Object, ByVal e As System.Web.UI.WebControls.DataGridCommandEventArgs)_
   Handles DataGrid1.ItemCommand
    If e.CommandName = "Insert" Then
      Dim cnn As New SqlConnection(connstr)
      Dim t1 As TextBox = e.Item.FindControl("textbox2")
      Dim t2 As TextBox = e.Item.FindControl("textbox4")
      cnn.Open()
      Dim cmd As New SqlCommand("insert into employees(lastname,firstname) values('" & t1.Text & "','" & t2.Text & "')", cnn)
      cmd.ExecuteNonQuery()
      cnn.Close()
      BindGrid()
    End If
  End Sub
End Class