綠色資源網(wǎng):您身邊最放心的安全下載站! 最新軟件|熱門(mén)排行|軟件分類(lèi)|軟件專題|論壇轉(zhuǎn)帖|廠商大全

綠色資源網(wǎng)

技術(shù)教程
您的位置:首頁(yè)數(shù)據(jù)庫(kù)類(lèi)SQL Server → Sql Server 數(shù)據(jù)庫(kù)表查詢結(jié)果導(dǎo)出為excel文件

Sql Server 數(shù)據(jù)庫(kù)表查詢結(jié)果導(dǎo)出為excel文件

我要評(píng)論 2012/12/26 15:17:44 來(lái)源:綠色資源網(wǎng) 編輯:sonlywya.cn [ ] 評(píng)論:0 點(diǎn)擊:309次

相信大家常常會(huì)遇到將SqlServer查詢結(jié)果導(dǎo)出到Excel的問(wèn)題。如果導(dǎo)出的次數(shù)少,直接“Save Results As...”就是了;

1.1準(zhǔn)備好查詢語(yǔ)句

1.2選擇數(shù)據(jù)庫(kù),啟動(dòng)導(dǎo)入和導(dǎo)出向?qū)?/strong>

1.3選擇數(shù)據(jù)源

1.4選擇目標(biāo)

1.5

1.6

1.7

1.8

后續(xù)步驟不再附圖,一直點(diǎn)“下一步”按鈕就好。

2、但是當(dāng)要分別在每個(gè)表取樣,那就相當(dāng)麻煩了。今天就為大家提供一個(gè)脫離office組件的可以將語(yǔ)句結(jié)果導(dǎo)出到Excel的過(guò)程,希望會(huì)對(duì)大家有幫助!

---導(dǎo)出到Excel
---使用說(shuō)明:
--        1.執(zhí)行時(shí)所連接的服務(wù)器決定文件存放在哪個(gè)服務(wù)器
--        2.遠(yuǎn)程查詢語(yǔ)句中,要加上數(shù)據(jù)庫(kù)名
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 Source='+@Server+';User ID='+@User+';Password='+@Password+''').'
        --將結(jié)果集導(dǎo)出到指定的數(shù)據(jù)庫(kù)
        SET @Sql = REPLACE(@QuerySql,' from ',' into '+@tmp+ ' from ' + @DataSource)
        PRINT @Sql
        EXEC(@Sql)
       
        DECLARE @Columns VARCHAR(max) = '',@Data NVARCHAR(max)=''
        SELECT @Columns = @Columns + ',''' + name +''''--獲取列名(xp_cmdshell導(dǎo)出文件沒(méi)有列名)
            ,@Data = @Data + ',Convert(Nvarchar,[' + name +'])'--將結(jié)果集所在的字段更新為nvarchar(避免在列名和數(shù)據(jù)union的時(shí)候類(lèi)型沖突)
        FROM tempdb.sys.columns WHERE object_id = OBJECT_ID('tempdb..'+@tmp)
        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('tempdb..'+@tmp) IS NOT NULL
            EXEC('DROP TABLE ' + @tmp)
        EXEC sp_configure 'xp_cmdshell',0
        RECONFIGURE
       
        SELECT ERROR_MESSAGE()
    END CATCH

先不要著急使用,該版本是基于xp_cmdshell的,因?yàn)橐獎(jiǎng)?chuàng)建文件,所以要保證你的用戶能有文件管理的權(quán)限,通常簡(jiǎn)單點(diǎn)的方法就是將sql server的啟動(dòng)用戶設(shè)置為本地系統(tǒng)用戶

好了,現(xiàn)在我們來(lái)執(zhí)行看看:

--查詢分析器連接哪個(gè)服務(wù)器,文件就在哪個(gè)服務(wù)器上
--本地導(dǎo)出
EXEC dbo.ExportFile @QuerySql = 'select * from sys.objects', -- varchar(max)
    @Server = '.', -- varchar(20)
    @FilePath = N'c:\objects.xls' -- nvarchar(100)

--遠(yuǎn)程導(dǎo)出
EXEC dbo.ExportFile @QuerySql = 'select * from master.sys.objects', -- varchar(max)
    @Server = '192.168.1.52', -- varchar(20)
    @User = 'sa', -- varchar(20)
    @Password = 'sa', -- varchar(20)
    @FilePath = N'c:\52objects.xls' -- nvarchar(100)

執(zhí)行結(jié)果如下,顯示導(dǎo)出條數(shù),就沒(méi)有報(bào)錯(cuò),再看看你的C盤(pán),多了2個(gè)文件就大功告成了:

關(guān)鍵詞:SqlServer,數(shù)據(jù)庫(kù),excel

閱讀本文后您有什么感想? 已有 人給出評(píng)價(jià)!

  • 0 歡迎喜歡
  • 0 白癡
  • 0 拜托
  • 0 哇
  • 0 加油
  • 0 鄙視