以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  估计是 shuliang值 太大  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=83418)

--  作者:jinzhengbe
--  发布时间:2016/4/8 14:07:00
--  估计是 shuliang值 太大

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:xiaohou10.foxdb

入库的时候经常容易死机,或者速度非常慢

估计是 shuliang值 太大,minxi里新添加的行太多的原因。

 

有没有办法优化一下代码

 

 

非常感谢


--  作者:大红袍
--  发布时间:2016/4/8 14:26:00
--  
If e.DataCol.name = "shuliang" Then
    If e.DataRow("shuliang") Then
        Dim t As Table = Tables("rukudanhao.rukudan.minxi")
        For i As Integer = t.rows.count-1 To 0 Step -1
            t.rows(i).delete
        Next
        Dim cc As Integer =e.DataRow("shuliang")
        t.addnew(cc)
        t.save()
    End If
End If