Selecione um assunto:

<% tdate = date - 70 tdate = month(tdate) & "/" & day(tdate) & "/" & year(tdate) set rs = getrs2( "/fax/noticias.mdb","Select DISTINCT Perguntas.codAssunto, Tipos_Perguntas.NomeAssunto from Perguntas INNER JOIN Tipos_Perguntas ON Perguntas.CodAssunto = Tipos_Perguntas.CodAssunto ORDER BY Perguntas.codAssunto") aux = 1 do while rs.eof=false %> <% rs.movenext aux = aux + 1 loop %>
  <% response.write( "

"&""&aux & ". - " & rs("NomeAssunto") & " 
" ) %>