| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 521 人关注过本帖
标题:循环错误 '80020009'
只看楼主 加入收藏
yaozongyue
Rank: 1
来 自:保定
等 级:新手上路
帖 子:5
专家分:0
注 册:2010-11-15
结帖率:0
收藏
已结贴  问题点数:20 回复次数:6 
循环错误 '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>&nbsp;
              <%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%>
搜索更多相关主题的帖子: class border where 
2010-11-15 11:19
yaozongyue
Rank: 1
来 自:保定
等 级:新手上路
帖 子:5
专家分:0
注 册:2010-11-15
收藏
得分:0 
麻烦各位给解决一下

╮(╯3╰)╭
2010-11-15 11:19
wangjy500
Rank: 11Rank: 11Rank: 11Rank: 11
等 级:贵宾
威 望:13
帖 子:457
专家分:2569
注 册:2010-7-11
收藏
得分:10 
sql="select   *  from company where id="&rs0("company_id")&"  "
-->
sql="select   *  from company where id="&rs0("company_id")

QQ:63572063
2010-11-15 12:32
yaozongyue
Rank: 1
来 自:保定
等 级:新手上路
帖 子:5
专家分:0
注 册:2010-11-15
收藏
得分:0 
还是不行

╮(╯3╰)╭
2010-11-15 14:35
mai_25
Rank: 3Rank: 3
来 自:上海
等 级:论坛游侠
帖 子:206
专家分:131
注 册:2006-7-22
收藏
得分:10 
<%
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 not rs1.eof then
                %>
                <%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>&nbsp;
              <%
                k=0
                while not rs1.eof
                k=k+1
                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
                wend
                end if
                rs1.close
                set rs1=nothing%>
              </td></tr>
            </table></div>
            <%
            i=i+2
            rs0.movenext
            loop
            rs0.close
            set rs0=nothing%>

[ 本帖最后由 mai_25 于 2010-11-15 14:59 编辑 ]

http://www.,就算跌倒也要豪迈的笑。
2010-11-15 14:55
yaozongyue
Rank: 1
来 自:保定
等 级:新手上路
帖 子:5
专家分:0
注 册:2010-11-15
收藏
得分:0 
麻烦各位在给看看

╮(╯3╰)╭
2010-11-15 15:13
yaozongyue
Rank: 1
来 自:保定
等 级:新手上路
帖 子:5
专家分:0
注 册:2010-11-15
收藏
得分:0 
还是不行--其实我是个菜鸟--我不确定是代码的问题

╮(╯3╰)╭
2010-11-15 15:26
快速回复:循环错误 '80020009'
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.018149 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved