没有设置共享吧?

rs.open "select * From tablename",con,1,3
楼主写的代码是红色字的参数吗？

错误类型：
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC Microsoft Access Driver]常见错误 不能打开注册表关键字 'Temporary (volatile) Jet DSN for process 0xff0 Thread 0x23c DBC 0x1094024 Jet'。
/dw100/毕业设计/connections/conn2.asp, 第 5 行

用二楼版主的代码试试，
再不行就重新建个数据库试试
再不行就重装系统吧

试试
<%
dim conn,mdbfile
mdbfile=server.mappath("hhp.mdb")
set conn=server.createobject("adodb.connection")
conn.open "dbq=" & mdbfile &";driver={microsoft access driver (*.mdb)}"
%>
应该可以