<% Server.Execute("meta/track.asp") %> <% ' Setto la connessione Set Connessione = DBConnexion() SQL = "SELECT * FROM News WHERE IdNews = " & Request.QueryString("IdNews") Set RsNews = DBRecordset(SQL, Connessione) SQL = "SELECT * FROM News" Set RsListNews = DBRecordset(SQL, Connessione) Titolo = "News" %>

:: <%=RsNews("Titolo")%> <%=RsNews("Descrizione")%>   Tutte le News <%While Not RsListNews.Eof%> :: "><%=RsListNews("Titolo")%> <%RsListNews.MoveNext%> <%Wend%>

<% Set RsNews = Nothing Set RsListNews = Nothing Set Connessione = Nothing %>