28,409
社区成员
发帖
与我相关
我的任务
分享运行为什么总是严重超时,打开速度非常慢!慢死人了!求救!
<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="articleconn.asp" -->
<%
set rs1 = Server.CreateObject("ADODB.Recordset")
strsql = "SELECT top 4 newsid, title FROM article ORDER BY dateandtime DESC"
rs1.Open conn,strsql
rs1_numRows = 0
%>
<%
Dim Repeat1__numRows
Repeat1__numRows = -1
Dim Repeat1__index
Repeat1__index = 0
rs1_numRows = rs1_numRows + Repeat1__numRows
%>
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<table width="100%" border="0">
<tr>
<%
While ((Repeat1__numRows <> 0) AND (NOT rs1.EOF))
%>
<td>
<a href="newstemplate.asp?nid=<%=rs("newsid")%>"><%=(rs1.Fields.Item("title").Value)%></a> </td>
<%
Repeat1__index=Repeat1__index+1
Repeat1__numRows=Repeat1__numRows-1
rs1.MoveNext()
Wend
%>
</tr>
</table>
</body>
</html>
<%
rs1.Close()
%>
<!--#include file="articleconn.asp" -->
<%
set rs1 = Server.CreateObject("ADODB.Recordset")
strsql = "SELECT top 4 newsid, title FROM article ORDER BY dateandtime DESC"
rs1.Open conn,strsql
rs1_numRows = 0
%>
<%
Dim Repeat1__numRows
Repeat1__numRows = -1
Dim Repeat1__index
Repeat1__index = 0
rs1_numRows = rs1_numRows + Repeat1__numRows
%>
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<table width="100%" border="0">
<tr>
<%
While ((Repeat1__numRows <> 0) AND (NOT rs1.EOF))
%>
<td>
<a href="newstemplate.asp?nid=<%=rs("newsid")%>"><%=(rs1.Fields.Item("title").Value)%></a> </td>
<%
Repeat1__index=Repeat1__index+1
Repeat1__numRows=Repeat1__numRows-1
rs1.MoveNext()
Wend
%>
</tr>
</table>
</body>
</html>
<%
rs1.Close()
%>
...全文
请发表友善的回复…
发表回复
xiayule 2002-05-16
- 打赏
- 举报
i know,
对不起
我写错了,但程序是对的
对不起
我写错了,但程序是对的
nickycheng 2002-05-16
- 打赏
- 举报
没错，进入死循环了，检查你的判断条件。
想重新启动iis服务把任务管理器进程中的inetinfo.exe结束。过一会儿iis就正常了。
想重新启动iis服务把任务管理器进程中的inetinfo.exe结束。过一会儿iis就正常了。
wuya0531 2002-05-16
- 打赏
- 举报
是进入死循环了
NetCop 2002-05-16
- 打赏
- 举报
错，不是rs.movenext;
是rs1.movenext.
是rs1.movenext.
xiayule 2002-05-16
- 打赏
- 举报
rs1.MoveNext() 也可以的
改为rs.movenext也非常慢
改为rs.movenext也非常慢
wangfei2428 2002-05-16
- 打赏
- 举报
rs1.MoveNext() 什么意思?
应该是
rs.movenext
应该是
rs.movenext
