收藏本站腾讯微博新浪微博

经典论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

蓝色理想 最新研发动态 网站开通淘帖功能 - 蓝色理想插件 论坛内容导读一页看论坛 - 给官方提建议

论坛活动及任务 地图和邮件任务 请多用悬赏提问 热夏来袭,选一款蓝色理想的个性T恤吧!

手机上论坛,使用APP获得更好体验 急需前端攻城狮,获得内部推荐机会 论坛开通淘帖功能,收藏终于可以分类了!

搜索
查看: 1684|回复: 3

[asp] 求助ASP问题 提示错误

[复制链接]
发表于 2009-11-30 16:13:56 | 显示全部楼层 |阅读模式
Microsoft VBScript 运行时错误 错误 '800a01a8'

缺少对象: ''

/en_products.asp,行 42

浏览器提示上面的错误,下面的是代码
请帮忙
<%
                'sql="select * from pCtlg order by AddDate desc"
                  'set rs=server.CreateObject("adodb.recordset")
                 ' rs.open sql,conn,1,1
                  ' if rs.eof and rs.bof then
                   'response.Write("暂时没有产品信息!")
                  ' else
%>
                  <%rec.movefirst
for i=1 to rec.recordcount
%>
                  <table width="100%" border="0" align="center" cellpadding="0" cellspacing="0" bordercolordark="#FFFFFF" bordercolorlight="#D6D6D6">
                    <tr>
                      <td width="9%" height="23" align="center"><span class="STYLE2">NO.<%=i%></span></td>
                      <td width="91%" class="pro_title"><strong>&nbsp;<%=Rec("CatalogName")%>
                          <%ID=rec("ID")%>                     
                          </strong></td>
                    </tr>
                  </table>
                  <table width="100%" border="0" align="center" cellpadding="0" cellspacing="0" bordercolordark="#FFFFFF" bordercolorlight="#D6D6D6">
                    <%
  strsql="select * from Prods where GroupID="& ID
          set rs=server.CreateObject("ADODB.RECORDSET")
          rs.open strsql,conn,1,1
          if rs.eof then
          response.Write("暂时没有产品信息!")
          else       
          recordnum=rs.recordcount
          if recordnum>3 then
          recordnum=3
          end if
          %>
                    <tr><%for a=1 to  recordnum%>
                      <td align="center" valign="middle" class="line_pro">&nbsp;<a href="manage/ImgsProds/<%=rs("ImgFile")%>" target="_blank"><img src="manage/ImgsProds/<%=rs("ImgFile")%>" width="120" border="0" class="img_kuang"/></a></td>
                                          <td valign="top" class="line_pro"><span class="pro_name">产品名称:</span>                                          <a href="products_1.asp?ID=<%=rs("ID")%>"><%=rs("Title")%></a><BR /><BR />        <a href="pinglun.asp?Img=<%=rs("ImgFile")%>&ProdsId=<%=rs("ID")%>" target="_blank"><img src="img/pro_pinglun.jpg" width="85" height="22" border="0" /></a></td>
                                          <%rs.movenext
                                             next%>
                    </tr>
                    <%
                           end if
                           rs.close%>
                  </table>
                  <br />
                <%Rec.movenext
                                        next
                                        'end if
                                        Rec.close
                                        set Rec=nothing%>
发表于 2009-11-30 19:54:01 | 显示全部楼层
大哥,行 42 是哪句啊。。
回复 支持 反对

使用道具 举报

发表于 2009-12-2 14:23:17 | 显示全部楼层
对啊,42行是哪行,还要别人帮你找?把这行代码贴出来就知道了。。。。
偷偷的告诉你,我没有看到你创建了 “rec”这个对象啊。。。之前是不是还有代码没有帖出来?
<%
              'sql="select * from pCtlg order by AddDate desc"
      .........
%>
                  <%rec.movefirst
回复 支持 反对

使用道具 举报

发表于 2009-12-15 11:14:48 | 显示全部楼层
<%rec.movefirst
for i=1 to rec.recordcount
%>
                  <table width="100%" border="0" align="center" cellpadding="0" cellspacing="0" bordercolordark="#FFFFFF" bordercolorlight="#D6D6D6">
                    <tr>
                      <td width="9%" height="23" align="center"><span class="STYLE2">NO.<%=i%></span></td>
                      <td width="91%" class="pro_title"><strong>&nbsp;<%=Rec("CatalogName")%>
                          <%ID=rec("ID")%>                     
                          </strong></td>

是rs吧
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|小黑屋|Archiver|手机版|blueidea.com ( ICP05002321 )  

GMT+8, 2019-8-18 02:57 , Processed in 0.109100 second(s), 8 queries , Gzip On, Memcache On.

Powered by Discuz! X3.2 Licensed

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表