也談SQL Server表與Excel、Access資料互導

iSQlServer發表於2010-06-25
SQLServerExcel
要用T-SQL語句直接匯出至Excel工作薄，就不得不用借用SQL Server管理器的一個擴充套件儲存過程：xp_cmdshell，此過程的作用為“以作業系統命令列直譯器的方式執行給定的命令字串，並以文字行方式返回任何輸出。”下面為定義示例：
EXEC master..xp_cmdshell 'bcp 庫名.dbo.表名out c:\Book3.xls -c -q -S"servername" -U"sa" -P""'

--引數：S 是SQL伺服器名；U是使用者名稱；P是密碼,沒有就空著

--說明：其實用這個過程匯出的格式實質上就是文字格式的，不信的話在匯出的Excel表中改動一下再儲存看看。

    實際例子與說明如下：
也談SQL Server表與Excel、Access資料互導/*如果要將表整個匯出至Excel的話*/
EXEC master..xp_cmdshell 'bcp northwind.dbo.orders out c:\Book1.xls -c -q -S"(local)" -U"sa" -P""'

--注意句中的northwind.dbo.orders，為資料庫名＋擁有者＋表名

--直接匯出用“out”關健字

-------------------------------------------
也談SQL Server表與Excel、Access資料互導/*如果要利用查詢來匯出部分欄位至Excel的話*/
EXEC master..xp_cmdshell 'bcp "SELECT orderid,cutomerid,freight FROM northwind..orders ORDER BY orderid" queryout C:\ Book2.xls -c -S"(local)" -U"sa" -P""'

--這裡在bcp後面加了一個查詢語句，並用雙引號括起來

--利用查詢要用“queryout”關鍵字

        2、Excel匯入SQL Server表：
        在SQL Server中，有定義一個OpenDateSource函式，用於引用那些不經常訪問的 OLE DB 資料來源，而我們的資料互導操作，就是建立在這個函式之上。
        
        首先看一個T-SQL幫助中的示例，描述如下：
--下面是個查詢的示例，它通過用於 Jet 的 OLE DB 提供程式查詢 Excel 電子表格。

SELECT * 
FROM OpenDataSource( 'Microsoft.Jet.OLEDB.4.0',
  'Data Source="c:\Finance\account.xls";User ID=Admin;Password=;Extended properties=Excel 5.0')xactions


        如果你直接引用這個示例進行查詢，那麼肯定是通不過的。關鍵在於語句中的兩個地方需要修改，一處在於Data Source處，雙引號內為Excel表格的實際存放位置，要修改為你想查詢的Excel表實際完整路徑；二為最後的...xactions，其實這裡代表的是要進行的某些動作，下面會講，這裡修改成用中括號包圍的Excel表中工作表名字（加上一個$）就可以了，如[Sheet1$]。當然，還可以將Excel 5.0改為Excel 8.0，因為5.0是以前的老版本了。

        下面是例項說明：
    
也談SQL Server表與Excel、Access資料互導/*1、插入Excel中的資料到現存的sql資料庫表中（假設C盤有excel表book2.xls，book2.xls中有個工作表sheet1，sheet1中有兩列id和FName；而同時sql資料庫中也有一個表test）：*/
insert into test SELECT id,FName
FROM OpenDataSource('Microsoft.Jet.OLEDB.4.0','Data Source="c:\book2.xls";User ID=Admin;Password=;Extended properties=Excel 8.0')[sheet1$]
--如果用select * ，則列的次序會亂，資料內容也會亂，無法插入成功，所以指定列名
－－－－－－－－－－－－－－－－－－－－－－－
也談SQL Server表與Excel、Access資料互導/*2、插入excel表中資料到sql資料庫並新建一個sql表（excel的定義和內容同上）：*/
select convert(int,id)as id,FName into test7
FROM OpenDataSource('Microsoft.Jet.OLEDB.4.0','Data Source="c:\book2.xls";User ID=Admin;Password=;Extended properties=Excel 8.0')[sheet1$]
--在select 列中最好用convert進行顯示型別轉換，否則資料型別會不如預期。

        SQL Server與Excel的資料互導講解完了，你明白了嗎？而Access和Excel的基本一樣，只是要去掉Extended properties宣告。 

=======================
Delphi示例（匯出為excel表）：
ADOQ1.Close;
       ADOQ1.SQL.Clear;
       sqltrs :=
         'INSERT INTO CTable (Name1,Sex,ID)'+
         ' SELECT'+
         ' 姓名,性別,身份證號'+
         ' FROM [excel 8.0;database=' + XlsName + '].[sheet1$]';
       ADOQ1.Parameters.Clear;
       ADOQ1.ParamCheck:=false;
       ADOQ1.SQL.Text := sqltrs;
       ADOQ1.Execsql;

//注意中文欄位名左右兩邊不能有空格

來自 “ ITPUB部落格 ” ，連結：http://blog.itpub.net/16436858/viewspace-666202/，如需轉載，請註明出處，否則將追究法律責任。

相關文章