| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 417 人关注过本帖
标题:关于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
快速回复:关于EXCEL表上传至SQL2000数据库的问题
数据加载中...
 
   



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

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