Pues... no sé, pero no podés meter un <div> (un elemento de bloque) dentro de un <a> (un elemento en línea)... ah, esperá... si veo un error. el Rs.MoveNext lo debés colocar luego del </td> y no donde actualmente lo tenés y además te falta un wend:
Código:
<%
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>")
%>
</font>
</div>
</a>
</td>
<%
RS.MoveNext
wend
%>
Lo que está en rojo está mal, pero eso es de HTML. Lo que está en verde no tiene sentido... ¿modificar el valor de una variable session por cada pasada del recordset?
(el uso de <font> lo omito totalmente...)