News

<% set RS1 = Server.CreateObject("ADODB.Recordset") RS1.ActiveConnection = "PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE="& Server.mappath("db/webcom.mdb") & ";" RS1.Source = "SELECT * FROM news ORDER BY id DESC" RS1.CursorType = 0 RS1.CursorLocation = 2 RS1.LockType = 3 RS1.Open if (NOT RS1.EOF) then col = "class=""alt""" %> <% while NOT RS1.EOF if col = "class=""alt""" then col = "" else col = "class=""alt""" %> > <% RS1.MoveNext Wend %>

"><%=db("titolo")%> <%if db("Data") <> "" then%> <%=db("Data")%> <%end if%>

<%=db("sottotitolo")%>

<% end if RS1.Close Set RS1 = Nothing %>