Carissimi,
utilizzando questo script che mi elenca in modo paginato tutte le news da un db access, come posso implementare un controllo nella query che nel campo categoria è presente per esempio la parola VARIE oppure la parola ASSISTENZA me li escluda da elencarci insieme alle altre categorie.
Come posso fare?
Graziecodice:<% risultatiPerPagina = 5 pagina = Request.queryString("pagina") if len(pagina) > 0 and isNumeric(pagina) then pagina = cLng(pagina) else pagina = 1 end if if pagina < 1 then pagina = 1 questaPagina = request.serverVariables("PATH_INFO") sql = "select id, dataora, titolo, testo1, categoria from NEWS order by id desc" Set rs = Server.CreateObject("ADODB.Recordset") rs.Open sql, conn, 3, 3 %> <% set rs = server.createObject("ADODB.Recordset") rs.open sql, conn, 3, 1 if not rs.eof then rs.pageSize = risultatiPerPagina rs.absolutePage = pagina response.write "" for r = 1 to risultatiPerPagina if not rs.eof then %> <div align="center"> <TABLE BORDER="0" width="475" cellpadding="0" height="34" id="table2"> <TR> <TD height="40" align="left" width="475" valign="top"> <p align="left"> <font face="Verdana" size="1"> <p align="left"><%=rs.Fields("categoria")%> - <%=rs.Fields("dataora")%></font> "><font face="Verdana" size="1"><%=rs.Fields("titolo")%></font> <font face="Verdana" size="1"> <% news = rs.fields("testo1") Response.Write Left(news,150) & "...leggi" %> </p> </font> </p></TD></table> <% rs.moveNext else exit for end if next response.write "<font face='verdana' size='1'>Notizie Precedenti: " for p = 1 to rs.pageCount if p = pagina then response.write p & " " else response.write "" & p & " " end if next else %> </div> <p align="center"> <font face="Tahoma" size="2" color="#003070">Nessuna NEWS attualmente disponibile</font></p> <p align="center"></p> <% end if %>
G.

Rispondi quotando