今天研究如何在SQL中获取EXCEL中的Sheets名,在论坛中找到的答案,收藏一个以备用。
E盘根目录新建一个Excel文件aa.xls后测试如下代码
第一步:新建存储过程
use tempdb go if (object_id ('udf_getExcelTableNames' ) is not null ) drop function dbo.udf_getExcelTableNames go create function udf_getExcelTableNames (@filename varchar (1000 )) returns @t table (id int , name varchar (255 )) as begin declare @error int , @obj int , @c int , @sheetname varchar (255 ) , @sheetstring varchar (255 ) exec @error = sp_oacreate 'Excel.Application' , @obj out exec @error = sp_oamethod @obj , 'Workbooks.Open' , @c out , @filename exec @error = sp_oagetproperty @obj , 'ActiveWorkbook.Sheets.Count' , @c out while (@c > 0 ) begin set @sheetstring = 'ActiveWorkbook.Sheets(' + ltrim (@c )+ ').Name' exec @error = sp_oagetproperty @obj , @sheetstring , @sheetname out insert into @t select @c , @sheetname set @c = @c - 1 end exec @error = sp_oadestroy @obj return end go
第二步:测试代码
select * from dbo .udf_getExcelTableNames ('e:/aa.xls' )
测试结果:
/*--测试结果 3 Sheet3 2 Sheet2 1 Sheet1 */
如需删除进程,请在获取数据结整后执行以下命令即可。
drop function dbo.udf_getExcelTableNames
(原出处:http://blog.csdn.net/jinjazz/article/details/4503535)