好急啊！求求各位帮帮忙！

错误类型：
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC Microsoft Access Driver]常见错误 不能打开注册表关键字 'Temporary (volatile) Jet DSN for process 0xe20 Thread 0xf60 DBC 0x117ba54 Jet'。
/shye1/index.asp, 第 320 行
请问一下你到底是怎么一回事啊？
应该怎么解决啊？
原代码
<%
Set conn = Server.CreateObject("ADODB.Connection")
DBPath = Server.MapPath("/hr163/data/admin2002.asp")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
sql="select top 3 articleid,title,typeid,dateandtime,best from learning order by articleid desc"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
do while not rs.eof
%>
.
.
<% rs.MoveNext
loop
rs.close
%>