我想的是点击datagrid1中的“选择”按钮,在第二个datagrid2中显示所选择的字段,点击“取消选择”按钮,取消datagrid2中所显示的字段
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
SqlDataAdapter1.Fill(DataSet11, "subject")
SqlDataAdapter2.Fill(DataSet11, "xunkeqingjiao")
If Not IsPostBack Then
DataGrid1.DataBind()
DataGrid2.DataBind()
End If
End Sub Private Sub DataGrid1_ItemCommand(ByVal source As Object, ByVal e As System.Web.UI.WebControls.DataGridCommandEventArgs) Handles DataGrid1.ItemCommand
Dim sql As String
Dim cmd As SqlCommand
Dim del As String
Dim cmddel As SqlCommand
If e.CommandName = "select" Then
e.Item.BackColor = System.Drawing.Color.LightGreen
e.Item.Font.Bold = True
sql = "insert into xunkeqingjiao (学号,课号,课程名) values ('2002211043',@dr,@list)"
SqlConnection1.Open()
cmd = New SqlCommand(sql, SqlConnection1)
cmd.Parameters.Add("@dr", e.Item.Cells(0).Text)
cmd.Parameters.Add("@list", e.Item.Cells(1).Text)
cmd.ExecuteNonQuery()
e.Item.Visible = True
Else
e.Item.BackColor = System.Drawing.Color.White
e.Item.Font.Bold = False
del = "delete from xunkeqingjiao where 学号='2002211043'"
cmddel = New SqlCommand(del, SqlConnection1)
SqlConnection1.Open()
cmddel.ExecuteNonQuery()
End If
DataGrid2.DataBind() DataGrid1.Dispose()
DataGrid2.Dispose()
SqlConnection1.Close()
End Sub
请帮我看一下哈,谢谢!!
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
SqlDataAdapter1.Fill(DataSet11, "subject")
SqlDataAdapter2.Fill(DataSet11, "xunkeqingjiao")
If Not IsPostBack Then
DataGrid1.DataBind()
DataGrid2.DataBind()
End If
End Sub Private Sub DataGrid1_ItemCommand(ByVal source As Object, ByVal e As System.Web.UI.WebControls.DataGridCommandEventArgs) Handles DataGrid1.ItemCommand
Dim sql As String
Dim cmd As SqlCommand
Dim del As String
Dim cmddel As SqlCommand
If e.CommandName = "select" Then
e.Item.BackColor = System.Drawing.Color.LightGreen
e.Item.Font.Bold = True
sql = "insert into xunkeqingjiao (学号,课号,课程名) values ('2002211043',@dr,@list)"
SqlConnection1.Open()
cmd = New SqlCommand(sql, SqlConnection1)
cmd.Parameters.Add("@dr", e.Item.Cells(0).Text)
cmd.Parameters.Add("@list", e.Item.Cells(1).Text)
cmd.ExecuteNonQuery()
e.Item.Visible = True
Else
e.Item.BackColor = System.Drawing.Color.White
e.Item.Font.Bold = False
del = "delete from xunkeqingjiao where 学号='2002211043'"
cmddel = New SqlCommand(del, SqlConnection1)
SqlConnection1.Open()
cmddel.ExecuteNonQuery()
End If
DataGrid2.DataBind() DataGrid1.Dispose()
DataGrid2.Dispose()
SqlConnection1.Close()
End Sub
请帮我看一下哈,谢谢!!
解决方案 »
- 如何讲cva2005或者vs2008的F5运行时候默认是IE浏览器改为其他浏览器啊?如360浏览器?
- aspx页面引入jquery的问题
- |zyciis| 为什么Visual Studio 2008的附加进程 在文件系统网站下可以正常调试,但在IIS网站下就无效呢 第二贴
- 一个 utf-8 编码的html文件, 里面的内容是简体中文,如何让繁体浏览器访问时候显示为 繁体中文?
- javascript取ID?????????
- ASP.NET网站上传之后访问不了
- 关于DataGrid中绑定列使用问题?!
- aspx网页有frame的概念吗?
- 请问如何控制动态生成的控件
- 做的一个新闻发布页面!!没有按照自己想的显示~有源程序~
- 怎样Web.config内设置数据库
- 在asp.net中的数据库问题
你的代码出了什么错??
你看看上面这个,对你有用