Foxtable(狐表)用户栏目专家坐堂 → 请问:数据合并是否有更快的方法?


  共有10296人关注过本帖树形打印复制链接

主题:请问:数据合并是否有更快的方法?

帅哥哟,离线,有人找我吗?
lyfxybc
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1290 积分:9820 威望:0 精华:0 注册:2012/9/19 21:13:00
请问:数据合并是否有更快的方法?  发帖心情 Post By:2012/11/11 18:22:00 [只看该作者]

请问:数据合并是否有更快的方法?

本人试了一下,导入和导出数据时,130000条记录大约各运行1-2秒,而合并时45000条记录合并到85000条的记录中大约120秒-150秒。

 

另外:130000条记录统计时间大约15秒,时间是否太长,如何才能减少统计时间。

[此贴子已经被作者于2012-11-11 18:29:46编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
客家阿哥
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:821 积分:5932 威望:0 精华:0 注册:2012/10/24 15:01:00
  发帖心情 Post By:2012/11/11 18:37:00 [只看该作者]

我看参考书里面说导入的效率比合并高,可是一个文件里面的多个文件文件导入,因为没有例子,所以不会做

 回到顶部
帅哥哟,离线,有人找我吗?
gzdw
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:308 积分:3351 威望:0 精华:0 注册:2011/12/22 17:52:00
  发帖心情 Post By:2012/11/11 19:03:00 [只看该作者]

导入速度快得多。但导入的表名不能与原有表重复。如果能增加一个“追加”功能就好了,就是导入的记录可以添加到现有的表。
[此贴子已经被作者于2012-11-11 22:13:43编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
客家阿哥
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:821 积分:5932 威望:0 精华:0 注册:2012/10/24 15:01:00
  发帖心情 Post By:2012/11/11 19:04:00 [只看该作者]

是啊!!!

 回到顶部
帅哥哟,离线,有人找我吗?
sgs
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:365 积分:2693 威望:0 精华:1 注册:2011/11/25 7:55:00
  发帖心情 Post By:2012/11/11 19:17:00 [只看该作者]

追加不就是合并吗

 回到顶部
帅哥哟,离线,有人找我吗?
客家阿哥
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:821 积分:5932 威望:0 精华:0 注册:2012/10/24 15:01:00
  发帖心情 Post By:2012/11/11 19:20:00 [只看该作者]

怎么实现追加啊???


 回到顶部
帅哥哟,离线,有人找我吗?
lyfxybc
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1290 积分:9820 威望:0 精华:0 注册:2012/9/19 21:13:00
  发帖心情 Post By:2012/11/11 20:05:00 [只看该作者]

我用的是下列代码,放在按钮中,使用还可以,烦请各位老师再看一下有何不足之处。

 

'导出当天数据
Dim ex As New Exporter
ex.SourceTableName = "坯布信息" '指定导出表
ex.filepath = "C:\foxtable\Trial\坯布管理\Reports\坯布信息.mdb" '指定目标文件
If FileSys.FileExists(ex.FilePath) Then '如果目标文件已经存在
    FileSys.DeleteFile(ex.FilePath) '则删除之
End If
ex.Export() '开始导出

 

 

'合并access文件:

Dim mg As New Merger
mg.SourcePath = "C:\foxtable\Trial\坯布管理\Reports\坯布信息.mdb"
mg.SourceTableName = "坯布信息"  '坯布信息.mdb中的表
mg.DataTableName = "坯布输入"
mg.Merge


 '合并后删除access文件:

Filesys.DeleteFile("C:\foxtable\Trial\坯布管理\Reports\坯布信息.mdb") '合并后删除文件


 回到顶部
帅哥哟,离线,有人找我吗?
sgs
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:365 积分:2693 威望:0 精华:1 注册:2011/11/25 7:55:00
  发帖心情 Post By:2012/11/11 20:27:00 [只看该作者]


 回到顶部
帅哥哟,离线,有人找我吗?
czy
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章 三级勋章 二级勋章
等级:超级版主 帖子:6318 积分:33945 威望:0 精华:10 注册:2008/8/31 20:56:00
  发帖心情 Post By:2012/11/11 22:21:00 [只看该作者]

以下是引用lyfxybc在2012-11-11 18:22:00的发言:

请问:数据合并是否有更快的方法?

本人试了一下,导入和导出数据时,130000条记录大约各运行1-2秒,而合并时45000条记录合并到85000条的记录中大约120秒-150秒。

 

另外:130000条记录统计时间大约15秒,时间是否太长,如何才能减少统计时间。

[此贴子已经被作者于2012-11-11 18:29:46编辑过]

 

这个时间似乎并不能说明问题。

先排除合并数据时是不是触发了表事件,这很重要。


 回到顶部
帅哥哟,离线,有人找我吗?
lyfxybc
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1290 积分:9820 威望:0 精华:0 注册:2012/9/19 21:13:00
  发帖心情 Post By:2012/11/13 17:17:00 [只看该作者]

谢谢

 回到顶部
总数 14 1 2 下一页