复制代码 代码如下:
-- Get table (worksheet) or column (field) listings from an excel spreadsheet
-- 设置变量
declare @linkedServerName sysname = "TempExcelSpreadsheet"
declare @excelFileUrl nvarchar(1000) = "D: ext.xlsx"
-- /SET
-- 删除链接服务(如果它已经存在)
if exists(select null from sys.servers where name = @linkedServerName) begin
exec sp_dropserver @server = @linkedServerName, @droplogins = "droplogins"
end
-- 添加服务对象
-- ACE 12.0 可以很好地工作为*.xls 和 *.xlsx, 你也可以用 Jet ,但是只能访问*.xls文件
exec sp_addlinkedserver
@server = @linkedServerName,
@srvproduct = "ACE 12.0",
@provider = "Microsoft.ACE.OLEDB.12.0",
@datasrc = @excelFileUrl,
@provstr = "Excel 12.0;HDR=Yes"
-- 获取当前用户
declare @suser_sname nvarchar(256) = suser_sname()
-- 添加当前用户作为登陆这个链接服务
exec sp_addlinkedsrvlogin
@rmtsrvname = @linkedServerName,
@useself = "false",
@locallogin = @suser_sname,
@rmtuser = null,
@rmtpassword = null
-- 返回 sheet 和 各个 sheet中的列
exec sp_tables_ex @linkedServerName
exec sp_columns_ex @linkedServerName
--删除链接服务对象
if exists(select null from sys.servers where name = @linkedServerName) begin
exec sp_dropserver @server = @linkedServerName, @droplogins = "droplogins"
end