日期:2014-05-17  浏览次数:21000 次

我的代码中加上这条语句"myconn.absolutepage=pageNum"就会报错,请问该怎么办?谢谢
报错的内容:
ADODB.Recordset   错误   '800a0cb3 '  
当前   Recordset   不支持书签。这可能是提供者或选定的光标类型限定的。  

我的代码:
<%
<!--#include   file= "Connections/gym.asp "   -->
public   myDSN
Set   myDSN=Server.CreateObject( "ADODB.connection ")
'connStr= "DBQ= "+server.mappath( "dbdata.mdb ")+ ";DRIVER={Microsoft   Access   Driver   (*.mdb)};DriverId=25;FIL=MS   Access;ImplicitCommitSync=Yes;MaxBufferSize=512;MaxScanRows=8;PageTimeout=5;SafeTransactions=0;Threads=3;UserCommitSync=Yes; "
'myDSN.Open   connStr
'myDSN.Open   gym_conn,3,2

pageSize=9
      if   request( "pagenum ")= " "   then
          pageNum=1
      else
          pageNum=CInt(request( "pagenum "))
      end   if    
      fileName=split(request.ServerVariables( "URL "), "/ ")
      pageName=fileName(UBound(fileName))& "? "
      classID=CInt(request( "classID "))
      classSuperID=CInt(request( "classSuperID "))
     
%>
<%   sub   newsList(classID,classSuperID)   %>

<style   type= "text/css ">
.list   {
font-size:   12px;
color:   #7C7C7C;
text-decoration:   none;
}
.font5   {
font-size:   12px;
color:   #666666;
text-decoration:   none;
}
</style>
<table   width= "568 "   border= "0 "   cellspacing= "0 "   cellpadding= "0 ">
                                        <tr>
                                            <td   height= "22 "   valign= "top "   style= "background-repeat:no-repeat;background-position:0cm   0.05cm "   align= "right "   id= "topBar "   class= "fon5 "> </td>
                                        </tr>
                                        <tr>
                                            <td   valign= "top ">
<TABLE   width=95%   border=0   align= "center "   cellPadding=2   cellSpacing=0>
    <tr>  
                                    <td   height= "7 "> </td>
                </tr>
<tr>
<td>  
<%   set   myconn=server.createobject( "