|
|
.......................................................................................................................
|
<%
f_codigo = request("codigo")
f_codigo = Replace(f_codigo, "'", "")
i_stringsql = "SELECT "&_
" * "&_
"FROM "&_
" noticia "&_
"WHERE "&_
" not_ativo = true AND "&_
" not_english = false "&_
"ORDER BY "&_
" not_codigo DESC "
set i_query = Conexao.Execute(i_stringsql)
do while not i_query.eof
%>
<%
if i_query("not_codigo") = Cint(f_codigo) OR f_codigo = "" then
%>
|
|
| |
<%=i_query("not_noticia")%>
|
|
<%
end if
%>
<%
i_query.movenext
loop
i_query.movefirst
%>
<%
do while not i_query.eof
%>
<%
if i_query("not_codigo") <> Cint(f_codigo) AND f_codigo <> "" then
%>
|
|
|
|
<%
end if
%>
<%
i_query.movenext
loop
%>
|
|
