如果你想直接插入并生成文本文件,就要用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-二进制文件的导入导出

 支持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''''

上一页  [1] [2]