asp.net 编程遇到DataGrid查询问题，大家帮帮我~~~~{vb.net}

大懒猫172 2014-03-03 09:19:06

DataGrid1控件有一列“编辑”，web窗体装入时，用
Dim conn As String
conn = ConfigurationManager.AppSettings("lujing")
OleDbConnection1.ConnectionString = "Jet OLEDB:Global Partial Bulk Ops=2;吧啦吧啦省略……"
Me.OleDbSelectCommand1.CommandText = "SELECT 编号, 用户名, 姓名, 权限, 年级, 身份, 状态 FROM user1 order by 编号 desc"
Me.OleDbSelectCommand1.Connection = Me.OleDbConnection1
adp.Fill(Dsxs1, "user1")
DataGrid1.DataSource = Dsxs1
DataGrid1.DataBind()

填充DataGrid1没有问题，点击Button3按钮后

Protected Sub Button3_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button3.Click
Dsxs1.Clear()
DataGrid1.DataSource = Dsxs1
DataGrid1.DataBind()
Dim conn1 As String
conn1 = ConfigurationManager.AppSettings("lujing")
OleDbConnection1.ConnectionString = "Jet OLEDB:Global Partial Bulk Ops=2;巴拉巴拉省略…………"
adp.SelectCommand.CommandText = "SELECT * FROM user1 where 姓名 = '" & TextBox1.Text & "'"
adp.Fill(Dsxs1, "user1")
DataGrid1.DataSource = Dsxs1
DataGrid1.DataBind()
End Sub
重新填充DataGrid1控件，但是这个时候问题出来了，用下面的命令点击DataGrid1编辑列的时候
Dim nn As Integer
nn = DataGrid1.SelectedItem.Cells(0).Text
Session("num") = nn
Session.Timeout = 60000
Response.Redirect("useredit.aspx")
useredit页面得到的数据不是我选择的哪一行，而是第一次装入窗体时相对应的第n行……我这是哪里弄错了？是不是第二次填充数据的时候原来的数据没有清除掉啊？恳请各位大侠帮忙！！！！Dsxs1.Clear()不行， Dsxs1.Reset()也不行

...全文

102 8 打赏收藏转发到动态举报

写回复

用AI写文章

8 条回复

切换为时间正序

请发表友善的回复…

发表回复

q107770540 2014-03-03

打赏
举报

sub Page_Load(ByVal Sender as Object, _

              ByVal e as EventArgs)

   if not IsPostBack then
  Dim conn As String
            conn = ConfigurationManager.AppSettings("lujing")
            OleDbConnection1.ConnectionString = "Jet OLEDB:Global Partial Bulk Ops=2;巴拉巴拉……省略"
            Me.OleDbSelectCommand1.CommandText = "SELECT 编号, 用户名, 姓名, 权限, 年级, 身份, 状态 FROM user1 order by 编号 desc"
            Me.OleDbSelectCommand1.Connection = Me.OleDbConnection1
            adp.Fill(Dsxs1, "user1")
            DataGrid1.DataSource = Dsxs1
            DataGrid1.DataBind()

   end if

end sub

大懒猫172 2014-03-03

打赏
举报

上面就是我的load代码

大懒猫172 2014-03-03

打赏
举报

Dim conn As String conn = ConfigurationManager.AppSettings("lujing") OleDbConnection1.ConnectionString = "Jet OLEDB:Global Partial Bulk Ops=2;巴拉巴拉……省略" Me.OleDbSelectCommand1.CommandText = "SELECT 编号, 用户名, 姓名, 权限, 年级, 身份, 状态 FROM user1 order by 编号 desc" Me.OleDbSelectCommand1.Connection = Me.OleDbConnection1 adp.Fill(Dsxs1, "user1") DataGrid1.DataSource = Dsxs1 DataGrid1.DataBind()

q107770540 2014-03-03