Wrox Programmer Forums

Need to download code?

View our list of code downloads.

Go Back   Wrox Programmer Forums > ASP.NET and ASP > ASP 3 Classic ASP Active Server Pages 3.0 > Classic ASP Databases
Password Reminder
Register
| FAQ | Members List | Search | Today's Posts | Mark Forums Read
Classic ASP Databases Discuss using ASP 3 to work with data in databases, including ASP Database Setup issues from the old P2P forum on this specific subtopic. See also the book forum Beginning ASP.NET Databases for questions specific to that book. NOT for ASP.NET 1.0, 1.1, or 2.0.
Welcome to the p2p.wrox.com Forums.

You are currently viewing the Classic ASP Databases section of the Wrox Programmer to Programmer discussions. This is a community of tens of thousands of software programmers and website developers including Wrox book authors and readers. As a guest, you can read any forum posting. By joining today you can post your own programming questions, respond to other developers’ questions, and eliminate the ads that are displayed to guests. Registration is fast, simple and absolutely free .
DRM-free e-books 300x50
Reply
 
Thread Tools Search this Thread Display Modes
  #1 (permalink)  
Old June 16th, 2005, 07:22 AM
Authorized User
 
Join Date: Nov 2004
Location: CHENNAI, TamilNadu, India.
Posts: 21
Thanks: 0
Thanked 0 Times in 0 Posts
Send a message via Yahoo to tks_muthu
Default ADODB.Recordset (0x800A0CB3)Current Recordset does

Hi!
i develop a web page using asp and mysql. when i am using the paging concept i face the following error :

ADODB.Recordset (0x800A0CB3)
Current Recordset does not support bookmarks. This may be a limitation of the provider or of the selected cursortype.


plz rectify and explain me.

my code :

<%
dim cnConn,rsProd
dim rsStr,totRec
set cnConn=server.CreateObject("ADODB.Connection")
set rsProd=server.CreateObject("ADODB.Recordset")
rsStr="Select * from product_details ORDER BY prod_id"
cnConn.Mode=3

(I wrote the Connection string in global.asa)

cnConn.open Application("cnstr")
rsProd.Open rsStr,cnConn,3,3 %>

<form name="frmProdAdmin" method="post">
<%
Dim pg,ini,fin,intCount,remin
pg=Request("pg")
%>

<INPUT TYPE="HIDDEN" NAME="pg" value="<% =pg%>">

<%

if pg="" then
            pg=1
            ini=pg
            fin=ini+9
end if

        intCount = 0

'Total No of Records Per Page
rsProd.pagesize=2

if rsProd.EOF=false thenrsProd.AbsolutePage=cInt(pg)
            if rsProd.EOF then
                    pg=pg-1
                    rsProd.AbsolutePage=cInt(pg)
            else
                    pg=cint(pg)
                    rsProd.AbsolutePage=cInt(pg)
            end if
end if

if rsProd.pagecount > 1 then

        if pg=1 or ((pg-1) mod 10) <> 0 then
            if len(pg)>1 then
                remin=(pg mod 10)
                if remin = 0 then
                               ini=pg-9
                    else
                                ini=(pg-remin)+1
                end if
                    fin=ini+9

            else
                        ini=1
                        fin=ini+9
            end if

        else
                    ini=pg
                    fin=ini+9
    end if


    if fin > rsProd.pagecount then
                fin=rsProd.pagecount
    end if

    if len(ini) > 1 then
            prev=ini-10
            %>

<A href="index.asp?pg=<%=prev%>">
Prev</a>&nbsp;&nbsp;
<%end if

for i= ini to fin
if i<> cINT(pg) then%>
<A href="index.asp?pg=<%=i%>">
<%=i%></a>&nbsp;&nbsp;
<% else
response.write "" &i& "&nbsp;&nbsp;"
end if
next

if fin < rsProd.pagecount then
fin=fin+1%>

<A href="admin.asp?pg=<%=fin%>">
Next</a>&nbsp;&nbsp;
<% end if
end if%>



Muthu
__________________
Muthu
Reply With Quote
Reply


Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is Off
HTML code is Off
Trackbacks are Off
Pingbacks are On
Refbacks are Off


Similar Threads
Thread Thread Starter Forum Replies Last Post
ADODB.Recordset (0x800A0CB3) hbansal Classic ASP Databases 3 June 28th, 2008 01:38 AM
ADODB.Recordset (0x800A0BB9) knight Classic ASP Databases 3 November 9th, 2006 05:08 AM
ADODB Recordset sporkman43 Classic ASP Basics 4 November 9th, 2006 04:51 AM
How to get adodb.record from adodb.recordset John Pennington Pro VB Databases 1 November 20th, 2004 06:17 AM
ADODB connection for Recordset dpatole Beginning VB 6 1 October 14th, 2003 04:24 PM



All times are GMT -4. The time now is 08:42 PM.


Powered by vBulletin®
Copyright ©2000 - 2020, Jelsoft Enterprises Ltd.
© 2013 John Wiley & Sons, Inc.