1°Memorial Cimurri - Gran Premio Bioera

<% if Session("Loggaterrimo") = true then 'se il campo ID ² valorizzato, visualizza la singola notizia if request("ID") <> "" then where = " where ID = " & request("ID") end if set rsNews = Server.CreateObject("ADODB.RecordSet") rsNews.ActiveConnection = "Driver={MySql ODBC 3.51 Driver}; Server=localhost; uid=root; pwd=inf75k15; database=memorialcimurri; option=3; port=3306;" rsNews.Source = "Select * from tabnews " & where rsNews.Open() select case request("act") case "canc" set rsNews = Server.CreateObject("ADODB.RecordSet") rsNews.ActiveConnection = "Driver={MySql ODBC 3.51 Driver}; Server=localhost; uid=root; pwd=inf75k15; database=memorialcimurri; option=3; port=3306;" rsNews.Source = "Select * from tabnews where ID = " & request("ID") rsNews.LockType = 3 rsNews.Open() rsNews.Delete() rsNews.Close() set rsNews = nothing response.redirect("/2005/news.asp") case "edit" titolo = rsNews("Titolo") testo = rsNews("Testo") dida = rsNews("DidaImg") DataG = rsNews("DataG") DataM = rsNews("DataM") DataA = rsNews("DataA") case "add" titolo = "" testo = "" dida = "" DataG = day(now) DataM = month(now) DataA = year(now) end select %> <% else response.Write("Non si dispone dei permessi necessari per visualizzare la pagina") end if %>

<% 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

L'itinerario

Partirà dalla sede del main sponsor Bioera, accanto al quartier generale di Mariella Burani Fashion Group , alle porte di Cavriago e si snoderà poi con un interessante circuito lungo i colli matildici... continua