请教一个问题，不好意思，我没有分数了。。

duo9 2004-03-06 08:11:41

我用ACCESS建了一个数据库addrbook.mdb

数据库里包含表person，表里各有3个，name ,add ，tel

然后我用ACCESS自带的导出功能把表person导出为person.asp文件

放在IIS下运行，每次运行CPU使用率都会上升，几乎100%，然后系统越来越慢，

最后虚拟内存不够了，死掉了。

代码是ACCESS自动生成的啊，请教一下是什么原因啊？

person.asp代码如下：

<HTML>
<HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html;charset=gb_2312-80">
<TITLE>person</TITLE>
</HEAD>
<BODY>
<%
If IsObject(Session("addrbook_conn")) Then
Set conn = Session("addrbook_conn")
Else
Set conn = Server.CreateObject("ADODB.Connection")
conn.open "addrbook","",""
Set Session("addrbook_conn") = conn
End If
%>
<%
If IsObject(Session("person_rs")) Then
Set rs = Session("person_rs")
Else
sql = "SELECT * FROM [person]"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn, 3, 3
If rs.eof Then
rs.AddNew
End If
Set Session("person_rs") = rs
End If
%>
<TABLE BORDER=1 BGCOLOR=#ffffff CELLSPACING=0><FONT FACE="宋体" COLOR=#000000><CAPTION><B>person</B></CAPTION></FONT>

<THEAD>
<TR>
<TH BGCOLOR=#c0c0c0 BORDERCOLOR=#000000 ><FONT SIZE=1 FACE="宋体" COLOR=#000000>name</FONT></TH>
<TH BGCOLOR=#c0c0c0 BORDERCOLOR=#000000 ><FONT SIZE=1 FACE="宋体" COLOR=#000000>tel</FONT></TH>
<TH BGCOLOR=#c0c0c0 BORDERCOLOR=#000000 ><FONT SIZE=1 FACE="宋体" COLOR=#000000>addr</FONT></TH>

</TR>
</THEAD>
<TBODY>
<%
On Error Resume Next
rs.MoveFirst
do while Not rs.eof
%>
<TR VALIGN=TOP>
<TD BORDERCOLOR=#c0c0c0 ><FONT SIZE=1 FACE="宋体" COLOR=#000000><%=Server.HTMLEncode(rs.Fields("name").Value)%><BR></FONT></TD>
<TD BORDERCOLOR=#c0c0c0 ><FONT SIZE=1 FACE="宋体" COLOR=#000000><%=Server.HTMLEncode(rs.Fields("tel").Value)%><BR></FONT></TD>
<TD BORDERCOLOR=#c0c0c0 ><FONT SIZE=1 FACE="宋体" COLOR=#000000><%=Server.HTMLEncode(rs.Fields("addr").Value)%><BR></FONT></TD>

</TR>
<%
rs.MoveNext
loop%>
</TBODY>
<TFOOT></TFOOT>
</TABLE>
</BODY>
</HTML>

...全文