循环问题，字段下移后，希望可以从循环的一开始运行。

[ZcwAmy]

我的数据库中有两个字段，xxffsl，djffsl分别记录显示次数，点击次数，我希望显示点击率小于30的记录。我的程序如下：

数据库查询段：
Set rs=Server.CreateObject("ADODB.RecordSet")
SQLStr="Select * from users where ljje>="&je&""
rs.open SQLStr,Conn,3,3,1

记录显示段：
<%
for i=1 To rs.RecordCount
djl=rs.Fields("djffsl")/rs.Fields("xxffsl")*100
If djl>30 Then
rs.MoveNext
If rs.Eof=True Then
Exit For
End If
End If
%>
<%=djl%>
<%
rs.MoveNext
If rs.Eof=True Then
Exit For
End If
%>

但是这样做的结果是我的数据库中共有四条点击率为50%的记录，应该一条也不显示才对，但我的程序段却把第二、四条记录显示出来了，我也找到了错误的地方，在第一个rs.MoveNext处，记录移动到第二条，但第二条却没有经过点击率的判断程序，我想如果可以在第一个rs.MoveNext语句后加入一条转移到for后面第一条语句的句子就没错了，不知有没有这样的语句，如果没有，这个问题怎么解决？谢谢大家！

[caoshangfei]

for i=1 To rs.RecordCount
djl=rs.Fields("djffsl")/rs.Fields("xxffsl")*100
If djl>30 Then
rs.MoveNext
else response.write djl
If rs.Eof=True Then
Exit For
End If
End If
%>

[awaysrain]

SQLStr="Select * from users where ljje>="&je&" and djffsl/xxffsl<0.3 "

这样直接取出来的结果就是点击率小于30的

[ZcwAmy]

谢谢草上飞，在我点击完发帖后，就知道该怎么做了，也许是程序做多了，脑筋都僵了，才会提出这种问题，不过，还是要谢谢你。

[forestyang]

for i=1 To rs.RecordCount
djl=rs.Fields("djffsl")/rs.Fields("xxffsl")*100
If djl>30 Then
rs.MoveNext
else response.write djl
If rs.Eof=True Then
Exit For
End If
End If
next