<% CALL CreateConnection() CALL CreateRecordSet(link_categoria, "SELECT Categoria.rel_site, Categoria.id_categoria, Categoria.nome_categoria, Link.url, Link.destaque, Link.texto FROM Categoria LEFT OUTER JOIN Link ON Categoria.rel_site = Link.id_link ORDER BY Categoria.ordem_exibicao") if not link_categoria.eof then do until link_categoria.eof response.write ".:"& link_categoria("nome_categoria") & "
" link_categoria.movenext loop end if response.write ".:Colunistas
" %>

<% query = "SELECT Link.url AS LINK, Colunista.nome as nome, Link.texto FROM Link INNER JOIN Colunista ON Link.id_link = Colunista.rel_site" CALL CreateRecordSet(links_sessao, query) if not links_sessao.eof then response.write ".: Colunistas

" do until links_sessao.eof %> " target="_blank" ><%= links_sessao("nome") %>
<%if len(links_sessao("texto")) > 0 then response.write links_sessao("texto") %>
<%end if %> <%= links_sessao("link") %>

<% links_sessao.movenext loop else response.write "Nenhum Link cadastrado até o momento


" end if CALL CloseRecordSet(links_sessao) %>