标题:关于EXCEL表上传至SQL2000数据库的问题
取消只看楼主
不知123
Rank: 2
等 级:论坛游民
帖 子:20
专家分:14
注 册:2012-9-3
结帖率:66.67%
 问题点数:0 回复次数:0 
关于EXCEL表上传至SQL2000数据库的问题
在本机上可以用网页上载,但换到其它机器(打开IE)就报错如下:
Microsoft JET Database Engine 错误 '80004005'

Microsoft Jet 数据库引擎打不开文''。 它已经被别的用户以独占方式打开,或没有查看数据的权限。

/test1/excelTosql.asp,行 44

代码如下:
dim aa
aa=request.form("bbb") '获取传递过来的值 Dim StrConnect,cc
Dim rs
Dim Sql
cc=0
aaa="provider=Microsoft.Jet.OLEDB.4.0; Data Source="&aa&";Extended Properties=Excel 8.0"
set StrConnect=CreateObject("ADODB.Connection")
StrConnect.Open aaa      '此行就是44'

Set rs = Server.CreateObject("ADODB.Recordset")
Sql="select * from [sheet1$] "
rs.Open Sql,StrConnect,2,2
IF rs.Eof And Rs.Bof Then
response.Write("<script language='javascript'>alert ('EXCEL表中无记录!');history.go(-1)</script>")
搜索更多相关主题的帖子: Excel EXCEL Microsoft 数据库 
2012-09-05 11:58



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-380741-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.549802 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved