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