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'

它可以ping 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

如何使用SQL存储过程将数据库表数据导出到Excel

1 个答案: