以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 程序崩溃 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=94553) |
-- 作者:goldenfont -- 发布时间:2016/12/26 18:30:00 -- 程序崩溃 核对表里大概3000行数据,明细列表里大概500个明细表,代码没错,但是找10几个出来就崩溃了,咋办? For Each olddr As DataRow In DataTables("核对表").DataRows Dim no As String = olddr("编号") For Each dr As DataRow In DataTables("明细列表").DataRows Dim tblName As String = dr("列表名称") If DataTables.Contains(tblName) = False Then DataTables.Load(tblName) End If Dim newdr As DataRow = DataTables(tblName).Find("编号 = \'" & no & "\'") If newdr IsNot Nothing Then olddr("名称") = newdr("名称") DataTables.UnLoad(tblName) Exit For Else DataTables.UnLoad(tblName) End If Next Next |
-- 作者:有点色 -- 发布时间:2016/12/26 18:37:00 -- 汗死,谁叫你做500个明细表的?这样的设计根本就是有问题的。 |
-- 作者:goldenfont -- 发布时间:2016/12/26 18:49:00 -- 每个表几千条数据,都是excel导进来的,我咋整?合并起来?那单表的数据岂不是更大?多少数据里面能不崩溃? |
-- 作者:有点蓝 -- 发布时间:2016/12/26 20:11:00 -- 一个表几百万的数据都只能说是一般般的,几千条数据只能说是汗毛,连牛毛都算不上 |
-- 作者:goldenfont -- 发布时间:2016/12/27 8:12:00 -- 好吧,试一下,谢谢 |