主题：动态卸载表后数据记录丢失问题已经解决，感谢各位关注，也请多多留意注意事项！

1、新增行执行了load包括这样写：dr.load(true)，动态卸载表再重新加载进来，新增的行没有了，所有的数据记录恢复到原始状态

2、先打开要卸载的表（该表显示了表标题），然后执行卸载表命令，电脑死机，杀进程（这个问题中途有没有了，明天再测试）。

 

或许dr.load(true)只是把数据保存在了datatable中，直接卸载表时没有将保存的datarow同步到后台数据库中，按理，dr.load(true)应该及时同步数据到后台数据库。

 

望各位测试一下试试，今天的最新版，请方技术人员核实处理。

查到原因，dr.load(true)没起作用：

 

 

 

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目16.foxdb

与数据有关的事，无小事。

将卸载表的按钮改为：

 

DataTables("表A").Save()

DataTables.unload("表A")

 

 

这个和加载和卸载没有关系的。

 

另，新增行不存在Load，你要保存新增行的话，应该dr.Save()

现在的问题是dr.load(true)失去了意义，以前是可以的，dr.load(true)必须同步到后台去，datatable中获得的数据和其他用户获得的数据才是最新的，数据记录多了，不可能频繁地DataTables("表A").Save()，必须要有及时同步行的效果！

Load是从后台提取数据，新增行不存在后台数据，没有必要Load的，以前也是这样的。

 

不存在频繁DataTables(“xxx”).Save啊？

你可以：dr.Save()

 

例如：

 

MainTable = Tables("表A")
Dim dr As DataRow
For i As Integer = 0 To 10
    dr = DataTables("表A").AddNew()
    dr("第一列") = format(DataTables("表A").DataRows.Count + i,"00000")
    dr.Save()
Next

 

当然如果增加的行很多，这样还不如最后统一保存高效：

 

MainTable = Tables("表A")
Dim dr As DataRow
For i As Integer = 0 To 1000
    dr = DataTables("表A").AddNew()
    dr("第一列") = format(DataTables("表A").DataRows.Count + i,"00000")
Next
DataTables("表A").Sve()

1、帮助中load(true)说明是同时保存数据的；

2、在我的系统中，昨晚就已经连续测试dr.save()依然无效，看我的QQ留言，说的比较详尽。

新増行load(true)不自动保存，网络应用存在问题，不能将自己的新数据提交给对方，望改。