以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 如何加快数据导入速度 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=188491) |
|
-- 作者:ZJZK2018 -- 发布时间:2023/9/22 12:53:00 -- 如何加快数据导入速度 如何加快数据导入速度: 如果数据量大的话,用下面代码导入速度有点慢,有没有更快的办法? Dim ndr As Row = Tables("AA").AddNew() For n As Integer = 1 To elems.Count - 2 Dim tds = elems(n).GetElementsByTagName("td") ndr = Tables("AA").AddNew() For tn As Integer = 0 To tds.Count -1 ndr(tn) = tds(tn).InnerText Next Next |
|
-- 作者:cd_tdh -- 发布时间:2023/9/22 13:07:00 -- 直接导入到数据库 |
|
-- 作者:ZJZK2018 -- 发布时间:2023/9/22 13:29:00 -- 怎么
|
|
-- 作者:有点蓝 -- 发布时间:2023/9/22 13:33:00 -- 如果是SqlServer数据库,可以看看:http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=159738&replyID=&skin=1 或者看看:http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=147288
|
|
-- 作者:ZJZK2018 -- 发布时间:2023/9/22 18:45:00 -- 老师你们是表与表之间导入,我这个是大集合里面的数据导入到指定表里面,如何处理 Dim tds = elems(n).GetElementsByTagName("td")
|
|
-- 作者:有点蓝 -- 发布时间:2023/9/23 8:33:00 -- 禁止绘制 Tables("AA").StopRedraw 原来的代码 Tables("AA").ResumeRedraw
|
|
-- 作者:ZJZK2018 -- 发布时间:2023/9/23 14:21:00 -- 加上后速度没有什么加快,有没有其他办法?? Tables("AA").StopRedraw Dim ndr As Row = Tables("AA").AddNew() For n As Integer = 1 To elems.Count - 2 Dim tds = elems(n).GetElementsByTagName("td") ndr = Tables("AA").AddNew() For tn As Integer = 0 To tds.Count -1 ndr(tn) = tds(tn).InnerText Next Next Tables("AA").ResumeRedraw
|
|
-- 作者:有点蓝 -- 发布时间:2023/9/23 14:32:00 -- 没有办法,估计慢是GetElementsByTagName这种提取网页数据的功能,这种没有任何办法加速 4楼的方法只能是提高把数据直接保存到数据库的速度,没有办法提高遍历网页元素的速度
|