有多个ACCESS文件分别是A1.mdb、A2.mdb、A3.mdb、A4.mdb....,它们里面都有多个相同的表格1、表格2、表格3、...,每个表格里的记录均不一样,现要把这些*.mdb里的同名表合并生成一个新数据库,请问有谁知道该如何在VB中代码实现?【合并的时候需要能选择*.mdb的路径(每次合并一个mdb也可以,合并多个mdb也可以)】
解决方案 »
- DataList与list之间的数据交换??急,在线等
- VB中,怎么实现在多个表中进行多条件查询,按只显示所需要的字段
- vb 如何实现读取远程服务器上的 xml 文档?
- 同志们。姐妹们,大虾们,谁能提供给小弟arviewer空间的下载地址,小生这厢有礼了
- 有这样的控件吗
- 问一个 VB Activex Exe 多进程 阻塞的问题
- adodc1.recordset ! momey
- 2个按钮,求翻月代码
- 一个菜菜的问题:制作VB安装程序时如何同时添加字体的安装?
- VisualBasic.net的书哪有下载,我等有必要马上学吗?
- vb 溢出 不知道问题出在哪?大虾们帮忙看看!!
- 有关运用迅雷开放引擎的问题
现在已经做到这个程度了
Private Sub cmdAddDB_Click()
pstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + App.Path + "\数据库名.mdb;Persist Security Info=False ;Jet OLEDB:Database Password='123456'"
conn.Open pstr
Dim sql As String
sql = "insert into tb1(数据库表) select * from [" & DB1(需要合并的数据库路径) & "].tb1"
conn.Execute sql
End Sub但是一执行到conn.Open pstr处,就报错“要求对象”,前面报错“对象打开,不能操作”。请教高手指点一下啊!!!