al posto di

codice:
rs("descrizione") = Replace(rs("descrizione"), "''","'") 

<%=rs("descrizione")%>
usa

codice:
Response.Write Replace(rs("descrizione"), "''","'")