/*******  导出到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

　　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

　　/** 导入文本文件
　　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表)

　　*********************  导入 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

　　/********************导整个数据库*********************************************/

　　用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

　　/**********************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将文件导入导出到数据库的存储过程:

　　/*--bcp-二进制文件的导入导出

　　 支持image,text,ntext字段的导入/导出
　　 image适合于二进制文件;text,ntext适合于文本数据文件

　　 注意:导入时,将覆盖满足条件的所有行
　　  导出时,将把所有满足条件的行也出到指定文件中

　　 此存储过程仅用bcp实现
　　邹建 2003.08-----------------*/

　　/*--调用示例
　　--数据导出
　　 exec p_binaryIO ’zj’,’’,’’,’acc_演示数据..tb’,’img’,’c:\zj1.dat’

　　--数据导出
　　 exec p_binaryIO ’zj’,’’,’’,’acc_演示数据..tb’,’img’,’c:\zj1.dat’,’’,0
　　--*/
　　if exists (select * from dbo.sysobjects where id = object_id(N’[dbo].[p_binaryIO]’) and OBJECTPROPERTY(id, N’IsProcedure’) = 1)
　　drop procedure [dbo].[p_binaryIO]
　　GO

　　Create proc p_binaryIO
　　@servename varchar (30),--服务器名称
　　@username varchar (30), --用户名
　　@password varchar (30), --密码
　　@tbname varchar (500),  --数据库..表名
　　@fdname varchar (30),  --字段名
　　@fname varchar (1000), --目录+文件名,处理过程中要使用/覆盖:@filename+.bak
　　@tj varchar (1000)=’’,  --处理条件.对于数据导入,如果条件中包含@fdname,请指定表名前缀
　　@isout bit=1   --1导出((默认),0导入
　　AS
　　declare @fname_in varchar(1000) --bcp处理应答文件名
　　 ,@fsize varchar(20)   --要处理的文件的大小
　　 ,@m_tbname varchar(50)  --临时表名
　　 ,@sql varchar(8000)

　　--则取得导入文件的大小
　　if @isout=1
　　 set @fsize=’0’
　　else
　　begin
　　 create table #tb(可选名 varchar(20),大小 int
　　  ,创建日期 varchar(10),创建时间 varchar(20)
　　  ,上次写操作日期 varchar(10),上次写操作时间 varchar(20)
　　  ,上次访问日期 varchar(10),上次访问时间 varchar(20),特性 int)
　　 insert into #tb
　　 exec master..xp_getfiledetails @fname
　　 select @fsize=大小 from #tb
　　 drop table #tb
　　 if @fsize is null
　　 begin
　　  print ’文件未找到’
　　  return
　　 end

　　end

　　--生成数据处理应答文件
　　set @m_tbname=’[##temp’+cast(newid() as varchar(40))+’]’
　　set @sql=’select * into ’+@m_tbname+’ from(
　　 select null as 类型
　　 union all select 0 as 前缀
　　 union all select ’+@fsize+’ as 长度
　　 union all select null as 结束
　　 union all select null as 格式
　　 ) a’
　　exec(@sql)
　　select @fname_in=@fname+’_temp’
　　 ,@sql=’bcp "’+@m_tbname+’" out "’+@fname_in
　　 +’" /S"’+@servename
　　 +case when isnull(@username,’’)=’’ then ’’
　　  else ’" /U"’+@username end
　　 +’" /P"’+isnull(@password,’’)+’" /c’
　　exec master..xp_cmdshell @sql
　　--删除临时表
　　set @sql=’drop table ’+@m_tbname
　　exec(@sql)

　　if @isout=1
　　begin
　　 set @sql=’bcp "select top 1 ’+@fdname+’ from ’
　　  +@tbname+case isnull(@tj,’’) when ’’ then ’’
　　   else ’ where ’+@tj end
　　  +’" queryout "’+@fname
　　  +’" /S"’+@servename
　　  +case when isnull(@username,’’)=’’ then ’’
　　   else ’" /U"’+@username end
　　  +’" /P"’+isnull(@password,’’)
　　  +’" /i"’+@fname_in+’"’
　　 exec master..xp_cmdshell @sql
　　end
　　else
　　begin
　　 --为数据导入准备临时表
　　 set @sql=’select top 0 ’+@fdname+’ into ’
　　  +@m_tbname+’ from ’ +@tbname
　　 exec(@sql)

　　 --将数据导入到临时表
　　 set @sql=’bcp "’+@m_tbname+’" in "’+@fname
　　  +’" /S"’+@servename
　　  +case when isnull(@username,’’)=’’ then ’’
　　   else ’" /U"’+@username end
　　  +’" /P"’+isnull(@password,’’)
　　  +’" /i"’+@fname_in+’"’
　　 exec master..xp_cmdshell @sql
　　 
　　 --将数据导入到正式表中
　　 set @sql=’update ’+@tbname
　　  +’ set ’+@fdname+’=b.’+@fdname
　　  +’ from ’+@tbname+’ a,’
　　  +@m_tbname+’ b’
　　  +case isnull(@tj,’’) when ’’ then ’’
　　   else ’ where ’+@tj end
　　 exec(@sql)

　　 --删除数据处理临时表
　　 set @sql=’drop table ’+@m_tbname
　　end

　　--删除数据处理应答文件
　　set @sql=’del ’+@fname_in
　　exec master..xp_cmdshell @sql

　　go

　　
　　/** 导入文本文件
　　EXEC master..xp_cmdshell ’bcp "dbname..tablename" in c:\DT.txt -c -Sservername -Usa -Ppassword’

　　改为如下，不需引号
　　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’
　　此句需加引号