if exists (select * from dbo.sysobjects where
id = object_id(N'[dbo].[People]') and OBJECTPROPERTY(id, N'IsUserTable') = 1)
drop table [dbo].[People]
GO
CREATE TABLE [dbo].[People] (
[pkID] [int] IDENTITY (1, 1) NOT NULL ,
[FirstName] [char] (100) COLLATE Chinese_PRC_CI_AS NULL ,
[LastName] [char] (100) COLLATE Chinese_PRC_CI_AS NULL
) ON [PRIMARY]
GO
EditDataGridCS.aspx
Edit People
First Name 'runat="server"/' runat="server" Width="100%"/
Last Name ' runat="server"/' runat="server" Width="100%"/
本文评论(Comments)：为了保护您的电子邮件不被骚扰，地址中的个别符号转换成了全角字符！
评论人：凌风雁
电子邮件：yblin＠163．com
评论日期：2004年06月12日 03:51:07
我这个没有办法实现删除功能！不知道为什么！！！可不可以帮助解决一下！！
新闻管理系统
AllowPaging="True" PagerStyle-Visible="false" PageSize="10" OnPageIndexChanged="change_page" runat="server" Width="550" GridLines="None" ShowFooter="false" CellPadding="2" CellSpacing="1" Font-Name="宋体" Font-Size="8pt" EnableViewState="false" AutoGenerateColumns="false" DataKeyField="id" OnDeleteCommand="Mylist_Delete">
HeaderText="" DataNavigateUrlField="id" DataNavigateUrlFormatString="newsedit.aspx?id={0}" DataTextField="标题" >
共有条记录
当前为/页
评论人：lqidiot
电子邮件：lq9904＠tom．com
评论日期：2004年04月12日 03:37:10
有没有用VB.NET语言写的,
我写了一个,但是不能实现"更新"这一功能
程序如下,能不能帮我改正一下
多谢了
Dim conn As New SqlClient.SqlConnection("server=(local); database=lq; user id=sa; password=506")
conn.Open()
Dim Cmd As SqlClient.SqlCommand
Dim SQL As String
SQL = "Update zhuce Set [学号]=@学号, [姓名]=@姓名, [性别]=@性别, [专业]=@专业 Where [学号]=@Key"
Cmd = New SqlClient.SqlCommand(SQL, conn)
Cmd.Parameters.Add(New SqlClient.SqlParameter("@学号", SqlDbType.Int))
Cmd.Parameters.Add(New SqlClient.SqlParameter("@姓名", SqlDbType.Char, 10))
Cmd.Parameters.Add(New SqlClient.SqlParameter("@性别", SqlDbType.Char, 2))
Cmd.Parameters.Add(New SqlClient.SqlParameter("@专业", SqlDbType.Char, 25))
Cmd.Parameters.Add(New SqlClient.SqlParameter("@Key", SqlDbType.Int))
Dim TB(4) As TextBox
TB(1) = e.Item.Cells(2).Controls(0) ' 学号 TextBox
TB(2) = e.Item.Cells(3).Controls(0) ' 姓名 TextBox
TB(3) = e.Item.Cells(4).Controls(0) ' 性别 TextBox
TB(4) = e.Item.Cells(5).Controls(0) ' 专业 TextBox
Label1.Text = Val(TB(1).Text) & TB(2).Text & TB(3).Text & TB(4).Text
Cmd.Parameters("@Key").Value = mygrid.DataKeys(e.Item.ItemIndex)
Cmd.Parameters("@学号").Value = Val(TB(1).Text)
Cmd.Parameters("@姓名").Value = TB(2).Text
Cmd.Parameters("@性别").Value = TB(3).Text
Cmd.Parameters("@专业").Value = TB(4).Text
Cmd.ExecuteNonQuery()
Label2.Text = Cmd.Parameters("@学号").Value & Cmd.Parameters("@姓名").Value & Cmd.Parameters("@性别").Value & Cmd.Parameters("@专业").Value
conn.Close()
mygrid.EditItemIndex = -1
open_bind()
评论人：aloner007
电子邮件：aloner_007＠163．com
评论日期：2004年03月26日 08:47:47
String strCnn = "Data Source=.;Initial Catalog=aa;User Id=sa;Password=;"; //这句语句是什么意思?
db_sqladaptor.Fill(ds,"MyDataResult");中的MyDataResult参数是什么意思!
评论人：http://dotnet.aspx.cc
电子邮件：http://dotnet．aspx．cc
评论日期：2004年02月05日 12:36:23
http://dotnet.aspx.cc
