sql如何导入带密码的excel表

[zhkai1978]

请教大侠们：我是用sql2005和vb.net一起编写一个可执行程序，运行的时候需要导入excel表作为数据，但是导入的时候有两个问题
1.excel表的位置不是固定的，是vb设计一个打开窗口来定位要找的文件，并通过vb的一个变量获得文件路径和文件名，如何在sql导入的语句中把这个变量用进来啊。（我用的openrowset和opendatasource都没成功）

2.excel表是带密码的，如何能在程序里实现导入时解开这个密码啊。（我用opendatasource的password来设置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')
-------------------------------------------------------------------------------------------------

[zhkai1978]

[Quote=引用楼主 zhkai1978 的帖子:]
请教大侠们：我是用sql2005和vb.net一起编写一个可执行程序，运行的时候需要导入excel表作为数据，但是导入的时候有两个问题
1.excel表的位置不是固定的，是vb设计一个打开窗口来定位要找的文件，并通过vb的一个变量获得文件路径和文件名，如何在sql导入的语句中把这个变量用进来啊。（我用的openrowset和opendatasource都没成功）

2.excel表是带密码的，如何能在程序里实现导入时解开这个密码啊。（我用opendatasource的p…
[/Quote]


比如：路径的变量是 addr1＝d:\data.xls
excel的密码是:abcd

用语句应该如何实现，
SELECT * FROM OPENDATASOURCE('Microsoft.Jet.OLEDB.4.0',
'Data Source＝addr1;User ID=Admin;Password=abcd;Extended properties="Excel 8.0;HDR=Yes;";Persist Security Info=False')...[Sheet1$]

这样对吗？

[JYR520]

呵呵，友情UP，支持，学习中

[tribe827]

学习啦！

[rockyvan]

你這樣不對！需要稍微修改下：

SELECT * FROM OPENDATASOURCE('Microsoft.Jet.OLEDB.4.0', 
'Data Source＝' + addr1 + ';User ID=Admin;Password=abcd;Extended properties=Excel 8.0;HDR=Yes;Persist Security Info=False')...[Sheet1$]

[Daemonlord]

学习

[zhkai1978]

[Quote=引用 3 楼 rockyvan 的回复:]
你這樣不對！需要稍微修改下：

SQL codeSELECT * FROM OPENDATASOURCE('Microsoft.Jet.OLEDB.4.0',
'Data Source＝' + addr1 + ';User ID=Admin;Password=abcd;Extended properties=Excel 8.0;HDR=Yes;Persist Security Info=False')...[Sheet1$]
[/Quote]



我现在的代码：
SELECT * into sheet11
FROM OPENDATASOURCE('Microsoft.Jet.OLEDB.4.0',
'Data Source=+addr1;User ID=Admin;Password='tlsys';Extended properties="Excel 8.0;HDR=Yes;";Persist Security Info=False')...[Sheet1$]

显示这样的错误：
消息 102，级别 15，状态 1，第 1 行
'tlsys' 附近有语法错误。



如果我去掉'tlsys',执行的时候会提示这样的错误（无论我把excel表的密码是不是取消了都这样提示）：
消息 7314，级别 16，状态 1，过程 input_sheet1，第 16 行
链接服务器 "(null)" 的 OLE DB 访问接口 "Microsoft.Jet.OLEDB.4.0" 不包含表 "Sheet1$"。该表不存在，或者当前用户没有访问该表的权限。