以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  退出保存数据  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=179776)

--  作者:lxmoffice
--  发布时间:2022/9/8 13:21:00
--  退出保存数据
老师,

您好!

想请教一个问题,当表很多情况下,退时系统时,用下面代码保存数据比较慢,造成系统有时不能正常退出。
可否有方法只针对修改过的表进行保存?



\'Dim Rs As DialogResult
\'Rs = MessageBox.Show("你要保存数据吗?","提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
\'If Rs = DialogResult.Yes Then
    
    \'For Each tb As Table In Tables
        \'tb.Save()
    \'Next
    
\'End If

--  作者:有点蓝
--  发布时间:2022/9/8 13:32:00
--  
Dim Rs As DialogResult
Rs = MessageBox.Show("你要保存数据吗?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If Rs = DialogResult.Yes Then
    DataTables.Save()
End If