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?
codice:
<%
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
%>
Grazie
G.