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 gkittelson on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Prob in Recordset

Status
Not open for further replies.

murugesanks

Programmer
Jan 25, 2001
48
US
Please gothrough my code . I have taken query from ASP Unleased Book.
It is giving dome. error.
Please help me.
<%
DIM currentPage, rowCount, i
currentPage = TRIM( Request( &quot;currentPage&quot; ) )
if currentPage = &quot;&quot; then currentPage = 1
set DBConn = server.createobject(&quot;adodb.connection&quot;)
DBConn.open &quot;dsn=portdsn;uid=sa;pwd=;database=PortDB&quot;
Set MemDisRS = Server.CreateObject(&quot;ADODB.Recordset&quot;)
MemDisRS.CursorType = adOpenStatic
MemDisRS.PageSize = 5
MemDisRS.Open &quot;select * from table1 order by no&quot;, DBConn
Response.write &quot;Current Page Value is :&quot;
Response.write currentPage
Response.Write &quot;<br><br>&quot;
'MemDisRS.AbsolutePage = cINT( currentPage )
rowCount = 0
x1=&quot;hi&quot;
While not MemDisRS.EOF and rowCount < MemDisRS.PageSize
Response.Write MemDisRS(0)
Response.Write &quot;<br>&quot;
rowCount = rowCount + 1
MemDisRS.MoveNext
Wend
Response.Write &quot;<hr>&quot;
for i = 1 to MemDisRS.PageCount
%><a href=&quot;TradersDisplayTest1.asp?currentPage=<%=i%>&quot;><%=i%></a> <%
next
%>

 
Please be more specific about what your code is trying do, and what specific error message you are getting. Just looking at your code without an error message, I can't really figure out what you're trying to do. Harold Blackorby
hblackorby@scoreinteractive.com
St. Louis, MO
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top