以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  大数据 数据更新问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=142724)

--  作者:yifan3429
--  发布时间:2019/11/4 18:36:00
--  大数据 数据更新问题
If e.DataCol.Name = "楼盘" AndAlso e.NewValue <> Nothing Then
    \'Forms("更新提示").Show
    Dim fdr As DataRow = DataTables("楼盘资料表").Find("楼盘 = \'" & e.NewValue & "\'")
    If fdr Is Nothing Then
        fdr = DataTables("楼盘资料表").AddNew
        fdr("楼盘") = e.DataRow("楼盘")           
    End If
End If


上面的代码我有15000行资料
默认加载是500,每次执行指挥执行当前显示的500行,如何后台全部一起执行呢?
[此贴子已经被作者于2019/11/5 0:21:51编辑过]