if rs.eof then exit for 问题

答案:2 悬赏:70 手机版

解决时间 2021-03-02 06:43

提问者网友：鼻尖触碰
2021-03-01 18:07

<%
if vdate="" then
%>

<%
page=clng(request("page"))
Set rs=Server.CreateObject("Adodb.RecordSet")
if username <>"" then
sql="select vuser,count(*) from [count] where vuser='"& username &"' and vdate like '*"& year &"-"& month &"*' group by vuser"

else
sql="select vuser,count(*) from [count] where vdate like '*"& year &"-"& month &"*' group by vuser order by count(*) desc"

end if
response.write(sql)
rs.open sql,conn,1,3
rs.pagesize=20
if page<1 then page=1
if page>rs.pagecount then page=rs.pagecount
if rs.pagecount>0 then rs.absolutepage=page
myself=request.serverVariables("PATH_INFO")
response.write("111111")
for i=1 to rs.pagesize
response.write("2222222")
if rs.eof then exit for
response.write("333333")
%>

<%
rs.movenext
next
if rs.pagecount>1 then
%>

<%
rs.close
set rs=nothing
%>

用户名

登陆次数

登陆月份

<%=rs("vUser")%>

[">上一页] [">下一页] 共<%= rs.pagecount %>页当前第

页

<%
end if
%>

<% End if
%>

上面是程序的一段代码 SQL语句测试过没有问题可是到 if rs.eof then exit for 之后的 response.write("333333") 就没有输出了这是什么问题呀？请高手指点～

最佳答案

五星知识达人网友：神鬼未生
2021-03-01 19:44

输出 rs.pagecount 看看
另外，你这个for循环是不是可以这么写：

i=1
do while not rs.eof
%>

<%=rs("vUser")%>

<%
if i=rs.pagesize then exit do
i=i+1
rs.movenext
loop

全部回答

1楼网友：轻雾山林
2021-03-01 19:52

/判断rs数据库记录是否是最后一条set rs=conn.execute() /，跟end if基本一样，如果为真则执行下面的语句 exit for //直接退出判断;/执行某语句，并派送给rs if rs.eof then //

我要举报

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息