如何实现追加导入+重复替换原记录的功能？

王三平　发表于：2008-08-29 14:17:38 　

复制

想把数据库A中的表tblCgmx中的数据追加导入到数据库B中的表tblCgmx，两表名称和数据结构一致。

数据字段有（采购单号、业务日期、品名、数量、单价、金额）。采购单号是主键，不重复。

实现追加导入功能，当主键重复时，自动用导入的记录替换原重复记录。

请大家帮忙，据此做个示例，谢谢先。

Top

竹笛发表于：2008-08-29 16:56:56

开发工作量大，仅提供思路：

1.将数据导入到表tblCgmxlist中;

2.将tblCgmxlist与表tblCgmx进行对比，重复的就删除tblCgmx中的(用删除查询,很简单的);

3.将tblCgmxlist表中的数据导入到tblCgmx中(用追加查询,很简单的);。

Top

王三平发表于：2008-08-29 17:48:33

不知那么高手，有兴趣帮忙解决呀。

Top

刘贵平发表于：2008-08-29 19:58:18

http://www.accessoft.com/article-show.asp?id=2400

可以看看我做的示例！就可以实现！第二个窗体中就有你要的功能

Top

竹笛发表于：2008-08-29 20:11:06

此示例演示的是删除重复的数据,并追加要导入的数据.

点击下载此附件

Top

pc高手发表于：2008-08-29 20:47:38

完全按照你的要求，做了一个实例。供你参考！

将表"tbl采购C" 数据追加到表 "tbl采购" 中。字段[采购单号]为主键。

在追加过程中，

凡是[采购单号]相同的，更新数据；

凡是[采购单号]不相同的，追加新记录数据。

两个表的结构完全相同。

点击下载此附件

Top

小龙发表于：2008-08-31 16:22:23

我也做了一个示例，比较简单、实用。但有个缺点是：导入表后，ID不能自动编号。

点击下载此附件

Top

王三平发表于：2008-08-31 17:19:32

谢谢PARK05抽出时间答复我的问题，思路不错，界面友好。只是运行到替换代码时，出现日期错误。

我把自定义函数改了后，就通过了。

Function CDT(MyD As Date) As String ''' 将日期返回字符串： ? CDT(DATE) #03-09-2008#
CDT = "#" & MyD & "#"
End Function

Top

王三平发表于：2008-08-31 17:25:40

lhb430的答案不合要求，但仍然要感谢他抽出时间来回复我的问题。

竹笛、刘贵平、PARK05都合要求，真不知道那2分给谁。想了一下，还是给PARK05，因为他针对我的要求，划了很多时间来作答。其次是竹笛，再是刘贵平。

我还是把最佳答案给PARK05吧，敬请各位谅解呀

Top

总记录：8篇页次：1/1 9 1 :

Access交流中心

如何实现追加导入+重复替换原记录的功能？