【SQL】中导入导出Excel



http://topic.csdn.net/u/20110427/12/bea9bf89-32bc-4f9f-adce-fa3a970730db.html

在SQL中导入导出Excel

DTS导比较快

语句可以这样
SQL SERVER 和EXCEL的数据导入导出

1


、在SQL SERVER里查询Excel数据:

--


======================================================



SELECT

*
FROM

OpenDataSource


(


'


Microsoft.Jet.OLEDB.4.0


'


,




'


Data Source="c:/book1.xls";User ID=Admin;Password=;Extended properties=Excel 5.0


'


)...


[


Sheet1$


]




下面是个查询的示例，它通过用于 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




--


-----------------------------------------------------------------------------------------------












2


、将Excel的数据导入SQL server :




--


======================================================







SELECT





*





into


newtable




FROM





OpenDataSource


(


'


Microsoft.Jet.OLEDB.4.0


'


,




'


Data Source="c:/book1.xls";User ID=Admin;Password=;Extended properties=Excel 5.0


'


)...


[


Sheet1$


]




实例:




SELECT





*





into


newtable




FROM





OpenDataSource


(


'


Microsoft.Jet.OLEDB.4.0


'


,




'


Data Source="c:/Finance/account.xls";User ID=Admin;Password=;Extended properties=Excel 5.0


'


)...xactions




--


-----------------------------------------------------------------------------------------------












3


、将SQL SERVER中查询到的数据导成一个Excel文件




--


======================================================







T


-


SQL代码：




EXEC


master..xp_cmdshell


'


bcp 库名.dbo.表名out c:/Temp.xls -c -q -S"servername" -U"sa" -P""


'




参数：S 是SQL服务器名；U是用户；P是密码

说明：还可以导出文本文件等多种格式

实例:


EXEC


master..xp_cmdshell


'


bcp saletesttmp.dbo.CusAccount out c:/temp1.xls -c -q -S"pmserver" -U"sa" -P"sa"


'







EXEC


master..xp_cmdshell


'


bcp "SELECT au_fname, au_lname FROM pubs..authors ORDER BY au_lname" queryout C:/ authors.xls -c -Sservername -Usa -Ppassword


'




在VB6中应用ADO导出EXCEL文件代码：

Dim cn


As


New ADODB.Connection

cn.


open


"Driver


=


{SQL Server};Server


=


WEBSVR;


DataBase


=


WebMis;UID


=


sa;WD


=


123


;"

cn.


execute


"master..xp_cmdshell


'


bcp "SELECT col1, col2 FROM 库名.dbo.表名" queryout E:/DT.xls -c -Sservername -Usa -Ppassword


'


"




--


----------------------------------------------------------------------------------------------












4


、在SQL SERVER里往Excel插入数据:




--


======================================================







insert





into





OpenDataSource


(


'


Microsoft.Jet.OLEDB.4.0


'


,




'


Data Source="c:/Temp.xls";User ID=Admin;Password=;Extended properties=Excel 5.0


'


)...table1 (A1,A2,A3)


values


(


1


,


2


,


3


)



T


-


SQL代码：




INSERT





INTO







OPENDATASOURCE


(


'


Microsoft.JET.OLEDB.4.0


'


,




'


Extended Properties=Excel 8.0;Data source=C:/training/inventur.xls


'


)...


[


Filiale1$


]




(bestand, produkt)


VALUES


(


20


,


'


Test


'


)