【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


'


)