<%
Set cn = Server.CreateObject("ADODB.Connection")
cn.Open connStr
%>
News e Promozioni
NEWS E PROMOZIONI
<%
Set rsNegozi = Server.CreateObject("ADODB.Recordset")
myquery = "SELECT * FROM Promozioni ORDER BY data DESC"
rsNegozi.Open myquery, cn
x= 0
While NOT (rsNegozi.EOF or x = 6)
%>
