"r object cant move back"
here is my code :
Expand|Select|Wrap|Line Numbers
- <%
- path = Server.mappath("../db/ServerData.mdb")
- set con = Server.createobject("ADODB.Connection")
- con.open "driver={Microsoft Access Driver (*.mdb)};DBQ="&path
- set r = con.execute("select * from News")
- Dim i
- i = 1
- r.MoveLast
- do until i = 4 Then
- Response.write (""&r.fields("Name")&"")
- r.MovePrevious
- loop
- conn.close
- conn = Nothing
- %>