SQLServer获取Excel中所有Sheet 收藏

本文介绍了一种使用SQL Server的扩展存储过程来读取Excel文件的方法,并提供了一个具体的示例,展示了如何创建一个用户定义的函数来获取Excel工作簿中的所有工作表名称。

摘要生成于 C知道 ,由 DeepSeek-R1 满血版支持, 前往体验 >

 
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
*/

 

本文来自优快云博客,转载请标明出处:http://blog.youkuaiyun.com/jinjazz/archive/2009/08/31/4503535.aspx

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值