导出到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:VFP98data; 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
*/ 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文件内容导入到一个文本文件
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 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
--则取得导入文件的大小 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
