<% Response.ExpiresAbsolute = #1/1/2001# Response.AddHeader "cache-control", "no-store, must-revalidate, private" Response.AddHeader "Pragma", "no-cache" %> <% Set cn = Server.CreateObject("ADODB.Connection") cn.open "Driver={Microsoft Access Driver (*.mdb)}; Dbq="&Server.MapPath("../basedati/panallo.mdb") Set rs = Server.CreateObject("ADODB.Recordset") %> DeadEndTrack.com

Latest News

 

<% sqlnews= "SELECT * FROM news WHERE titoloeng<>'' ORDER BY id DESC" rs.open sqlnews, cn, adopenkeyset, adlockoptimistic if not rs.eof then do until rs.eof %>

<%=rs("titoloeng")%>

<% abbreviato = rs("corpoeng") if not len(abbreviato)<190 then abbreviato=left(abbreviato,190) abbreviato=abbreviato & "... [ read more ]" end if response.write abbreviato %>

<% rs.movenext loop else %>

No news, sorry.

<% end if %>

 

Dead-End Track Fabrizio Foni Marco Guardabasso Francesco Olmastroni Andrea Spinelli Luisa Quaglia