脚本运行时间过长问题!!!!请大家来帮帮我....

skybirdzw 发布于 2008-01-08 11:01， 2208 次点击

运行这段代码后很长时间最终出现"脚本运行时间过长.."的错误信息，请问是怎么回事啊？？我在线等~~~~~~


<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />

<table width="90%" border="1" cellspacing="0" cellpadding="0" height="500">

  <%
set rs=server.CreateObject("adodb.recordset")
rs.open "select big_class_name from big_class order by id desc",conn,1,1
do while not rs.eof
%>
<tr>
<td><%=rs("big_class_name")%></td>
</tr>
<tr>
<%
set rs1=server.CreateObject("adodb.recordset")
rs.open "select * from second_class_name where big_class_name='"&rs("big_class_name")&"' order by id desc"
do while not rs.eof
%>
<td></td>
<%
        rs1.movenext
loop
%>
</tr>
<%
          rs.movenext
    loop


    rs.close
    set rs=nothing
  %>






</table>

14 回复

skybirdzw2008-01-08 11:06

回复 1# 的帖子

。。。。。。。。。。。。。。？？

madpbpl2008-01-08 11:16

set rs1=server.CreateObject("adodb.recordset")
rs.open "select * from second_class_name where big_class_name='"&rs("big_class_name")&"' order by id desc"
do while not rs.eof
改成
set rs1=server.CreateObject("adodb.recordset")
rs1.open "select * from second_class_name where big_class_name='"&rs("big_class_name")&"' order by id desc"
do while not rs1.eof

skybirdzw2008-01-08 11:28

回复 3# 的帖子

???
我没看出来和原来的有什么改动啊？？

永夜的极光2008-01-08 11:34

原帖由 [bold][underline]skybirdzw[/underline][/bold] 于 2008-1-8 11:28 发表 [url=http://bbs.bc-cn.net/redirect.php?goto=findpost&pid=1174590&ptid=196440]

[/url]
???
我没看出来和原来的有什么改动啊？？

rs和rs1

skybirdzw2008-01-08 11:49

回复 5# 的帖子

不行啊，改过来还是那个问题！


<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />

<table width="90%" border="1" cellspacing="0" cellpadding="0" height="500">

  <%

set rs=server.CreateObject("adodb.recordset")
rs.open "select big_class_name from big_class order by id desc",conn,1,1
do while not rs.eof
%>
<tr>
<td><%=rs("big_class_name")%></td>
</tr>
<tr>
<%
set rs1=server.CreateObject("adodb.recordset")
rs1.open "select * from second_class_name where big_class_name='"&rs("big_class_name")&"' order by id desc"
do while not rs1.eof
%>
<td></td>
<%
        rs1.movenext
loop
%>
</tr>
<%
          rs.movenext
    loop


    rs.close
    set rs=nothing
  %>

</table>

madpbpl2008-01-08 14:01

<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />

<table width="90%" border="1" cellspacing="0" cellpadding="0" height="500">

  <%

set rs=server.CreateObject("adodb.recordset")
rs.open "select big_class_name from big_class order by id desc",conn,1,1
do while not rs.eof
%>
<tr>
<td><%=rs("big_class_name")%></td>
</tr>
<tr>
<%
set rs1=server.CreateObject("adodb.recordset")
rs1.open "select * from second_class_name where big_class_name='"&rs("big_class_name")&"' order by id desc",conn,1,1
do while not rs1.eof
%>

<td><%=rs1("small_class_name")%></td>

<%
rs1.movenext
loop
%>
</tr>
<%
          rs.movenext
    loop
   rs.close
  set rs=nothing
%>

</table>

madpbpl2008-01-08 14:02

rs1.open "select * from second_class_name where big_class_name='"&rs("big_class_name")&"' order by id desc"
主要是上面那句话的错误
rs1.open "select * from second_class_name where big_class_name='"&rs("big_class_name")&"' order by id desc",conn,1,1

skybirdzw2008-01-08 15:00

回复 8# 的帖子

是我太大意了！谢谢了！

#10

yms1232008-01-08 15:25

不推荐这种写法，这种嵌套写法肯定会使脚本时间运行过长。

#11

skybirdzw2008-01-08 15:29

回复 10# 的帖子

请教版主，还有什么写法啊？

#12

icelovebai2008-01-08 15:56

马虎～～

#13

skybirdzw2008-01-08 16:12

版主~请教啊！！

#14

yms1232008-01-08 16:22

用子查询的办法进行两个表的查询呢？
<%
Dim Sql
set rs=server.CreateObject("adodb.recordset")
SQL="select * from second_class_name where big_class_name"
SQL=SQL&" in (select big_class_name from big_class) order by id desc"
rs.open SQL,conn,1,1
do while not rs.eof
%>
<tr>
<td><%=rs("big_class_name")%></td>
</tr>
<tr>
<td><%=rs("small_class_name")%></td>
</tr>
<%
          rs.movenext
    loop
   rs.close
  set rs=nothing
%>
用SQL语句进行两个表的联合查询，将两个表的查询结果汇总到一个rs对象内。

#15

skybirdzw2008-01-08 16:42

回复 14# 的帖子

谢谢版主，其实在之前我也想到了这种方法，也就是大半天也写不出来，领教了！