lol风女符文s7:Microsoft OLE DB Provider for ODBC Drivers 错误 \'80004005\'

具体如下:本地测试,打开浏览器,输入http://localhost/yascoolblog
出现以下提示:
Microsoft OLE DB Provider for ODBC Drivers 错误 '80004005'

[Microsoft][ODBC Microsoft Access Driver]常见错误 不能打开注册表关键字 'Temporary (volatile) Jet DSN for process 0x91c Thread 0xbd0 DBC 0x14d834c Jet'。

/yascoolblog/index.asp，行 8

index.asp内容如下;
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="Connections/Conn.asp" -->
<%
Dim RS
Dim RS_numRows

Set RS = Server.CreateObject("ADODB.Recordset")
RS.ActiveConnection = MM_Conn_STRING
RS.Source = "SELECT ID, Title, AddData FROM Blog ORDER BY ID DESC"
RS.CursorType = 0
RS.CursorLocation = 2
RS.LockType = 1
RS.Open()

RS_numRows = 0
%>
<%
Dim Repeat1__numRows
Dim Repeat1__index

Repeat1__numRows = 18
Repeat1__index = 0
RS_numRows = RS_numRows + Repeat1__numRows
%>
<%
Dim MM_paramName
%>
<%
' *** Go To Record and Move To Record: create strings for maintaining URL and Form parameters

Dim MM_keepNone
Dim MM_keepURL
Dim MM_keepForm
Dim MM_keepBoth

Dim MM_removeList
Dim MM_item
Dim MM_nextItem

' create the list of parameters which should not be maintained
MM_removeList = "&index="
If (MM_paramName <> "") Then
MM_removeList = MM_removeList & "&" & MM_paramName & "="
End If

MM_keepURL=""
MM_keepForm=""
MM_keepBoth=""
MM_keepNone=""

' add the URL parameters to the MM_keepURL string
For Each MM_item In Request.QueryString
MM_nextItem = "&" & MM_item & "="