<% if Session("Loggaterrimo") = true then %>
Aggiungi news
<% end if %>
<% set rsNotizie = Server.CreateObject("ADODB.RecordSet")
rsNotizie.ActiveConnection = "Driver={MySql ODBC 3.51 Driver}; Server=localhost; uid=root; pwd=inf75k15; database=memorialcimurri; option=3; port=3306;"
rsNotizie.Source = "Select * from tabnews order by -ID LIMIT 10"
rsNotizie.CursorLocation = 3
rsNotizie.Open()
while not rsNotizie.EOF %>
"><% =rsNotizie("Titolo") %> - <% = rsNotizie("DataG")%> <% = mesi(rsNotizie("DataM"))%> <%=rsNotizie("DataA")%> <% if Session("Loggaterrimo") = true then %>
&act=edit">Mod.
| &act=canc">Canc.
<% end if %>
<% rsNotizie.MoveNext()
wend %>
Tutte
le notizie