怎样通过ado接口再不同数据库之间转换数据？

Question

包括表结构和数据，如果能够转移别的，那么请赐教！

Answer 1

1、use 你要连接的数据库名称
2、在adocommand对象中执行该语句就可以了。

Answer 2

是不是同一种类型的数据库呀，select into不行么

Answer 3

学习
只知道数据至于结构学习
SQL Server与Access、Excel的数据转换
发表：2004-3-26 16:59:03 出处：你的博客网(yourblog.org)
--------------------------------------------------------------------------------
熟悉SQL SERVER 2000的数据库管理员都知道，其DTS可以进行数据的导入导出，其实，我们也可以使用Transact-SQL语句进行导入导出操作。在Transact-SQL语句中，我们主要使用OpenDataSource函数、OPENROWSET 函数，关于函数的详细说明，请参考SQL联机帮助。 利用下述方法，可以十分容易地实现SQL SERVER、ACCESS、EXCEL数据转换，详细说明如下：
　　一、SQL SERVER 和ACCESS的数据导入导出
　　常规的数据导入导出：
　　使用DTS向导迁移你的Access数据到SQL Server，你可以使用这些步骤:
　　1在SQL SERVER企业管理器中的Tools（工具）菜单上，选择Data Transformation
　　2Services（数据转换服务），然后选择 czdImport Data（导入数据）。
　　3在Choose a Data Source（选择数据源）对话框中选择Microsoft Access as the Source，然后键入你的.mdb数据库（.mdb文件扩展名）的文件名或通过浏览寻找该文件。
　　4在Choose a Destination（选择目标）对话框中，选择Microsoft OLE　DB Prov ider for SQL　Server，选择数据库服务器，然后单击必要的验证方式。
　　5在Specify Table Copy（指定表格复制）或Query（查询）对话框中，单击Copy tables（复制表格）。
　　6在Select Source Tables（选择源表格）对话框中，单击Select All（全部选定）。下一步，完成。
　　Transact-SQL语句进行导入导出：
　　1. 在SQL SERVER里查询access数据:
SELECT *
FROM OpenDataSource（ ’Microsoft.Jet.OLEDB.4.0’,
’Data Source="c:\DB.mdb";User ID=Admin;Password=’）...表名
　　2. 将access导入SQL server
在SQL SERVER 里运行:
SELECT *
INTO newtable
FROM OPENDATASOURCE （’Microsoft.Jet.OLEDB.4.0’,
’Data Source="c:\DB.mdb";User ID=Admin;Password=’ ）...表名
　　3. 将SQL SERVER表里的数据插入到Access表中
　　在SQL SERVER 里运行：
insert into OpenDataSource（ ’Microsoft.Jet.OLEDB.4.0’,
’Data Source=" c:\DB.mdb";User ID=Admin;Password=’）...表名
（列名1,列名2）
select 列名1,列名2 from sql表
实例：
insert into OPENROWSET（’Microsoft.Jet.OLEDB.4.0’,
’C:\db.mdb’;’admin’;’’, Test）
select id,name from Test
INSERT INTO OPENROWSET（’Microsoft.Jet.OLEDB.4.0’, ’c:\trade.mdb’; ’admin’; ’’, 表名）
SELECT *
FROM sqltablename
二、 SQL SERVER 和EXCEL的数据导入导出
　　1、在SQL SERVER里查询Excel数据:
SELECT *
FROM OpenDataSource（ ’Microsoft.Jet.OLEDB.4.0’,
’Data Source="c:\book1.xls";User ID=Admin;Password=;Extended properties=Excel 5.0’）...[Sheet1$]
下面是个查询的示例，它通过用于 Jet 的 OLE DB 提供程序查询 Excel 电子表格。
SELECT *
FROM OpenDataSource （ ’Microsoft.Jet.OLEDB.4.0’,
’Data Source="c:\Finance\account.xls";User ID=Admin;Password=;Extended properties=Excel 5.0’）...xactions
　　2、将Excel的数据导入SQL server :
SELECT * into newtable
FROM OpenDataSource（ ’Microsoft.Jet.OLEDB.4.0’,
’Data Source="c:\book1.xls";User ID=Admin;Password=;Extended properties=Excel 5.0’）...[Sheet1$]
实例:
SELECT * into newtable
FROM OpenDataSource（ ’Microsoft.Jet.OLEDB.4.0’,
’Data Source="c:\Finance\account.xls";User ID=Admin;Password=;Extended properties=Excel 5.0’）...xactions
　　3、将SQL SERVER中查询到的数据导成一个Excel文件
T-SQL代码：
EXEC master..xp_cmdshell ’bcp 库名.dbo.表名out c:\Temp.xls -c -q -S"servername" -U"sa" -P""’
参数：S 是SQL服务器名；U是用户；P是密码
说明：还可以导出文本文件等多种格式
实例:EXEC master..xp_cmdshell ’bcp saletesttmp.dbo.CusAccount out c:\temp1.xls -c -q -S"pmserver" -U"sa" -P"sa"’
EXEC master..xp_cmdshell ’bcp "SELECT au_fname, au_lname FROM pubs..authors ORDER BY au_lname" queryout C:\ authors.xls -c -Sservername -Usa -Ppassword’
在VB6中应用ADO导出EXCEL文件代码：
Dim cn As New ADODB.Connection
cn.open "Driver={SQL Server};Server=WEBSVR;DataBase=WebMis;UID=sa;WD=123;"
cn.execute "master..xp_cmdshell ’bcp "SELECT col1, col2 FROM 库名.dbo.表名" queryout E:\DT.xls -c -Sservername -Usa -Ppassword’"
　　4、在SQL SERVER里往Excel插入数据:
insert into OpenDataSource（ ’Microsoft.Jet.OLEDB.4.0’,
’Data Source="c:\Temp.xls";User ID=Admin;Password=;Extended properties=Excel 5.0’）...table1 （A1,A2,A3） values （1,2,3）
T-SQL代码：
INSERT INTO
OPENDATASOURCE（’Microsoft.JET.OLEDB.4.0’,
’Extended Properties=Excel 8.0;Data source=C:\training\inventur.xls’）...[Filiale1$]
（bestand, produkt） valueS （20, ’Test’）
　　总结：利用以上语句，我们可以方便地将SQL SERVER、ACCESS和EXCEL电子表格软件中的数据进行转换，为我们提供了极大方便！
小弟出100小分，慰劳慰劳大家，斑竹觉的好，希望能够置顶。
SQL server-->access:1)建立access:相关内容：http://www.delphibbs.com/keylife/iblog_show.asp?xid=101
2）ado指向access:相关连接代码：举一段：var
sconstr:string;//连接语句
sdbpath:string;//数据库路径
smm:string; //密码
begin
smm:='AAA';
try
sdbpath:=ExtractFilePath(Application.ExeName)+'AA67.MDB';
sconstr:='Provider=Microsoft.Jet.OLEDB.4.0;'+
'User ID=Admin;Data Source='+sdbpath+';'+
'Mode=Share Deny None;Extended Properties="";'+
'Locale Identifier=2052;Persist Security Info=False;'+
'Jet OLEDB:System database="";Jet OLEDB:Registry Path="";'+
'Jet OLEDB:Database Password='+smm+';'+
'Jet OLEDB:Engine Type=5;Jet OLEDB:Database Locking Mode=0;'+
'Jet OLEDB:Global Partial Bulk Ops=2;'+
'Jet OLEDB:Global Bulk Transactions=1;'+
'Jet OLEDB:New Database Password="";'+
'Jet OLEDB:Create System Database=False;'+
'Jet OLEDB:Encrypt Database=False;'+
'Jet OLEDB:Don''t Copy Locale on Compact=False;'+
'Jet OLEDB:Compact Without Replica Repair=False;'+
'Jet OLEDB:SFP=False';
if DM1.ADOCn1.Connected = True then DM1.ADOCn1.Connected:=False;
DM1.ADOCn1.ConnectionString:=sconstr;
DM1.ADOCn1.Connected:=True;//DM1.ADOCN1:TADOCONNECTION
except
Application.MessageBox('无法连接数据库！','错误',MB_OK+MB_ICONSTOP);
Halt;
end;
end;3）执行语句：adoconnection.Execute('SELECT * into ACCESS中的新表名 FROM SQLserver中的表名 IN [ODBC][ODBC;Driver=SQL Server;UID='+username+';PWD='+password+';Server='+servername+';DataBase='+database+';]');
access-->sqlserver:假如表存在应该删除，adoconnection指向access,执行语句：adoconnection.Execute('SELECT * into SQLserver中的新表名 IN [ODBC][ODBC;Driver=SQL Server;UID='+username+';PWD='+password+';Server='+servername+';DataBase='+database+';] FROM ACCESS中的表名')

Answer 4

adoconnection.ConnectionString中连接不同的数据库，最好，一个库用一个adoconnection
用adoquery指向不同的adoconnection中你要交换表 
在执行adoquery中的sql进行数据交换。

Answer 5

我的做法是:把不同数据库的创建表,索引,主键,重命名等不同的SQL语句封装成COM接口,用不同的标示区分数据库;通过程序把表结构SQL语句传出来,写入文本文件(或者更通用一点的做法是,把表结构信息传出来),记录数据攒成InsertSQL语句也写入文本文件,这里需要处理的地方是时间格式的字段和Blob字段.后者可以保存为文件,或者转换为Base64都可以.这种做法经过实践证明是完全可行的,呵呵

Answer 6

可考虑用savetofile、loadfromfile在不同数据库间导出导入数据

Answer 7

使用SQL SERVER 的导入导出工具

Answer 8

今天好像看到清华同方有一个软件产品（e-builder）上面的这个软件，你可以参考一下！

Answer 9

支持标准的SQL92标准的语法的部分，好像还比较容易实现。
对于其他BLOB等，各个数据库的实现就千差万别了。
请问：主要解决哪个问题？