FCK Editör - Word'den metin kopyalama sorunu

function koru(shn)
shn=replace(shn,"'","")
koru=shn
end function

<!--#include virtual="baglanti.asp"-->
<% katalogtasarim=Request.Form("katalogtasarim")
if not katalogtasarim="" then
Set kayit=db.execute("UPDATE `metin` SET `katalogtasarim`='"&koru(katalogtasarim)&"'")
end if
%>

gibi ya da shekerchi nin yazdığı gibi execute yerine recordset ile kayıt yapacaksınız

güncelleme yapıyor fakat şimdide böyle birşey çıkıyor kayit dedigim zaman ?