ACCESS数据库合并问题急！！！

A1窗体和B1窗体合并，采用导入与导出功能，数据是肯定问题的，除非这两个窗体是异构的，如果是同构的，方法，还是采用你用的导入和导出，成功合并之后，再为这个合半的窗体设置一个约束规则。就OK了。

有了你的conn，其它的事情就好做了：

<%

Set B_Recordset = ServerCreateObject("ADODBRecordSet")

Set A_Recordset = ServerCreateObject("ADODBRecordSet")

A_SQLString = "SELECT FROM A"

A_RecordsetOpen A_SQLString,Conn,1,1

Do While Not A_RecordsetEof

conn2Execute("INSERT INTO B("&目标字段列表&") VALUES("&A表中对应字段值列表&")")

A_RecordsetMovenext

Loop

A_RecordsetCLose

%>

这只是最简单的数据插入，找到需要同步的数据之后，逐条插入或者修改B数据库即可。如果需要其它条件，你可以修改对应的SQL查询语句以满足条件。

这个很简单

复制其中一个文件，如文件A

命名为C

打开这个文件

用链接表的方式 加入文件B的两个表，并更名

然后建立两个select into 查询 把这两个表的增加到本文件中原来的两个表中就行了。

最后，删除链接表和查询就行了

追加到另一个MDB：

insert

into

目标MDB的表名(字段列表)

in

'C:\db2mdb

'

select

字段列表

from

当前MDB的表名

或

insert

into

[;database=C:\db2mdb]目标MDB的表名(字段列表)

select

字段列表

from

当前MDB的表名

里面提到的

目标MDB的表名(字段列表)

AA库中有A，B，C表，

BB库中有A，B，C表，

且：A表中的字段：a,b,c;B表中的字段：aa,bb,cc

索然相应的表的字段一样，但各个表的字段不尽一样，且表很多

这样一个表一个表的表名列表和各个表的字段列表，工作量很大啊

又没有更好的办法去实现合并（或连接）呢？

对我有用[0]丢个板砖[0]引用举报管理TOPwangtiecheng(不知不为过，不学就是错！)等

级：更多勋章

新建一个工程，将下面代码复制到窗体的load事件里。然后将数据库复制到跟程序一个目录。在工程里引用microsoft activex data objects 27 library

Private Sub Form_Load()

Dim cn As ADODBConnection

Dim cn1 As ADODBConnection

Dim rs As ADODBRecordset

Dim rs1 As ADODBRecordset

Set cn = New ADODBConnection

Set cn1 = New ADODBConnection

Set rs = New ADODBRecordset

Set rs = New ADODBRecordset

cnConnectionString = "Provider=MicrosoftJetOLEDB40;Persist Security Info=False;Jet OLEDB:Database Password = astone;Data Source=" & AppPath & "\1mdb"

cn1ConnectionString = "Provider=MicrosoftJetOLEDB40;Persist Security Info=False;Jet OLEDB:Database Password = astone;Data Source=" & AppPath & "\2mdb"

cnOpen

cn1Open

rsOpen "select from info ", cn, adOpenStatic, adLockOptimistic

rs1Open "select from info ", cn1, adOpenStatic, adLockOptimistic

Do While Not rsEOF

rs1AddNew

rs1!字段1 = rs!字段1 '有多少字段下面写多少，字段1，2，3是字段名

rs1!字段2 = rs!字段2

rs1!字段3 = rs!字段3

rs1Update

Loop

rsClose

rs1Close

End Sub

先将需要处理的表导入到同一个数据库内

你需要建立一个新表，方法（在数据库窗口打开状态下）：

==鼠标点一下“旧表1”（不要打开旧表），点工具栏上的“复制”图标，然后点“粘贴”，这时会出现提示窗口，在这个窗口的选项里选中只粘贴表结构，并起个名字，点确定---这样就得到一个空白表。

==以设计状态打开这个“新表”，找到一个关键字，将“索引”属性设置为“有(无重复)”。保存并关闭。

==下面过程是追加数据到新表：

--鼠标点一下“旧表1”，点工具栏的“复制”图标，然后“粘贴”，在提示窗口中选中“将数据追加到已有表”（如“新表”），确定。这样“旧表1”的数据添加到了“新表”。

--鼠标点一下“旧表2”，点工具栏的“复制”图标，然后“粘贴”，在提示窗口中选中“将数据追加到已有表”（如“新表”），确定。当出现重复数据的时候，会有提示“n条记录丢失”，点“是”。

==需要注意，先追加含有最新数据的表，后追加的重复数据会被忽略。

以上就是关于ACCESS数据库合并问题急！！！全部的内容，包括:ACCESS数据库合并问题急！！！、asp文件执行两个access数据库里数据的合并、有两个access文件A和B，如何合并形成文件C等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！