请问为什么用一下方式保存到数据库中的数据只有从新运行时才可以看到?

htting 2006-03-08 03:46:36
Private gCon As ADODB.Connection 'ACCESS数据库文件的名称
Private gRst As ADODB.Recordset '数据库连接对象
Private gFile As String '数据库集合对象

Private Sub cmdAdd_Click() '添加姓名和手机号
gRst.AddNew
End Sub

Private Sub cmdConfirm_Click()
gRst.Fields!姓名 = txtName
gRst.Fields!手机 = txtMobile
gRst.Update
Adodc1.Refresh
DataGrid1.Refresh
MsgBox "保存成功", vbOKOnly, "提示"
End Sub

Private Sub Form_Load()
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path &\WorkTask.mdb;Persist Security Info=False"
Adodc1.CursorLocation = adUseClient
Adodc1.CommandType = adCmdText
Adodc1.RecordSource = "select * from Linkman"
Adodc1.Refresh
Set DataGrid1.DataSource = Adodc1

If Adodc1.Recordset.RecordCount = 0 Then
txtName.Text = ""
txtMobile.Text = ""
Else
txtName.Text = nz(Adodc1.Recordset.Fields(0).Value, "")
txtMobile.Text = nz(Adodc1.Recordset.Fields(1).Value, "")
End If
End Sub

由于不想在修改和添加的时候影响到datagrid中的数据,所以没有将txtName、txtMobile和adodc1绑定。
为什么在保存的时候无法看到保存后的结果呢,只有重新运行时才可以看到保存后的结果?谢谢
...全文
60 2 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
changechange 2006-03-08
  • 打赏
  • 举报
回复
你没有写清楚 gRst 的open 参数,如果是控件的话有属性可以设定的,你要查一下是否为动态集。

要用 recordset.requery 重新刷新一下的。
wwwwb 2006-03-08
  • 打赏
  • 举报
回复
try:
gRst.Update
gRst.requery
Adodc1.Refresh
DataGrid1.Refresh
MsgBox "保存成功", vbOKOnly, "提示"

1,217

社区成员

发帖
与我相关
我的任务
社区描述
VB 数据库(包含打印,安装,报表)
社区管理员
  • 数据库(包含打印,安装,报表)社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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