如何使用SQL存儲過程將數據庫表數據導出到Excel

Question

假設我有一個數據庫Test和Table Employee，其中有Id，EmpName和Salary列。 現在我需要一個程序。 該過程接收一個參數：保存路徑。 在操作過程中，該過程將Excel導出到數據庫中的Employee現有表。 excel文件保存在收到的路由中。

     ALTER PROCEDURE [dbo].[ExportToExcel]
    @Year int,
@ExcelFileSaveRoutePath VARCHAR(MAX) 
AS
BEGIN
    SET NOCOUNT ON 
        SET ANSI_WARNINGS OFF
        IF 1 = 0
        BEGIN
            SET FMTONLY OFF
        END
-- Here I tried many things but  cant resolve...        
SELECT * FROM [dbo].[LOAN] l
WHERE l.Submitted = 1 and  datepart(year,l.LoanDate) = @Year   

END

Answer 1

到目前為止，這是從SQL導出到excel的最佳文章：

http://www.sqlteam.com/forums/topic.asp?TOPIC_ID=49926

引用用戶madhivanan，

除了使用DTS和導出向導外，我們還可以使用此查詢將數據從SQL Server2000導出到Excel

創建一個名為test的Excel文件，其標題與表列的標題相同，並使用這些查詢

1將數據從SQL Server表導出到現有的EXCEL文件

insert into OPENROWSET('Microsoft.Jet.OLEDB.4.0', 
    'Excel 8.0;Database=D:\testing.xls;', 
    'SELECT * FROM [SheetName$]') select * from SQLServerTable

2將數據從Excel導出到新的SQL Server表

select * 
into SQLServerTable FROM OPENROWSET('Microsoft.Jet.OLEDB.4.0', 
    'Excel 8.0;Database=D:\testing.xls;HDR=YES', 
    'SELECT * FROM [Sheet1$]')

3將數據從Excel導出到現有的SQL Server表（已編輯）

Insert into SQLServerTable Select * FROM OPENROWSET('Microsoft.Jet.OLEDB.4.0', 
    'Excel 8.0;Database=D:\testing.xls;HDR=YES', 
    'SELECT * FROM [SheetName$]')

4如果您不想預先創建一個EXCEL文件並想將數據導出到該文件，請使用

EXEC sp_makewebtask 
    @outputfile = 'd:\testing.xls', 
    @query = 'Select * from Database_name..SQLServerTable', 
    @colheaders =1, 
    @FixedFont=0,@lastupdated=0,@resultstitle='Testing details'
(Now you can find the file with data in tabular format)

5要將數據導出到帶有標題（列名）的新EXCEL文件，請創建以下過程

create procedure proc_generate_excel_with_columns
(
    @db_name    varchar(100),
    @table_name varchar(100),   
    @file_name  varchar(100)
)
as

--Generate column names as a recordset
declare @columns varchar(8000), @sql varchar(8000), @data_file varchar(100)
select 
    @columns=coalesce(@columns+',','')+column_name+' as '+column_name 
from 
    information_schema.columns
where 
    table_name=@table_name
select @columns=''''''+replace(replace(@columns,' as ',''''' as '),',',',''''')

--Create a dummy file to have actual data
select @data_file=substring(@file_name,1,len(@file_name)-charindex('\',reverse(@file_name)))+'\data_file.xls'

--Generate column names in the passed EXCEL file
set @sql='exec master..xp_cmdshell ''bcp " select * from (select '+@columns+') as t" queryout "'+@file_name+'" -c'''
exec(@sql)

--Generate data in the dummy file
set @sql='exec master..xp_cmdshell ''bcp "select * from '+@db_name+'..'+@table_name+'" queryout "'+@data_file+'" -c'''
exec(@sql)

--Copy dummy file to passed EXCEL file
set @sql= 'exec master..xp_cmdshell ''type '+@data_file+' >> "'+@file_name+'"'''
exec(@sql)

--Delete dummy file 
set @sql= 'exec master..xp_cmdshell ''del '+@data_file+''''
exec(@sql)

創建過程之后，通過提供數據庫名稱，表名稱和文件路徑來執行該過程：

EXEC proc_generate_excel_with_columns 'your dbname', 'your table name','your file path'

它平了29頁，但是那是因為其他人展示了其他各種方式，以及人們像這樣問問題如何做。

完全遵循該主題，並查看人們提出的各種問題以及如何解決。 我只是略讀了一些知識，並使用了其中的一些部分以獲得預期的結果。

更新單個單元格

彼得·拉爾森（Peter Larson）所在的成員也發表了以下文章：我認為這里缺少一件事。 能夠導出和導入到Excel文件很棒，但是如何更新單個單元格呢？ 還是一系列細胞？

這是您如何管理的原則

update OPENROWSET('Microsoft.Jet.OLEDB.4.0', 
'Excel 8.0;Database=c:\test.xls;hdr=no', 
'SELECT * FROM [Sheet1$b7:b7]') set f1 = -99

您還可以使用以下方法將公式添加到Excel：

update OPENROWSET('Microsoft.Jet.OLEDB.4.0', 
'Excel 8.0;Database=c:\test.xls;hdr=no', 
'SELECT * FROM [Sheet1$b7:b7]') set f1 = '=a7+c7'

使用T-SQL導出列名稱

成員Mladen Prajdic也在此處提供了有關如何執行此操作的博客條目

參考：www.sqlteam.com（順便說一下，對於希望從SQL Server中獲得更多收益的人來說，這是一個出色的博客/論壇）。 對於錯誤引用，我使用了這個

如果出現以下錯誤，可能會發生的錯誤：

OLE DB提供程序'Microsoft.Jet.OLEDB.4.0'不能用於分布式查詢

然后運行：

sp_configure 'show advanced options', 1;
GO
RECONFIGURE;
GO
sp_configure 'Ad Hoc Distributed Queries', 1;
GO
RECONFIGURE;
GO