Veritabanına kaydetmeden önce
Function cevir(ByVal data) 
data = Replace (data ,"'","`",1,-1,1) 
cevir=data 
End Function
Bu şekilde tırnakları replace edersen, düzelir.
cevir(request.form("icerik"))