right now, I have this:

Do While not rsUpdates.EOF 

Response.Write ("<br>")
    Response.Write (rsUpdates("upuser"))
    Response.Write ("<br>")
    Response.Write (rsUpdates("upinfo"))
    Response.Write ("<br>") 
    
    rsUpdates.MoveNext
Loop

But that just displays every thing on the list, in order.
How can I get just the final 3?(and pu them in backward order?

Change the sort - probably order by ??? desc - in the query your recordset is based on, and if you're getting the information from Access or SQL Server, use Select Top 3 ???

If you wanted to go a more complex route, you could declare a variable, and increment it every time you call MoveNext, then change your loop condition to While Not rsUpdates.Eof And i < 3 ... an integer variable will start at zero, so depending on where you put the line and whether you change it to start at one, you might change that to less than four, but by default everything starts at zero.

One quick solution, not very efficient because you still return the entire recordset would be;

rsUpdates.MoveLast

for zz = 0 to 2 
with response
    .Write ("<br>")
    .Write (rsUpdates("upuser"))
    .Write ("<br>")
    .Write (rsUpdates("upinfo"))
    .Write ("<br>") 
rsUpdates.MovePrev
end with
next

Hi,

If you change your SQL statement to include:


SELECT TOP 3 * FROM tblName ORDER BY upuser DESC

This will order them in reverse order and then only display the top 3 results.
Hope this helps,
D

chrishirst: Ive tried that, but I always get :

Rowset does not support fetching backward.

when I use movelast.


belfast: I have no clue what to do with that

Yep. You will need to use a dynamic cursor

rsUpdates.CursorLocation = adUseClient
rsUpdates.CursorType = adOpenDynamic

I just don't get it. Can someone tell me what's wrong?
http://bit-digita.com/

<%
'Dimension variables
Dim adoCon         'Holds the Database Connection Object
Dim rsUpdates    'Holds the recordset for the records in the database
Dim strSQL         'Holds the SQL query to query the database

Set adoCon = Server.CreateObject("ADODB.Connection")
adoCon.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("datab/updates.mdb")
Set rsUpdates = Server.CreateObject("ADODB.Recordset")
strSQL = "SELECT tblupdates.upuser, tblupdates.upinfo, tblupdates.updatesID FROM tblupdates;"
rsUpdates.Open strSQL, adoCon

rsUpdates.CursorLocation = adUseClient
rsUpdates.CursorType = adOpenDynamic

rsUpdates.MoveLast
for zz = 0 to 2 
with response
    .Write ("<br>")
    .Write (rsUpdates("upuser"))
    .Write ("<br>")
    .Write (rsUpdates("upinfo"))
    .Write ("<br>") 
rsUpdates.MovePrev
end with
next

rsUpdates.Close

Set rsUpdates = Nothing
Set adoCon = Nothing
%>

Change CursorLocation and CursorType to 3 (both of them). Hirst is using the adovbs.inc constants.

Originally Posted by ADAM Web Design

Change CursorLocation and CursorType to 3 (both of them). Hirst is using the adovbs.inc constants.

Im sorry, im not sure what you mean. You mean make them both equal to 3?

actually cursortype should be 2

rsUpdates.CursorLocation = 3
rsUpdates.CursorType = 2

http://www.w3schools.com/ado/prop_rs_cursorlocation.asp

http://www.w3schools.com/ado/prop_rs_cursortype.asp

http://www.candsdesign.co.uk/article...ado-constants/

I see where you're setting the connection object to null, but is that the same as actually closing it?

It says "operation is not allowed while object is open."

Why?

Because your order is backwards.

rsUpdates.CursorLocation = 3
rsUpdates.CursorType = 2
rsUpdates.Open strSQL, adoCon

You have to set properties for your recordset object before you open it.

I still think you're better off changing your query to "SELECT TOP 3* FROM TABLE WHERE CONDITION = TRUE ORDER BY SORT_CONDITION DESC" ... let the database engine do your work for you. That isn't just about laziness; the database will do what you ultimately want more efficiently than your code will.