Instead of using a DSN, try mapping straight to the DB:
strconn = "Driver={Microsoft Access Driver (*.mdb)};User ID=xxx Password=xxx; DBQ=c:/inetpub/yoursite/access_db/yourdb.mdb"
set objconn=server.createobject("adodb.connection")
objconn.connectionstring = strconn
objconn.open
To figure out where your db is located on the server use this code in the same directoy or the root directory and figure it out:
<%=Server.MapPath("You are here")%>
Opening your recordset would be as simple as:
strsql="SELECT * FROM yourtable"
Set objrs=objconn.execute(strsql)