bu bahsettiğiniz işlem için aklımdan geçen bi mantık var ama o sistem kaynakalrı için çok yorucu olur tahminimce en mantıklısı replace ile verileri süzmeniz olur örnek vermek gerekirse
Function ceviril(metinl)
metinl= Replace(metinl , "kötüsöz","k.....z",1,-1,1)
metinl= Replace(metinl , "kötüsöz1","k.....z1",1,-1,1)
metinl= Replace(metinl , "kötüsöz2","k.....z2",1,-1,1)
metinl= Replace(metinl , "kötüsöz3","k.....z3",1,-1,1)
ceviril = metinl
End Function
%>
<%=ceviril(rs("veri"))%>
burdaki olay kötüsöz yazısını sistem otomatik olarak k.....z olarak cevirir