运行网页代码时报如下错误

来源:百度知道 编辑:UC知道 时间:2024/05/21 19:01:30
错误类型:
ADODB.Connection (0x800A0E7A)
未找到提供程序。该程序可能未正确安装。
/shiyan/shujuku.asp, 第 5 行

源代码如下:
<%
Dim connstr
connstr="Provider=Micrsoft.Jet.OLEDB.4.0;Date Source="&Server.MapPath("/friends.mdb")
Set bb = Server.CreateObject("ADODB.Connection")
bb.Open connstr
%>

<html>
<head>
<title>数据库实验</title>
</head>

<body>
<%
set rs = server.CreateObject("adodb.recordset")
rs.open "select*from friends-1",bb
%>

<%=rs("name")%>
<%=rs("sex")%>
<%=rs("age")%>

</body>

</html>
我哪里错了呀????
我用的是winXP,Access2003,换个版本的Access有用没吗??

代码写错了
connstr="Provider=Micrsoft.Jet.OLEDB.4.0;Date Source="&Server.MapPath("/friends.mdb")

应该是
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Date Source="&Server.MapPath("friends.mdb")

microsoft!!!

没有安装Jet驱动引擎。你可以安装新版Access或者到微软网站下载Jet数据库驱动引擎:
http://search.microsoft.com/results.aspx?mkt=zh-CN&setlang=zh-CN&q=jet