|
|
|
|
|
<%
foto =(noticia.Fields.Item("Str_Imagem_Noticia").Value)
if foto&"a" <> "a" then%>
|
|
<%end if%>
<%=(noticia.Fields.Item("Str_Titulo").Value)%> |
|
<%= replace ((noticia.Fields.Item("Str_Texto").Value),chr(13), " ")%> |
|
<% site =(noticia.Fields.Item("Str_site").Value)
if "a"&site <> "a" then %>
<% = site%>
|
|
<%end if%>
<% email =(noticia.Fields.Item("Str_email").Value)
if "a"&email <> "a" then %>
<%=email%> |
|
<%end if%>
<%=(noticia.Fields.Item("data").Value)%> |
|
|
|
|
Notícias |
<%
While ((Repeat1__numRows <> 0) AND (NOT noticias.EOF))
%>
|
<%ID_noticia=(noticias.Fields.Item("ID_noticia").Value)%> <%if ID_noticia <> nota then%>
<%=(noticias.Fields.Item("Str_Titulo").Value)%> <%else%> <%=(noticias.Fields.Item("Str_Titulo").Value)%> <%end if%> |
<%
Repeat1__index=Repeat1__index+1
Repeat1__numRows=Repeat1__numRows-1
noticias.MoveNext()
Wend
%>
|
|