ASP 取值问题

非常愤恨，取不到值呢？代码如下：
set connR = server.CreateObject("adodb.connection")
connR.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("../../databases/MyData.asp")
exec="select * from blog_Member where mem_ID=9"
set rsR=conn.execute(exec)
%>
<%=rsR("mem_Name")%>

用SQL查询器查询此SQL，确实存在记录
小弟对ASP了解不多，求高人指点！另外只要加入do while not rs.eof 和loop，页面就打不开，而且占用资源极高
当我把这些代码放在单独的一页（没其它代码时），能查出结果
但放在有其它的代码的页面中时，结果不出。
是不是这里面的那段代码比如说conn什么的，只能出现一次呢？

没有创建recordset对象

set connR = server.CreateObject("adodb.connection")
connR.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("../databases/MyData.asp")
exec="select * from blog_Member where mem_ID=9"
set rs=server.createobject("adodb.recordset")
rs.open exec,connr,1,1
%>

<%=rs("mem_Name")%>
<%
if not rs.eof then
rs.movenext
end if%>
==================================

DO WHILE...LOOP是一个循环语句,站用资源高因为没有正确跳出循环..
================================
你可以把连接数据库的代码单独存成一个conn.asp文件..然后直接用<!--#include file="conn.asp的路径"-->来调用就行了..恩 不能重复创建对象

set connR = server.CreateObject("adodb.connection")
connR.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("../databases/MyData.asp")
exec="select * from blog_Member where mem_ID=9"