Lo que tengo es algo asi
<%
while not RS.EOF
variable= rs.Fields("Nombr")
Session("Nombr")=variable
%>
<td width="250" border="0" cellpadding="0" cellspacing="0">
<a href="comunidad.asp?pasa=<%=variable%>">
<div align="left">
<font color="#FFFF99" size="3">
<%
Response.Write(rs.Fields("Nombr")&"<BR>")
RS.MoveNext
%>
</font>
</div>
</a>
</td>