Ciao a tutti, per il momento ho risolto il problema spam, ma ho bisogno di un altro aiuto,
ho il seguente script che mi estrae i dati in ordine dall'ultima decrescente, è complicato fare in modo che l'ordine sia casuale?
<% Response.Buffer = True lineIndex = 0 Set connect = Server.CreateObject("ADODB.Connection") ' Prepare to connect to database connect.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath ("messaggi.adb") ClassTopic = Trim(session("k")) whereclause = "WHERE " whereclause = whereclause &"Classifieds.ClassTopic = '" & ClassTopic & "'" query = "SELECT * FROM classifieds "& whereclause &"And ClassExpire > Date()" & "ORDER BY ClassPosted DESC" set recordset = Server.CreateObject("ADODB.Recordset") recordset.CursorType = 2 ' adOpenStatic recordset.Open query, connect %> <!-- fine --> <table width="100%"><tr><td> <!-- intestazione annunci --> <div> <% i=0 Do While Not recordset.EOF NoResults = False if i=2 then exit do %> <table width="98%" cellpadding="0" cellspacing="0" border="0" style="font-size: 10pt"> <tr><td> <a href="ads_display.asp?Key_m=<%=recordset("ClassTopic")%>"> <b><%=recordset("ClassAdTitle")%></b></a><br> <b>rif. n° <%=recordset("ClassID")%> dal <%=recordset("ClassPosted")%> al <%=recordset("ClassExpire")%></b> <%=left(recordset("ClassDescription"),100)%>...<br><br></td></tr> </table> <% i=i+1 recordset.MoveNext Loop %> <%recordset.close%> </div><!-- intestazione anuunci#--></td></tr> </table>il k lo passo io.
Grazie spero possiate aiutarmi.
Ciao Andrea
