Problema con query, non mi estrae i prossimi 5 record, ma solo quello relativo al prossimo appuntamento.
Cosa sbaglio?
codice:<% Set RecSet = Server.CreateObject("ADODB.Recordset") Visa = "SELECT Top 5 * FROM News WHERE News_Data >= date() AND News_Tipo ='iniziative' or News_Tipo='iniziative2' ORDER BY News_Data ASC" RecSet.Open Visa, objConn, adOpenDynamic, adLockOptimistic %> <% if RecSet.EOF Then%> <h4 class="titolo2">Iniziative</h4> Non sono segnalate nuove iniziative per i prossimi giorni</p><% else %> <h4 class="titolo2">Iniziative</h4> <ul class="lista" id="articoli"> <% do Until RecSet.EOF %> <% if DateDiff("d",Date,RecSet("News_Data")) >-1 then %> <% data = RecSet("News_Data") giorno = Day(data) data1 = Month(data) mese = MonthName(data1,false) anno = Year(data)%> [*]<a title="<% =RecSet("News_Titolo") %>" href="news/dettagli.asp?ID=<% =RecSet("ID") %>"><% Response.Write(giorno)%><% Response.Write(mese)%> <% if RecSet("News_Descrizione")<> "" Then %> <%=RecSet("News_Descrizione")%><% End if %> <% =RecSet("News_Titolo") %></a><% End if %> <% RecSet.MoveNext Loop RecSet.Close set RecSet=Nothing objConn.Close set objConn=Nothing %><% End if %>

Rispondi quotando
