<% if Re("tipo") = "" then Set rsDados = objConn.execute("Select * from projetos order by ordem") else Set rsDados = objConn.execute("Select * from projetos where link = '"&Re("tipo")&"'") end if titulo = rsDados("titulo") texto = rsDados("texto") %>
Home | <% if local then %> Serviços | <%=rsDados("titulo")%> <% else %> Serviços | <%=rsDados("titulo")%> <% end if %>

<%=titulo%>

<%=texto%>

    <% Set rsSubs = objConn.execute("Select * from projetos order by ordem") while not rsSubs.eof if local then link = "projetos.asp?tipo="& rsSubs("link") else link = rsSubs("link") end if classe = "" if rsSubs("link") = Re("tipo") then classe = "class=""menu_int_rght_actv""" end if %>
  • " <%=classe%>><%=rsSubs("titulo")%>
    • <% rsSubs.movenext wend %>
<% Set rsFotos = objConn.execute("Select * from menu_fotos where id_projeto = "&rsDados("id_projeto")&"") if not rsFotos.eof then %>

Confira algumas fotos:

<% end if %>