<% ' Carica le variabili ed i parametri di configurazione ' %> <%=titoloSito%>
Ti trovi in: homepage / Didattica

Didattica

    <% set rsNovita = Server.CreateObject("ADODB.Recordset") rsNovita.ActiveConnection = connString rsNovita.Source = "SELECT TOP " & maxDidatticaLista & " * FROM didattica ORDER BY data DESC, priorita, id DESC" rsNovita.Open() ' Genera le novit?ordinate per data e per priorit?' While (NOT rsNovita.EOF) If (rsNovita("testo") <> "") Then Response.Write("
  • " & rsNovita("data") & " - " & rsNovita("titolo") & "
    ") Else Response.Write("
  • " & rsNovita("titolo") & "
    ") End If Response.Write("Inserita / Modificata il " & rsNovita("data_ins") & "
  • ") rsNovita.MoveNext() Wend rsNovita.Close() %>