Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Mike Lewis on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

No matter what I do, objRec.AbsolutePage is always -1

Status
Not open for further replies.

H2

Programmer
May 17, 2001
24
0
0
HK
Hi,

here is part of my code:

Dim IntPageSize, PageIndex, TotalPages, TotalRecords, intPrev, intNext

IntPageSize = 3
PageIndex = Request("PageIndex")
if PageIndex = "" then PageIndex = 1

objRec.PageSize = intPageSize ' Set the number of records per page
objRec.AbsolutePage = PageIndex 'Define what page number on which the current record resides.

TotalPages = objRec.PageCount

intPrev = PageIndex - 1
intNext = PageIndex + 1 'same as objRec.AbsolutePage

Thanks
H2
 
Hi,
it works la, i added the following code:


objRec.CursorLocation=3 'clientside
objRec.CursorType=3 'staticrecordset


Thanks
H2
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top