运行ASP，显示Microsoft JET Database Engine 错误 '80004005' - 编程论坛

自己编写了ASP程序，在IIS里面无法运行，我就用同学可以运行的ASP尝试，结果一直显示Microsoft JET Database Engine 错误 '80004005'

未指定的错误

/default.asp，行 19，我按照网上更改了权限，但是依旧没有用，请问大神这种情况怎么解决，这是他的ASP连接数据库部分
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
  dim biaoti
  biaoti="新手留言簿 V2.0"
%>

    dim Str,conn '用dim定义两个变量
        Str = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath("shuju.mdb")
        '前面是数据库驱动程序，后面是数据库路径
        Set conn = Server.CreateObject("ADODB.Connection")'建立数据库对象
    conn.open Str '用conn对象的open方法打开数据库
%>
<% '打开数据库中的某个表
    set rs=server.createobject("adodb.recordset")
    sql="select * from biao order by id desc"'* from是查询语句，后面加上表的名称，order by id desc这个是查询的方式，这里是按ID反向查询，目的是将最后的留言显示在最前面。
    rs.open sql,conn,1,1
%>

<%'------------------------------------------------------------------------
  '以下是html代码和css代码，用于限定网页背景、字体颜色、字体等。
  '------------------------------------------------------------------------%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.
<html xmlns="http://www.
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title><%=biaoti%></title>
<link href="body.css" rel="stylesheet" type="text/css" />
<style type="text/css">