en 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
注：本站部分文章源于互联网，版权归原作者所有！如有侵权，请原作者与本站联系，本站将立即删除！ 本站文章除特别注明外均可转载，但需注明出处！ [MinTao学以致用网] 
