数据库表里的记录成功删除了,操作界面里还能看到被删除记录

kof1000 2008-03-27 04:33:29
具体问题:
通过操作界面的删除按钮删除数据库表里的记录,点"删除"按钮后表里的记录成功被删除,但是在操作界面里通过"上一条"和
"下一条"按钮还能看到被删除的记录.

删除按钮的代码如下:
Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
objConn.Open()
Dim strDEL As String = "delete From ReaderDetails where ReaderNo = '" & TextBox3.Text & "'"
Dim objCmd As New OdbcCommand(strDEL, objConn)
objCmd.ExecuteNonQuery()
objConn.Close()
loaddata()
End Sub


Form1部分代码如下:
Public Class Form1
Dim MyBind As BindingManagerBase
Dim strConn As String = "Driver={SQL Server};server=(local);Trusted_connection=Yes;Database=LibararyManagementSystem;"
Dim objConn As New OdbcConnection(strConn)
Dim objAdap As New OdbcDataAdapter()
Dim objDSet As New DataSet
Sub loaddata()
objConn.Open()
Dim strSql As String = "select * from ReaderDetails"
objAdap.SelectCommand = New OdbcCommand(strSql, objConn)
objConn.Close()
objAdap.Fill(objDSet, "ReaderDetails")
TextBox1.DataBindings.Add(New Binding("Text", objDSet, "ReaderDetails.ReaderName"))
TextBox2.DataBindings.Add(New Binding("text", objDSet, "ReaderDetails.Address"))
TextBox3.DataBindings.Add(New Binding("text", objDSet, "ReaderDetails.ReaderNo"))
TextBox4.DataBindings.Add(New Binding("text", objDSet, "Readerdetails.ReaderEmail"))
MyBind = Me.BindingContext(objDSet, "ReaderDetails")
End Sub
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

loaddata()

End Sub
:
:
:
:
Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
objConn.Open()
Dim strDEL As String = "delete From ReaderDetails where ReaderNo = '" & TextBox3.Text & "'"
Dim objCmd As New OdbcCommand(strDEL, objConn)
objCmd.ExecuteNonQuery()
objConn.Close()
loaddata()
End Sub
End Class
哪位朋友能帮看看该怎么改吗?
vb.net我是自学的,数据库连接这一章的代码现在只能看懂和模仿,自己写不出来.所以能写详细一点吗.谢谢了
...全文
1072 7 打赏 收藏 转发到动态 举报
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
W_W_Q 2008-03-31
  • 打赏
  • 举报
回复
程序层次混乱
zzy1254 2008-03-28
  • 打赏
  • 举报
回复
把数据源刷新一下就可以了
yunyun837 2008-03-28
  • 打赏
  • 举报
回复
删除数据后,重新绑定数据,页面上就没有了
apollolb2005 2008-03-28
  • 打赏
  • 举报
回复
重新绑定
kof1000 2008-03-28
  • 打赏
  • 举报
回复
删除按钮的代码如下:
Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
objConn.Open()
Dim strDEL As String = "delete From ReaderDetails where ReaderNo = '" & TextBox3.Text & "'"
Dim objCmd As New OdbcCommand(strDEL, objConn)
objCmd.ExecuteNonQuery()
objConn.Close()
loaddata() '***************************'
End Sub
删除完后我重新绑定了啊,如上代码行 loaddata() .
但是点击删除按钮后出了错
错误行:loadbind过程里的TextBox1.DataBindings.Add(New Binding("Text", objDSet, "ReaderDetails.ReaderName"))
错误提示:这将导致集合中的两个绑定绑定到同一个属性。
参数名: binding

vb.net我是自学的,数据库连接这一章的代码现在只能看懂和模仿,自己写不出来.所以能写详细一点吗.谢谢了
Fibona 2008-03-27
  • 打赏
  • 举报
回复
重新进行绑定.

this.bind();

或者你的代码中loaddata() ;重新绑定一下
沐NeMo 2008-03-27
  • 打赏
  • 举报
回复
数据更新后要刷新你绑定的控件上的数据。
按照你程序:load窗体时加载数据。
删除记录后,重新加载数据。这样做应该是看不到删除后的记录的。 如果还能看到,说明你没有真正的删除记录。

要不你在 objAdap.Fill(objDSet, "ReaderDetails") 前,先清空objDset里面的ReaderDetails数据记录。

16,718

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧