Notícias

<% SQL = "SELECT * FROM noticias" SQL = SQL & " ORDER BY id DESC" Set tabela = Server.CreateObject("ADODB.Recordset") tabela.Open SQL, DB, 3, 3 n = 0 %> <%Do until tabela.EOF %> <% n = n + 1 if n <= 30 then %> <%end if tabela.MoveNext loop %>

"> <%=tabela("data")%> - <%=tabela("descricao")%>
Fonte: <%=tabela("enviado_por")%>

<% DB.Close Set DB = Nothing %>