循环错误 '80020009'
错误代码<%
i=2
set rs0=server.createobject("adodb.recordset")
sql0="select DISTINCT top 16 company_id,lastchange from job_view where verification=1 and disclose=1 order by lastchange desc"
rs0.open sql0,conn,1,1
do while not rs0.eof or rs0.bof or i>5%>
<%if i>16 then%>
<div class="qijd_lan">
<%else%>
<div class="qijd">
<%end if%>
<table width="210" style="font-size:12px" height="91" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="50%" valign="middle">
<%
set rs=server.createobject("adodb.recordset")
sql="select * from company where id="&rs0("company_id")&" "
rs.open sql,conn,1,1
kk=rs("company")
set rs1=server.createobject("adodb.recordset")
sql1="select top 3 * from job_view where company_id="&rs("id")&" order by id desc "
rs1.open sql1,conn,1,1
%>
<%if isnull(rs("mobel")) then%>·
<a href="../company/company_show.asp?id=<%=rs("id")%>" target="_blank"><%=kk%></a>
<%else%>
<a href="../temp/<%=rs("mobel")%>/index.asp?id=<%=rs("id")%>" target="_blank"><font color="#CC0000"><%=kk%></font></a>
<%end if%></td>
</tr>
<tr><td>
<%do while not rs1.eof
jobFunction1=rs1("jobFunction1")%>
<a href='../company/job_show.asp?id=<%=rs1("id")%>' target="_blank">
<script language=javascript>Showcatelogs(<%=jobFunction1%>);</script>
</a><span class="style23">/</span>
<%
rs1.movenext
loop
rs1.close
set rs1=nothing%>
</td></tr>
</table></div>
<%
i=i+2
rs0.movenext
loop
rs0.close
set rs0=nothing%>
