Galeria de Fotos
<% set rs_eventos = oConn.execute("SELECT * FROM tb_galeria WHERE Publicado = 1 ORDER BY idGaleria DESC LIMIT 3") if not rs_eventos.EOF then while not rs_eventos.EOF 'define o tamanho do texto tmnhoTxt = 65 %>
<%
set rs_fotos = oConn.execute("SELECT Url FROM tb_galeria_fotos WHERE idGaleria = '" & rs_eventos("idGaleria") & "' ORDER BY NumeroFoto DESC LIMIT 1")
if not rs_fotos.EOF then
newFoto = SERVIDOR & "shared/inc/resize.asp?local=home&path=" &_
CAMINHO_FISICO & "[@foto@]&width=120"
%>
" height="80" style="border: 1px solid #ccc;"/>
<%
else
'se não tiver foto aumenta o tamanho do texto
tmnhoTxt = 80
end if
rs_fotos.close()
%>
<%=rs_eventos("Data")%>
<%=maiuscula(TxtResumido(rs_eventos("Nome"),tmnhoTxt)) & " ..."%>
<%
rs_eventos.movenext()
wend
end if
rs_eventos.close()
%>
<%=maiuscula(TxtResumido(rs_eventos("Nome"),tmnhoTxt)) & " ..."%>
