zoukankan      html  css  js  c++  java
  • SQLServer获取Excel中所有Sheet

     

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

     

  • 相关阅读:
    js根据ip地址获取城市地理位置
    vue-cli项目中使用mock结合axios-mock-adapter生成模拟数据
    将图片转canvas
    判断浏览器是否联网
    头尾固定中间高度自适应布局 css
    经典闭包
    多余文字转化为省略号css
    $.grep()
    node 图片转base64
    CentOS 7下安装Mysql 5.7
  • 原文地址:https://www.cnblogs.com/AndyGe/p/1919341.html
Copyright © 2011-2022 走看看