<% Server.Execute("meta/track.asp") %> <% ' Setto la connessione Set Connessione = DBConnexion() ' Setto il menu SQL = "SELECT * FROM Aree A INNER JOIN DettagliAree B ON A.IdArea = B.IdArea WHERE A.IdArea = 1" Set RsAree = DBRecordset(SQL, Connessione) Titolo = RsAree("Area") %>

Company Soci Consulenti Dove siamo   <%While Not RsAree.Eof%> :: <%=RsAree("Titolo")%> " width="60" height="60"> <%=RsAree("Descrizione")%> <%RsAree.MoveNext%> <%Wend%>

<% Set RsAree = Nothing Set Connessione = Nothing %>