Try using diff variables for diff purpose,
<%
dim oConn, oRs, sSQL, rsSex
set oConn=server.CreateObject("adodb.connection")
set oRs=server.CreateObject("adodb.recordset")
oConn.open "c:/Host/demo/demo.mdb"
sSQL = "SELECT * FROM tblUsers "
oRs = oConn.Execute(sSQL)
Response.Write("<table>")
do while not oRS.EOF
'...........................
'write ur statements here
Response.Write("<tr><td>")
Response.Write(oRS("_ColName_").value)
Response.Write("</td></tr>")
'..........................
oRS.movenext
loop
Response.Write("</table>")
rssex.close
set oRs=nothing
set oConn = nothing
set sSQL = nothing
%>