C'è qualcosa che non sta andando in un Replace che faccio.
Mi stampa articolo di...
ma non leggo l'oggetto, cosa sto sbagliando?
codice:<% if Cerca = "" then Response.write "Inserire un termine per effettuare una ricerca" Response.end end if if Rs.EOF then Response.write "Nessun risultato trovato!" else Do while NOT Rs.EOF testo=Rs("Oggetto") testo = replace(Oggetto,Cerca,"" & Cerca & "",1,-1,vbTextCompare) %> <% Response.Write (testo) %> Articolo di <%=Rs("Tipo")%>, <abbr title="numero">n.</abbr> <%=RS("Numero")%> pubblicato il<%=Rs("data")%> </p> <% Rs.MoveNext Loop End If Rs.Close Set Rs = Nothing Conn.Close Set Conn = Nothing %>

Rispondi quotando
