ADO无法即时更新?

马喜立　发表于：2011-09-08 16:01:32 　

复制

大家看看,我有ADO 做子查询,或者做列表框,都不能及时更新,总是比实际操作慢一拍,这个事情怎么办啊?

点击下载此附件

找不到解答？

请查看 10 个与本帖内容相关的技术文章或帖子列表，确认对您的问题的解答是否会是列表中的其中一个解答。

Top

赵文斌发表于：2011-09-08 16:32:11

结构优化、深入理解ADO。

Top

都市侠影发表于：2011-09-08 16:53:43

可能在删除之后没有及时更新记录集或者子窗体的记录源。

Top

马喜立发表于：2011-09-08 17:12:40

点击下载此附件录像在这里,希望大家多帮助. 都市侠影　版主,你能出个解决方案吗?

Top

马喜立发表于：2011-09-08 17:14:01

Top

煮江品茶发表于：2011-09-08 17:27:29

用Requery刷新试试

Top

叶海峰发表于：2011-09-09 09:19:24

通过用currentdb对外部mdb进行删除,添加查询就可以了.

Private Sub CMD删除_Click()
    Dim C1 As Long
    Dim Txt1 As String

    C1 = Me.List0.ListIndex
    If (C1 >= 0) Then
        Txt1 = Me.List0.Column(1, C1)
        Sql = "Delete * From [;database=" & CurrentProject.Path & "\数据端.mdb].表1 Where AA='" & Txt1 & "'"
       CurrentDb.Execute (Sql)
       ' Cnn.Execute (Sql)
        Me.子窗体1.Requery
        Me.List0.Requery
        MsgBox "删除成功!"
    Else
        MsgBox "先选中"
    End If
End Sub