將SQLServer結(jié)果導(dǎo)出為excel文件

    相信大家常常會遇到將SqlServer查詢結(jié)果導(dǎo)出到Excel的問題。如果導(dǎo)出的次數(shù)少，直接“Save Results As...”就是了;但是當(dāng)要分別在每個表取樣，那就相當(dāng)麻煩了。今天就為大家提供一個脫離office組件的可以將語句結(jié)果導(dǎo)出到Excel的過程，希望會對大家有幫助!
    ---導(dǎo)出到Excel
    ---使用說明：
    -- 1.執(zhí)行時所連接的服務(wù)器決定文件存放在哪個服務(wù)器
    -- 2.遠(yuǎn)程查詢語句中，要加上數(shù)據(jù)庫名
    ALTER PROC ExportFile
    @QuerySql VARCHAR(max)
    ,@Server VARCHAR(20)
    ,@User VARCHAR(20)
    ,@Password VARCHAR(20)
    ,@FilePath NVARCHAR(100) = 'c:ExportFile.xls'
    AS
    DECLARE @tmp VARCHAR(50) = '[##Table' + CONVERT(VARCHAR(36),NEWID())+']'
    BEGIN TRY
    DECLARE @Sql VARCHAR(max),@DataSource VARCHAR(max)='';
    --判斷是否為遠(yuǎn)程服務(wù)器
    IF @Server <> '.' AND @Server <> '127.0.0.1'
    SET @DataSource = 'OPENDATASOURCE(''SQLOLEDB'',''Data
    --將結(jié)果集導(dǎo)出到指定的數(shù)據(jù)庫
    SET @Sql = REPLACE(@QuerySql,' from ',' into + ' from ' + @DataSource)
    PRINT @Sql
    EXEC(@Sql)
    DECLARE @Columns VARCHAR(max) = '',@Data NVARCHAR(max)=''
    SELECT @Columns = @Columns + ',''' + name +''''--獲取列名(xp_cmdshell導(dǎo)出文件沒有列名)
    ,@Data = @Data + ',Convert(Nvarchar,[' + name +'])'--將結(jié)果集所在的字段更新為nvarchar(避免在列名和數(shù)據(jù)union的時候類型沖突)
    FROM tempdb.sys.columns WHERE object_id = OBJECT_ID()
    SELECT @Data = 'SELECT ' + SUBSTRING(@Data,2,LEN(@Data)) + ' FROM ' + @tmp
    SELECT @Columns = 'Select ' + SUBSTRING(@Columns,2,LEN(@Columns))
    --使用xp_cmdshell的bcp命令將數(shù)據(jù)導(dǎo)出
    EXEC sp_configure 'xp_cmdshell',1
    RECONFIGURE
    DECLARE @cmd NVARCHAR(4000) = 'bcp "' + @Columns+' Union All ' + @Data+'" queryout ' + @FilePath + ' -c -T'
    PRINT @cmd
    exec sys.xp_cmdshell @cmd
    EXEC sp_configure 'xp_cmdshell',0
    RECONFIGURE
    EXEC('DROP TABLE ' + @tmp)
    END TRY
    BEGIN CATCH
    --處理異常
    IF OBJECT_ID() IS NOT NULL
    EXEC('DROP TABLE ' + @tmp)
    EXEC sp_configure 'xp_cmdshell',0
    RECONFIGURE
    SELECT ERROR_MESSAGE()
    END CATCH