sql语句导入导出大全

sql语句导入导出大全

转载自：http://www.cnblogs.com/wayne-ivan/archive/2008/01/04/1025769.html

SELECT * into newtable
FROM OpenDataSource( 'Microsoft.Jet.OLEDB.4.0',
  'Data Source="c:\aaaa.xls";User ID=Admin;Password=;Extended properties=Excel 11.0')...[Sheet1$]

/******* 导出到excel
　　exec master..xp_cmdshell 'bcp settledb.dbo.shanghu out c:\temp1.xls -c -q -s"gnetdata/gnetdata" -u"sa" -p""'

　　/*********** 导入excel
　　select * 
　　from opendatasource( 'microsoft.jet.oledb.4.0',
　　'data source="c:\test.xls";user id=admin;password=;extended properties=excel 5.0')...xactions

　　/*动态文件名
　　declare @fn varchar(20),@s varchar(1000)
　　set @fn = 'c:\test.xls'
　　set @s ='''microsoft.jet.oledb.4.0'',
　　''data source="'+@fn+'";user id=admin;password=;extended properties=excel 5.0'''
　　set @s = 'select * from opendatasource ('+@s+')...sheet1$'
　　exec(@s)
　　*/

　　select cast(cast(科目编号 as numeric(10,2)) as nvarchar(255))+'　' 转换后的别名
　　from opendatasource( 'microsoft.jet.oledb.4.0',
　　'data source="c:\test.xls";user id=admin;password=;extended properties=excel 5.0')...xactions

　　/********************** excel导到远程sql
　　insert opendatasource(
　　'sqloledb',
　　'data source=远程ip;user id=sa;password=密码'
　　).库名.dbo.表名 (列名1,列名2)
　　select 列名1,列名2
　　from opendatasource( 'microsoft.jet.oledb.4.0',
　　'data source="c:\test.xls";user id=admin;password=;extended properties=excel 5.0')...xactions


　　/** 导入文本文件
　　exec master..xp_cmdshell 'bcp dbname..tablename in c:\dt.txt -c -sservername -usa -ppassword'

　　/** 导出文本文件
　　exec master..xp_cmdshell 'bcp dbname..tablename out c:\dt.txt -c -sservername -usa -ppassword'
　　或
　　exec master..xp_cmdshell 'bcp "select * from dbname..tablename" queryout c:\dt.txt -c -sservername -usa -ppassword'

　　导出到txt文本，用逗号分开
　　exec master..xp_cmdshell 'bcp "库名..表名" out "d:\tt.txt" -c -t ,-u sa -p password'


　　bulk insert 库名..表名
　　from 'c:\test.txt'
　　with (
　　fieldterminator = ';',
　　rowterminator = '\n'
　　)


　　--/* dbase iv文件
　　select * from 
　　openrowset('microsoft.jet.oledb.4.0'
　　,'dbase iv;hdr=no;imex=2;database=c:\','select * from [客户资料4.dbf]')
　　--*/

　　--/* dbase iii文件
　　select * from 
　　openrowset('microsoft.jet.oledb.4.0'
　　,'dbase iii;hdr=no;imex=2;database=c:\','select * from [客户资料3.dbf]')
　　--*/

　　--/* foxpro 数据库
　　select * from openrowset('msdasql',
　　'driver=microsoft visual foxpro driver;sourcetype=dbf;sourcedb=c:\',
　　'select * from [aa.dbf]')
　　--*/

　　**************导入dbf文件****************/
　　select * from openrowset('msdasql',
　　'driver=microsoft visual foxpro driver;
　　sourcedb=e:\vfp98\data;
　　sourcetype=dbf',
　　'select * from customer where country != "usa" order by country')
　　go
　　/***************** 导出到dbf ***************/
　　如果要导出数据到已经生成结构(即现存的)foxpro表中,可以直接用下面的sql语句

　　insert into openrowset('msdasql',
　　'driver=microsoft visual foxpro driver;sourcetype=dbf;sourcedb=c:\',
　　'select * from [aa.dbf]')
　　select * from 表

　　说明:
　　sourcedb=c:\ 指定foxpro表所在的文件夹
　　aa.dbf 指定foxpro表的文件名.

　　/*************导出到access********************/
　　insert into openrowset('microsoft.jet.oledb.4.0', 
　　'x:\a.mdb';'admin';'',a表) select * from 数据库名..b表

　　/*************导入access********************/
　　insert into b表 selet * from openrowset('microsoft.jet.oledb.4.0', 
　　'x:\a.mdb';'admin';'',a表)

　　文件名为参数
　　declare @fname varchar(20)
　　set @fname = 'd:\test.mdb'
　　exec('select a.* from opendatasource(''microsoft.jet.oledb.4.0'',
　　'''+@fname+''';''admin'';'''', topics) as a ')

　　select * 
　　from opendatasource( 'microsoft.jet.oledb.4.0',
　　'data source="f:\northwind.mdb";jet oledb:database password=123;user id=admin;password=;')...产品

　　********************* 导入 xml　文件

　　declare @idoc int
　　declare @doc varchar(1000)
　　--sample xml document
　　set @doc ='
　　<root>
　　<customer cid= "c1" name="janine" city="issaquah">
　　<order oid="o1" date="1/20/1996" amount="3.5" />
　　<order oid="o2" date="4/30/1997" amount="13.4">customer was very satisfied
　　</order>
　　</customer>
　　<customer cid="c2" name="ursula" city="oelde" >
　　<order oid="o3" date="7/14/1999" amount="100" note="wrap it blue 
　　white red">
　　<urgency>important</urgency>
　　happy customer.
　　</order>
　　<order oid="o4" date="1/20/1996" amount="10000"/>
　　</customer>
　　</root>
　　'
　　-- create an internal representation of the xml document.
　　exec sp_xml_preparedocument @idoc output, @doc

　　-- execute a select statement using openxml rowset provider.
　　select *
　　from openxml (@idoc, '/root/customer/order', 1)
　　with (oid char(5), 
　　amount float, 
　　comment ntext 'text()')
　　exec sp_xml_removedocument @idoc

　　???????
　　/**********************excel导到txt****************************************/
　　想用
　　select * into opendatasource(...) from opendatasource(...)
　　实现将一个excel文件内容导入到一个文本文件

　　假设excel中有两列，第一列为姓名，第二列为很行帐号(16位)且银行帐号导出到文本文件后分两部分，前8位和后8位分开。


　　邹健：
　　如果要用你上面的语句插入的话,文本文件必须存在,而且有一行:姓名,银行账号1,银行账号2然后就可以用下面的语句进行插入
注意文件名和目录根据你的实际情况进行修改.

　　insert into
　　opendatasource('microsoft.jet.oledb.4.0'
　　,'text;hdr=yes;database=c:\'
　　)...[aa#txt]
　　--,aa#txt)
　　--*/
　　select 姓名,银行账号1=left(银行账号,8),银行账号2=right(银行账号,8) 
　　from 
　　opendatasource('microsoft.jet.oledb.4.0'
　　,'excel 5.0;hdr=yes;imex=2;database=c:\a.xls'
　　--,sheet1$)
　　)...[sheet1$]


　　如果你想直接插入并生成文本文件,就要用bcp　declare @sql varchar(8000),@tbname varchar(50)

　　--首先将excel表内容导入到一个全局临时表
　　select @tbname='[##temp'+cast(newid() as varchar(40))+']',@sql='select 姓名,银行账号1=left(银行账号,8),银行账号2=right(银行账号,8) 
　　into '+@tbname+' from 
　　opendatasource(''microsoft.jet.oledb.4.0''
　　,''excel 5.0;hdr=yes;imex=2;database=c:\a.xls''
　　)...[sheet1$]'
　　exec(@sql)

　　--然后用bcp从全局临时表导出到文本文件
　　set @sql='bcp "'+@tbname+'" out "c:\aa.txt" /s"(local)" /p"" /c'
　　exec master..xp_cmdshell @sql

　　--删除临时表
　　exec('drop table '+@tbname)
　　/********************导整个数据库*********************************************/
　　用bcp实现的存储过程
　　/*
　　实现数据导入/导出的存储过程
　　根据不同的参数,可以实现导入/导出整个数据库/单个表调用示例:
　　--导出调用示例
　　----导出单个表
　　exec file2table 'zj','','','xzkh_sa..地区资料','c:\zj.txt',1
　　----导出整个数据库
　　exec file2table 'zj','','','xzkh_sa','c:\docman',1

　　--导入调用示例
　　----导入单个表
　　exec file2table 'zj','','','xzkh_sa..地区资料','c:\zj.txt',0
　　----导入整个数据库
　　exec file2table 'zj','','','xzkh_sa','c:\docman',0

　　*/
　　if exists(select 1 from sysobjects where name='file2table' and objectproperty(id,'isprocedure')=1)
　　drop procedure file2table
　　go
　　create procedure file2table
　　@servername varchar(200) --服务器名
　　,@username varchar(200) --用户名,如果用nt验证方式,则为空''
　　,@password varchar(200) --密码
　　,@tbname varchar(500) --数据库.dbo.表名,如果不指定:.dbo.表名,则导出数据库的所有用户表
　　,@filename varchar(1000) --导入/导出路径/文件名,如果@tbname参数指明是导出整个数据库,则这个参数是文件存放路径,文件名自动用表名.txt
　　,@isout bit --1为导出,0为导入
　　as
　　declare @sql varchar(8000)

　　if @tbname like '%.%.%' --如果指定了表名,则直接导出单个表
　　begin
　　set @sql='bcp '+@tbname
　　+case when @isout=1 then ' out ' else ' in ' end
　　+' "'+@filename+'" /w'
　　+' /s '+@servername
　　+case when isnull(@username,'')='' then '' else ' /u '+@username end
　　+' /p '+isnull(@password,'')
　　exec master..xp_cmdshell @sql
　　end
　　else
　　begin --导出整个数据库,定义游标,取出所有的用户表
　　declare @m_tbname varchar(250)
　　if right(@filename,1)<>'\' set @filename=@filename+'\'

　　set @m_tbname='declare #tb cursor for select name from '+@tbname+'..sysobjects where xtype=''u'''
　　exec(@m_tbname)
　　open #tb
　　fetch next from #tb into @m_tbname
　　while @@fetch_status=0
　　begin
　　set @sql='bcp '+@tbname+'..'+@m_tbname
　　+case when @isout=1 then ' out ' else ' in ' end
　　+' "'+@filename+@m_tbname+'.txt " /w'
　　+' /s '+@servername
　　+case when isnull(@username,'')='' then '' else ' /u '+@username end
　　+' /p '+isnull(@password,'')
　　exec master..xp_cmdshell @sql
　　fetch next from #tb into @m_tbname
　　end
　　close #tb
　　deallocate #tb 
　　end
　　go

　　/************* oracle **************/
　　exec sp_addlinkedserver 'oraclesvr', 
　　'oracle 7.3', 
　　'msdaora', 
　　'orcldb'
　　go

　　delete from openquery(mailser,'select * from yulin')

　　select * from openquery(mailser,'select * from yulin')

　　update openquery(mailser,'select * from yulin where id=15')set disorder=555,catago=888

　　insert into openquery(mailser,'select disorder,catago from yulin')values(333,777)

　　补充：

　　对于用bcp导出,是没有字段名的.

　　用openrowset导出,需要事先建好表.

　　用openrowset导入,除access及excel外,均不支持非本机数据导入



从Excel文件中,导入数据到SQL数据库中,很简单,直接用下面的语句:

/*===================================================================*/
--如果接受数据导入的表已经存在
insert into 表 select * from
OPENROWSET('MICROSOFT.JET.OLEDB.4.0'
,'Excel 5.0;HDR=YES;DATABASE=c:\test.xls',sheet1$)

--如果导入数据并生成表
select * into 表 from
OPENROWSET('MICROSOFT.JET.OLEDB.4.0'
,'Excel 5.0;HDR=YES;DATABASE=c:\test.xls',sheet1$)


/*===================================================================*/
--如果从SQL数据库中,导出数据到Excel,如果Excel文件已经存在,而且已经按照要接收的数据创建好表头,就可以简单的用:
insert into OPENROWSET('MICROSOFT.JET.OLEDB.4.0'
,'Excel 5.0;HDR=YES;DATABASE=c:\test.xls',sheet1$)
select * from 表


--如果Excel文件不存在,也可以用BCP来导成类Excel的文件,注意大小写:
--导出表的情况
EXEC master..xp_cmdshell 'bcp 数据库名.dbo.表名 out "c:\test.xls" /c -/S"服务器名" /U"用户名" -P"密码"'

--导出查询的情况
EXEC master..xp_cmdshell 'bcp "SELECT au_fname, au_lname FROM pubs..authors ORDER BY au_lname" queryout "c:\test.xls" /c -/S"服务器名" /U"用户名" -P"密码"'

说明.

c:\test.xls 为导入/导出的Excel文件名.
sheet1$ 为Excel文件的工作表名,一般要加上$才能正常使用.



下面是导出真正Excel文件的方法:


/*--数据导出EXCEL

导出表中的数据到Excel,包含字段名,文件为真正的Excel文件
,如果文件不存在,将自动创建文件
,如果表不存在,将自动创建表
基于通用性考虑,仅支持导出标准数据类型
---*/

/*--调用示例

p_exporttb @tbname='地区资料',@path='c:\',@fname='aa.xls'
--*/
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[p_exporttb]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
drop procedure [dbo].[p_exporttb]
GO

create proc p_exporttb
@tbname sysname, --要导出的表名,注意只能是表名/视图名
@path nvarchar(1000), --文件存放目录
@fname nvarchar(250)='' --文件名,默认为表名
as
declare @err int,@src nvarchar(255),@desc nvarchar(255),@out int
declare @obj int,@constr nvarchar(1000),@sql varchar(8000),@fdlist varchar(8000)

--参数检测
if isnull(@fname,'')='' set @fname=@tbname+'.xls'

--检查文件是否已经存在
if right(@path,1)<>'\' set @path=@path+'\'
create table #tb(a bit,b bit,c bit)
set @sql=@path+@fname
insert into #tb exec master..xp_fileexist @sql

--数据库创建语句
set @sql=@path+@fname
if exists(select 1 from #tb where a=1)
set @constr='DRIVER={Microsoft Excel Driver (*.xls)};DSN='''';READONLY=FALSE'
+';CREATE_DB="'+@sql+'";DBQ='+@sql
else
set @constr='Provider=Microsoft.Jet.OLEDB.4.0;Extended Properties="Excel 5.0;HDR=YES'
+';DATABASE='+@sql+'"'

--连接数据库
exec @err=sp_oacreate 'adodb.connection',@obj out
if @err<>0 goto lberr

exec @err=sp_oamethod @obj,'open',null,@constr
if @err<>0 goto lberr

--创建表的SQL
select @sql='',@fdlist=''
select @fdlist=@fdlist+','+a.name
,@sql=@sql+',['+a.name+'] '
+case when b.name in('char','nchar','varchar','nvarchar') then
'text('+cast(case when a.length>255 then 255 else a.length end as varchar)+')'
when b.name in('tynyint','int','bigint','tinyint') then 'int'
when b.name in('smalldatetime','datetime') then 'datetime'
when b.name in('money','smallmoney') then 'money'
else b.name end
FROM syscolumns a left join systypes b on a.xtype=b.xusertype
where b.name not in('image','text','uniqueidentifier','sql_variant','ntext','varbinary','binary','timestamp')
and object_id(@tbname)=id
select @sql='create table ['+@tbname
+']('+substring(@sql,2,8000)+')'
,@fdlist=substring(@fdlist,2,8000)

exec @err=sp_oamethod @obj,'execute',@out out,@sql
if @err<>0 goto lberr

exec @err=sp_oadestroy @obj

--导入数据
set @sql='openrowset(''MICROSOFT.JET.OLEDB.4.0'',''Excel 5.0;HDR=YES
;DATABASE='+@path+@fname+''',['+@tbname+'$])'

exec('insert into '+@sql+'('+@fdlist+') select '+@fdlist+' from '+@tbname)

return

lberr:
exec sp_oageterrorinfo 0,@src out,@desc out
lbexit:
select cast(@err as varbinary(4)) as 错误号
,@src as 错误源,@desc as 错误描述
select @sql,@constr,@fdlist
go



*--数据导出EXCEL

导出查询中的数据到Excel,包含字段名,文件为真正的Excel文件
,如果文件不存在,将自动创建文件
,如果表不存在,将自动创建表
基于通用性考虑,仅支持导出标准数据类型
--*/

/*--调用示例

p_exporttb @sqlstr='select * from 地区资料'
,@path='c:\',@fname='aa.xls',@sheetname='地区资料'
--*/
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[p_exporttb]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
drop procedure [dbo].[p_exporttb]
GO

create proc p_exporttb
@sqlstr sysname, --查询语句,如果查询语句中使用了order by ,请加上top 100 percent,注意,如果导出表/视图,用上面的存储过程
@path nvarchar(1000), --文件存放目录
@fname nvarchar(250), --文件名
@sheetname varchar(250)='' --要创建的工作表名,默认为文件名
as
declare @err int,@src nvarchar(255),@desc nvarchar(255),@out int
declare @obj int,@constr nvarchar(1000),@sql varchar(8000),@fdlist varchar(8000)

--参数检测
if isnull(@fname,'')='' set @fname='temp.xls'
if isnull(@sheetname,'')='' set @sheetname=replace(@fname,'.','#')

--检查文件是否已经存在
if right(@path,1)<>'\' set @path=@path+'\'
create table #tb(a bit,b bit,c bit)
set @sql=@path+@fname
insert into #tb exec master..xp_fileexist @sql

--数据库创建语句
set @sql=@path+@fname
if exists(select 1 from #tb where a=1)
set @constr='DRIVER={Microsoft Excel Driver (*.xls)};DSN='''';READONLY=FALSE'
+';CREATE_DB="'+@sql+'";DBQ='+@sql
else
set @constr='Provider=Microsoft.Jet.OLEDB.4.0;Extended Properties="Excel 5.0;HDR=YES'
+';DATABASE='+@sql+'"'

--连接数据库
exec @err=sp_oacreate 'adodb.connection',@obj out
if @err<>0 goto lberr

exec @err=sp_oamethod @obj,'open',null,@constr
if @err<>0 goto lberr

--创建表的SQL
declare @tbname sysname
set @tbname='##tmp_'+convert(varchar(38),newid())
set @sql='select * into ['+@tbname+'] from('+@sqlstr+') a'
exec(@sql)

select @sql='',@fdlist=''
select @fdlist=@fdlist+','+a.name
,@sql=@sql+',['+a.name+'] '
+case when b.name in('char','nchar','varchar','nvarchar') then
'text('+cast(case when a.length>255 then 255 else a.length end as varchar)+')'
when b.name in('tynyint','int','bigint','tinyint') then 'int'
when b.name in('smalldatetime','datetime') then 'datetime'
when b.name in('money','smallmoney') then 'money'
else b.name end
FROM tempdb..syscolumns a left join tempdb..systypes b on a.xtype=b.xusertype
where b.name not in('image','text','uniqueidentifier','sql_variant','ntext','varbinary','binary','timestamp')
and a.id=(select id from tempdb..sysobjects where name=@tbname)
select @sql='create table ['+@sheetname
+']('+substring(@sql,2,8000)+')'
,@fdlist=substring(@fdlist,2,8000)

exec @err=sp_oamethod @obj,'execute',@out out,@sql
if @err<>0 goto lberr

exec @err=sp_oadestroy @obj

--导入数据
set @sql='openrowset(''MICROSOFT.JET.OLEDB.4.0'',''Excel 5.0;HDR=YES
;DATABASE='+@path+@fname+''',['+@sheetname+'$])'

exec('insert into '+@sql+'('+@fdlist+') select '+@fdlist+' from ['+@tbname+']')

set @sql='drop table ['+@tbname+']'
exec(@sql)
return

lberr:
exec sp_oageterrorinfo 0,@src out,@desc out
lbexit:
select cast(@err as varbinary(4)) as 错误号
,@src as 错误源,@desc as 错误描述
select @sql,@constr,@fdlist
go


SQL Server 阻止了对组件 \'Ad Hoc Distributed Queries\' 的访问

    在Sql Server中查询一下Excel文件的时候出现问题：
SELECT *  FROM OPENROWSET( 'MICROSOFT.JET.OLEDB.4.0','Excel 8.0;IMEX=1;HDR=YES;DATABASE=D:\a.xls',[sheet1$])
    结果提示：
    SQL Server 阻止了对组件 'Ad Hoc Distributed Queries' 的 STATEMENT'OpenRowset/OpenDatasource' 的访问，因为此组件已作为此服务器安全配置的一部分而被关闭。系统管理员可以通过使用 sp_configure 启用 'Ad Hoc Distributed Queries'。有关启用 'Ad Hoc Distributed Queries' 的详细信息，请参阅 SQL Server 联机丛书中的 "外围应用配置器"。
查询相关资料，找到解决方法：

    启用Ad Hoc Distributed Queries：
exec sp_configure 'show advanced options',1
reconfigure
exec sp_configure 'Ad Hoc Distributed Queries',1
reconfigure
    使用完成后，关闭Ad Hoc Distributed Queries：
exec sp_configure 'Ad Hoc Distributed Queries',0
reconfigure
exec sp_configure 'show advanced options',0
reconfigure

熟悉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电子表格软件中的数据进行转换，为我们提供了极大方便！


搞了半天，直接登录到服务器，然后使用导入搞定
                  ～～～～～～～～～～～～～～～
                  消息 15281，级别 16，状态 1，第 1 行
                  SQL Server 阻止了对组件 'Ad Hoc Distributed Queries' 的
                  STATEMENT'OpenRowset/OpenDatasource'
                  的访问，因为此组件已作为此服务器安全配置的一部分而被关闭。系统管理员可以通过使用 sp_configure 启用 'Ad
                  Hoc Distributed Queries'。有关启用 'Ad Hoc Distributed Queries'
                  的详细信息，请参阅 SQL Server 联机丛书中的 "外围应用配置器"。
                  http://support.microsoft.com/kb/321686
                  配置选项 'show advanced options' 已从 0 更改为 1。请运行 RECONFIGURE
语句进行安装。
                  配置选项 'Ad Hoc Distributed Queries' 已从 0 更改为 1。请运行 RECONFIGURE
                  语句进行安装。
                  链接服务器"(null)"的 OLE DB 访问接口 "Microsoft.Jet.OLEDB.4.0" 返回了消息
                  "找不到可安装的 ISAM。"。
                  消息 7303，级别 16，状态 1，第 2 行
                  无法初始化链接服务器 "(null)" 的 OLE DB 访问接口 "Microsoft.Jet.OLEDB.4.0"
                  的数据源对象。
                  配置选项 'Ad Hoc Distributed Queries' 已从 1 更改为 0。请运行 RECONFIGURE
                  语句进行安装。
                  配置选项 'show advanced options' 已从 1 更改为 0。请运行 RECONFIGURE
语句进行安装。
                  启用Ad Hoc Distributed Queries：
                  exec sp_configure 'show advanced options',1
                  reconfigure
                  exec sp_configure 'Ad Hoc Distributed Queries',1
                  reconfigure
                  关闭Ad Hoc Distributed Queries：
                  exec sp_configure 'Ad Hoc Distributed Queries',0
                  reconfigure
                  exec sp_configure 'show advanced options',0
                  reconfigure
                  配置选项 'show advanced options' 已从 0 更改为 1。请运行 RECONFIGURE
语句进行安装。
                  配置选项 'Ad Hoc Distributed Queries' 已从 0 更改为 1。请运行 RECONFIGURE
                  语句进行安装。
                  消息 7314，级别 16，状态 1，第 2 行
                  链接服务器 "(null)" 的 OLE DB 访问接口 "Microsoft.Jet.OLEDB.4.0" 不包含表
                  "sheet1$"。该表不存在，或者当前用户没有访问该表的权限。
                  配置选项 'Ad Hoc Distributed Queries' 已从 1 更改为 0。请运行 RECONFIGURE
                  语句进行安装。
                  配置选项 'show advanced options' 已从 1 更改为 0。请运行 RECONFIGURE
语句进行安装。
                  SQL   SERVER   与ACCESS、EXCEL的数据转换
                  熟悉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')   
                  -------------------------------------------------------------------------------------------------