'loop' 语句缺少 'do' ???????????

[imwinner]

以下代码在编译时老是出现如题错误，可我明明有‘do’，这是怎么回事？？？
....
........
<%
do while not rs.eof
if cint(left(formatdatetime(rs("logtime"),4),2))>8 then
action= "迟到"
late=late+1
%>
<tr>
<td><%=FormatDateTime(rs("logtime"),1)%></td>
<td><%=FormatDateTime(rs("logtime"),3)%></td>
<td><%=action%></td>
</tr>
<%
else if cint(left(formatdatetime(rs("logtime"),4),2))<16 then
action= "早退"
early=early+1
%>
<tr>
<td><%=FormatDateTime(rs("logtime"),1)%></td>
<td><%=FormatDateTime(rs("logtime"),3)%></td>
<td><%=action%></td>
</tr>
<%
end if
rs.movenext()
loop
%>
.....
.........

[lienzhu]

rs.movenext()
改成
rs.movenext
或者
call rs.movenext()

[777dragon]

else if

---->
elseif

[yaniu]

else if 的问题

[wypenguin]

是少了一个END IF的问题
如果你是用ELSEIF的话你就少一个END IF
如果你是用ELSE IF的话你就要多加一个END IF

[yqh1314]

else if cint(left(formatdatetime(rs("logtime"),4),2))<16 then
是的在JS 中是这么写的 在VB 中如果没有其他条件就写成ELSEIF

[hj3793]

else if ---> elseif

[alern_zyb]

<%
do while not rs.eof
if cint(left(formatdatetime(rs("logtime"),4),2))>8 then
action= "迟到"
late=late+1
%>
<tr>
<td><%=FormatDateTime(rs("logtime"),1)%></td>
<td><%=FormatDateTime(rs("logtime"),3)%></td>
<td><%=action%></td>
</tr>
<%
else
if cint(left(formatdatetime(rs("logtime"),4),2))<16 then
action= "早退"
early=early+1
%>
<tr>
<td><%=FormatDateTime(rs("logtime"),1)%></td>
<td><%=FormatDateTime(rs("logtime"),3)%></td>
<td><%=action%></td>
</tr>
<%
end if
end if
rs.movenext()
loop
%>

[xiefeng]

来迟了！楼主的问题楼上的几位已经帮你解释的很清楚了……

[gu1dai]

else if cint(left(formatdatetime(rs("logtime"),4),2))<16 then
action= "早退"
early=early+1
%>
这里少一个end if

[angelyujun]

else if cint(left(formatdatetime(rs("logtime"),4),2))<16 then 改成
else
if cint(left(formatdatetime(rs("logtime"),4),2))<16 then
。。。。
end if

另外：rs.movenext()-->rs.movenext

[zhangjun]

hj3793(白开心)(混迹江湖中) 正解

[imwinner]

揭帖了，又长知识了～～