运行结果：

ADODB.Recordset 错误 '800a0bb9' 

参数类型不正确，或不在可以接受的范围之内，或与其他参数冲突。 

/products1.asp，行 70 


<!--#include file="top.asp"-->
      <table width="930" height="150" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td bgcolor="#C0C1C5"><img src="images/abanner15.jpg" width="930" height="159" /></td>
        </tr>
      </table>
      <script type="text/javascript">setImg(1);</script>
      <table width="930" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td width="920" height="23" background="images/rline.jpg"><div align="right">您的位置:<a href="index.asp" class="mainword">首页</a>&gt;&gt;<a href="products.asp" class="mainword">产品中心</a></div></td>
          <td width="10" bgcolor="#FFFFFF"><div align="right"><img src="images/rj.jpg" width="16" height="28" /></div></td>
        </tr>
      </table>
      <table width="930" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td height="4"></td>
        </tr>
      </table>
      <table width="930" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td width="220" height="400" valign="top" bgcolor="#F1F1F1"><!--#include file="left3.asp" --></td>
          <td valign="top"><table width="98%" border="0" align="center" cellpadding="0" cellspacing="0">
            <tr>
              <td><div align="center"><img src="images/p1.jpg" width="680" height="63" /></div></td>
            </tr>
          </table>
            <table width="90%" border="0" align="center" cellpadding="0" cellspacing="0">
              <tr>
                <td>&nbsp;</td>
                <td>&nbsp;</td>
              </tr>
            </table>
            <table width="682" border="0" align="center" cellpadding="0" cellspacing="0">
              <tr>
                <td valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">
                  <tr>
                    <td><%
    Dim mPageSize,mPageCount,mRecordCount
    Dim j,Pages,mPageRows,mPageCulms,keyword
    dim wherestr
    '产品每页行数 mPageRows
    mPageRows=3
    '产品每页列数 mPageCulms
    mPageCulms=4
    wherestr="1=1"
    
    mPageSize=mPageCulms*mPageRows
    mPageCount=0
    mRecordCount=0
    If Trim(Request("Pages"))<>"" Then
        Pages=Cint(Trim(Request("Pages")))
    End If
    If Pages<1 Then
        Pages=1
    End If
    keyword=trim(request("keyword"))
    if keyword<>"" then
          wherestr= wherestr &" and (cnname like '%"&keyword&"%')"
    end if
    mysqlstr="Select id From t_productcat Where upid In (@value@) And id Not In (@value@)"
    catidstr=GetID(id,ConnDb)
    wherestr=wherestr&" and cat_id in ("&catidstr&") "
    sql="Select * From T_Product where "&wherestr&" order by morder,id"
    rs.open sql,conndb,1,3
    rs.pagesize=mPageSize
    If Not Rs.Eof Then
        mPageCount=Rs.PageCount
        mRecordCount=Rs.RecordCount
        If Rs.PageCount<Pages Then
            [color=FF0000]Rs.AbsolutePage=Rs.PageCount[/color]
            Pages=Rs.PageCount
        Else
            Rs.AbsolutePage=Pages
        End If
        for i=1 to mPageRows
        if rs.eof then exit for
    %>
                        <table width="669" border="0" align="center" cellpadding="0" cellspacing="0" style="margin-left:18px; margin-top:10px;">
                          <tr>
                            <%        
            for j=1 to mPageCulms
        %>
                            <td width="<%=100/mPageCulms%>%" align="center" valign="top"><%
            if not rs.eof then
            %>
                                <table width="126" border="0" cellpadding="1" cellspacing="0" bgcolor="#D9D9D9">
                                  <tr>
                                    <td valign="top" background="images/ppbg2.jpg" bgcolor="#FFFFFF"><a href="products_detail.asp?id=<%=rs("id")%>"><img src="admin/pic/<%=rs("smallpic")%>" alt="" border="0" /></a></td>
                                  </tr>
                                  <tr>
                                    <td height="22" align="center" background="images/ppbg2.jpg" bgcolor="#FFFFFF" class="greylist"><%=rs("cnname")%></td>
                                  </tr>
                              </table>
                                <table width="100%" border="0" cellspacing="0" cellpadding="0">
                                  <tr>
                                    <td>&nbsp;</td>
                                  </tr>
                                </table>
                                <%
            rs.movenext
            end if
            %>
                            </td>
                            <%
        next
        %>
                          </tr>
                        </table>
                      <%
    next
    end if
    rs.close
%>
                    </td>
                  </tr>
                </table>
                  <br />
                  <br />
                  <table width="700" border="0" cellspacing="0" cellpadding="0" style="margin-left:18px; margin-top:10px;">
                    <tr>
                      <td align="center"><!--#include file="getpage.asp"--></td>
                    </tr>
                </table></td>
              </tr>
            </table></td>
        </tr>
      </table>
      <!--#include file="bottom.asp"--></td>
    <td width="26" valign="top"><img src="images/right.jpg" width="26" height="700" /></td>
  </tr>
</table>
</body>
</html>