Looping Around A Recordset Using ASP

<%
dim objRS
set objRS = Server.CreateObject("ADODB.recordset")

objRS.Open "SELECT * FROM XX", conn

if not objRS.eof and not objRS.bof then
  do until objRS.EOF
    response.write(objRS("xxx"))
    objRS.MoveNext
  loop
end if

objRS.close

%>

Back to ASP