Database udtræk

Veg hjælp af den kode her udskriver jeg fem poster, hvordan udskriver jeg kun den sidste til min hp?

<% Response.buffer = true %>
<html>
<head>
<title>Stardeveloper.com Database Tutorial</title>
</head>
<body>
<% Dim rs

Set rs = Server.CreateObject (\"ADODB.Recordset\")

rs.Open \"names\", \"DSN=odbc_exmp\",,, &H0200

While Not rs.EOF
Response.Write \"ID : \" & rs(\"id\") & \"<br>\"
Response.Write \"First Name : \" & rs(\"first_name\") & \"<br>\"
Response.Write \"Last Name : \" & rs(\"last_name\") & \"<br>\"
Response.Write \"<br>\"
rs.MoveNext
Wend

rs.Close
Set rs = Nothing %>
</body>
</html>