Results 1 to 3 of 3

Thread: Read from database in reverse.

  1. #1

    Thread Starter
    PowerPoster sail3005's Avatar
    Join Date
    Oct 2000
    Location
    Chicago, IL, USA
    Posts
    2,340
    I am trying to make just a very simple guestbook to fiddle around with. I want to read from the records in reverse so that the newest entry appears on top. This code gives me errors:

    I set it to go to the last record, and then tell the loop to go backwards, but i get errors. Can anyone help me accomplish this task? Here is the code:


    Code:
    <%
    
    Dim objRS, strName, strComment
    Set objRS = Server.CreateObject("ADODB.Recordset")
    
    objRS.Open "main", objConn, , adLockOptimistic, adCmdTable
    
    strName = Request.Form("name")
    strComment = Request.Form("comment")
    
    objRS.AddNew
    objRS("Name") = strName
    objRS("Message") = strComment
    objRS.Update
    objRS.MoveLast
    
    
    If objRS.EOF Then
    Response.Write "Database is empty"
    
    Else
    
    Do While Not objRS.EOF
    	Response.Write "<pre>"
    	Response.Write "Name: " & objRS("Name") & "<br>"
    	Response.Write "Comment: " & objRS("Message") & "<br>"
    	Response.Write "<hr><p>"
    	Response.Write "</pre>"
    	objRS.MovePrevious
    Loop
    
    End If
    
    objRS.Close
    Set objRS = Nothing
    
    
    objConn.Close
    Set objConn = Nothing
    
    %>
    Last edited by sail3005; Mar 11th, 2001 at 09:21 PM.

    USAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSA
    USAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSA
    USAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSA
    USAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSA
    USAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSA
    USAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSA
    USAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSA
    USAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSA
    USAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSA
    USAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSA
    USAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSA
    USAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSA
    USAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSA

  2. #2
    Addicted Member Active's Avatar
    Join Date
    Jan 2001
    Location
    Lat: 13° 4' 46" N, Long: 80° 15' 20" E
    Posts
    209
    This Would Be simple If you used an SQL statement
    Instead of using adcmdTable.

    An SQL satement allows you to get Records in any ordered manner.

    Suppose I am Requesting a recordset With Records
    Odered such that the last entry is the first Record in the
    Recordset

    I would Use something like..

    Select * from Myatble Ordered By RecordID Desc

    Desc is descending !

    So the change you have to make is..

    SQL = "Select * from Mytable Ordered By RecordID Desc"

    objRS.Open SQL,objConn,adOpenKeyset ,adLockOptimistic,adCmdText

    and You have it...
    Last edited by Active; Mar 12th, 2001 at 04:11 AM.
    If you can't beat your computer at chess, try kickboxing !!!
    [Download Tag Editing Tools.]

  3. #3

    Thread Starter
    PowerPoster sail3005's Avatar
    Join Date
    Oct 2000
    Location
    Chicago, IL, USA
    Posts
    2,340
    cool, thanks for the info on the SQL statments, i will look into those more.

    I figured it out by using a sort thing, and a cursor thing. I don't fully understand them yet tthough...

    USAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSA
    USAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSA
    USAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSA
    USAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSA
    USAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSA
    USAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSA
    USAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSA
    USAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSA
    USAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSA
    USAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSA
    USAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSA
    USAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSA
    USAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSAUSA

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width