sqlserver 脚本方式导出数据到excel

 use EntDataCenter
 go
 SET ANSI_NULLS ON
 GO
 SET QUOTED_IDENTIFIER ON
 GO
 -- =============================================
 -- Author:        <Author,,Name>
 -- Create date: <Create Date,,>
 -- Description:    <Description,,>
 -- =============================================
 --exec dbo.ent_all_DataToExcel
 create PROCEDURE  ent_all_DataToExcel

 AS
 BEGIN
     -- SET NOCOUNT ON added to prevent extra result sets from
     -- interfering with SELECT statements.
     SET NOCOUNT off;
     DECLARE @str2name varchar(8000);--二级国代分类名称
     DECLARE @str2code varchar(8000);--二级国代分类代码
     DECLARE @str1name varchar(8000);--一级国代分类名称
     DECLARE @str varchar(8000);
     DECLARE @str1 varchar(8000);
     DECLARE @server varchar(100);--服务器
     DECLARE @uname varchar(100);--用户名
     DECLARE @pwd varchar(100);--密码

     DECLARE @IsExist bit;
     select @str2name='';
     select @str2code='';
     select @str1name='';
     select @str='';
     select @str1='';
     set @server='192.168.1.7';
     set @uname='dev_db';
     set @pwd='dev_db';
     set @IsExist=0;

     ---判断文件夹是否存在，若不存在则创建文件夹----
     begin
         CREATE TABLE #tmp ([File Exists] BIT, [File is a Directory] BIT, [Parent Directory Exists] BIT)
         INSERT INTO #tmp ([File Exists], [File is a Directory], [Parent Directory Exists])
         EXEC master.dbo.xp_fileexist 'c:\project';
         SELECT @IsExist=[File is a Directory] FROM #tmp;
         if(@IsExist=0)
         begin
           ExEc xp_cmdshell 'mkdir c:\project';
         end
         drop table #tmp
     end

     DECLARE contact_cursor CURSOR FOR (SELECT   a.国代分类名称 as 二级国代分类名称,a.国代分类代码 as 二级国代分类代码,b.国代分类名称 as 一级国代分类名称
                                         FROM [EntDataCenter].[dbo].[doc_class_nation_code]  a
                                         inner join   [EntDataCenter].[dbo].[doc_class_nation_code]   b
                                         on a.PCode=b.国代分类代码  where a.Level=1)
     OPEN contact_cursor
             FETCH NEXT FROM contact_cursor
             INTO @str2name,@str2code,@str1name
             WHILE @@FETCH_STATUS = 0
             BEGIN
                          begin
                         set @str='select   a.[企业名称],a.[所在省份],a.[所在城市],' ;
                         set @str=@str+'(case b.year when 2005  then b.[total_assets] else 0 end) as [2005资产],';
                         set @str=@str+'(case b.year when 2006  then b.[total_assets] else 0 end) as [2006资产],';
                         set @str=@str+'(case b.year when 2007  then b.[total_assets] else 0 end) as [2007资产],';
                         set @str=@str+'(case b.year when 2008  then b.[total_assets] else 0 end) as [2008资产],';
                         set @str=@str+'(case b.year when 2009  then b.[total_assets] else 0 end) as [2009资产],';
                         set @str=@str+'(case b.year when 2010  then b.[total_assets] else 0 end) as [2010资产],';
                         set @str=@str+'(case b.year when 2011  then b.[total_assets] else 0 end) as [2011资产],';
                         set @str=@str+'(case b.year when 2012  then b.[total_assets] else 0 end) as [2012资产],';
                         set @str=@str+'(case b.year when 2005  then b.total_current_assets else 0 end) as [2005流动资产],';
                         set @str=@str+'(case b.year when 2006  then b.total_current_assets else 0 end) as [2006流动资产],';
                         set @str=@str+'(case b.year when 2007  then b.total_current_assets else 0 end) as [2007流动资产],';
                         set @str=@str+'(case b.year when 2008  then b.total_current_assets else 0 end) as [2008流动资产],';
                         set @str=@str+'(case b.year when 2009  then b.total_current_assets else 0 end) as [2009流动资产],';
                         set @str=@str+'(case b.year when 2010  then b.total_current_assets else 0 end) as [2010流动资产],';
                         set @str=@str+'(case b.year when 2011  then b.total_current_assets else 0 end) as [2011流动资产],';
                         set @str=@str+'(case b.year when 2012  then b.total_current_assets else 0 end) as [2012流动资产],';
                         set @str=@str+'(case b.year when 2005  then b.total_liabilities else 0 end) as [2005负债],';
                         set @str=@str+'(case b.year when 2006  then b.total_liabilities else 0 end) as [2006负债],';
                         set @str=@str+'(case b.year when 2007  then b.total_liabilities else 0 end) as [2007负债],';
                         set @str=@str+'(case b.year when 2008  then b.total_liabilities else 0 end) as [2008负债],';
                         set @str=@str+'(case b.year when 2009  then b.total_liabilities else 0 end) as [2009负债],';
                         set @str=@str+'(case b.year when 2010  then b.total_liabilities else 0 end) as [2010负债],';
                         set @str=@str+'(case b.year when 2011  then b.total_liabilities else 0 end) as [2011负债],';
                         set @str=@str+'(case b.year when 2012  then b.total_liabilities else 0 end) as [2012负债],';
                         set @str=@str+'(case b.year when 2005  then b.operating_income else 0 end) as [2005收入],';
                         set @str=@str+'(case b.year when 2006  then b.operating_income else 0 end) as [2006收入],';
                         set @str=@str+'(case b.year when 2007  then b.operating_income else 0 end) as [2007收入],';
                         set @str=@str+'(case b.year when 2008  then b.operating_income else 0 end) as [2008收入],';
                         set @str=@str+'(case b.year when 2009  then b.operating_income else 0 end) as [2009收入],';
                         set @str=@str+'(case b.year when 2010  then b.operating_income else 0 end) as [2010收入],';
                         set @str=@str+'(case b.year when 2011  then b.operating_income else 0 end) as [2011收入],';
                         set @str=@str+'(case b.year when 2012  then b.operating_income else 0 end) as [2012收入],';
                         set @str=@str+'(case b.year when 2005  then b.operating_costs else 0 end) as [2005成本],';
                         set @str=@str+'(case b.year when 2006  then b.operating_costs else 0 end) as [2006成本],';
                         set @str=@str+'(case b.year when 2007  then b.operating_costs else 0 end) as [2007成本],';
                         set @str=@str+'(case b.year when 2008  then b.operating_costs else 0 end) as [2008成本],';
                         set @str=@str+'(case b.year when 2009  then b.operating_costs else 0 end) as [2009成本],';
                         set @str=@str+'(case b.year when 2010  then b.operating_costs else 0 end) as [2010成本],';
                         set @str=@str+'(case b.year when 2011  then b.operating_costs else 0 end) as [2011成本],';
                         set @str=@str+'(case b.year when 2012  then b.operating_costs else 0 end) as [2012成本],';
                         set @str=@str+'(case b.year when 2005  then b.total_profit else 0 end) as [2005利润总额],';
                         set @str=@str+'(case b.year when 2006  then b.total_profit else 0 end) as [2006利润总额],';
                         set @str=@str+'(case b.year when 2007  then b.total_profit else 0 end) as [2007利润总额],';
                         set @str=@str+'(case b.year when 2008  then b.total_profit else 0 end) as [2008利润总额],';
                         set @str=@str+'(case b.year when 2009  then b.total_profit else 0 end) as [2009利润总额],';
                         set @str=@str+'(case b.year when 2010  then b.total_profit else 0 end) as [2010利润总额],';
                         set @str=@str+'(case b.year when 2011  then b.total_profit else 0 end) as [2011利润总额],';
                         set @str=@str+'(case b.year when 2012  then b.total_profit else 0 end) as [2012利润总额]';
                         set @str=@str+'from [dbo].[ent_all] a ';
                         set @str=@str+'left join [dbo].[Ent_All_Finance] b on a.ent_id = b.ent_id  where a.国代分类代码 like '''+@str2code+'%''';

                         --set  @str='select * from [EntDataCenter].[dbo].[doc_class_nation_code] where Level=1';
                         set @str1='bcp "'+@str+'" queryout C:\project\'+@str1name+'-'+@str2name+'.xls -c -S'+@server+' -U'+@uname+' -P'+@pwd+'';
                         end
                         --print @str1;
                         EXEC master..xp_cmdshell @str1

               FETCH NEXT FROM contact_cursor
               INTO @str2name,@str2code,@str1name
             END
             CLOSE contact_cursor
     DEALLOCATE contact_cursor

 END
 GO