<%
buyuk = "&Ouml;"
kucuk = "&ouml;"

Function cevir(data)
data = Replace(data ,"&Ouml;","Ö",1,-1,0)
data = Replace(data ,"&ouml;","ö",1,-1,0)
cevir=data
End Function
%>

<%=cevir(Kucuk)%>
<%=cevir(Buyuk)%>