Con questo codice se la categoria è doppia viene stampata 2 volte, invece vorrei che venga stampata solo 1 volta.

<%
set rs = cn.Execute("SELECT data,categoria FROM gallery order by data asc")
%>
<p align="center">
<%
if rs.eof then
response.write ""
else
do until rs.EOF
response.write "(" & rs("categoria") & ") "
rs.movenext
loop
%>
</p>
<%
rs.close
cn.close
end if
%>