错误报告：
Microsoft JET Database Engine 错误 '80040e14'

内存溢出

/admin/user.asp，行 105




源代码：
if session("keyusername")<>"" then
response.write "搜索关键字为：<font color=red><b>"&session("keyusername")&"</b></font>"
end if
%></td>
</tr>
</table>

<%
Set Rs=server.createobject("adodb.recordset")
Rs.Open session("sql6b"),conn,1,1
IF (rs.State =adStateClosed) or (rs.BOF=true and rs.EOF =true) or rs.RecordCount=0 THEN
RESPONSE.Write"<BR><BR><BR><BR>　　　　　　　　　没有找到此用户...<a href=javascript:history.go(-1)><b><u>返回上一页</u></b></a>"
ELSE
dim page,ipage
rs.pagesize=15
page=clng(request("Page"))
if page=empty then page=1
rs.absolutepage=page%>


哪位朋友能不能帮我看看，谢谢！！！