help for Replace - cm recupero la stringa?

[fraude]

function pulisci(stringa)
   pulisci = replace(stringa, "'", "''")
end function

strPERSONALE = pulisci(Request.Form("personale"))