<%

Function Cevir(gelenveri)

    gelenveri = LCase(gelenveri)

         gelenveri = Replace(gelenveri ,Chr(32),"_",1,-1,0)

         gelenveri = Replace(gelenveri ,Chr(208),"g",1,-1,0)

         gelenveri = Replace(gelenveri ,Chr(240),"g",1,-1,0)

         gelenveri = Replace(gelenveri ,Chr(222),"s",1,-1,0)

         gelenveri = Replace(gelenveri ,Chr(254),"s",1,-1,0)

         gelenveri = Replace(gelenveri ,Chr(199),"c",1,-1,0)

         gelenveri = Replace(gelenveri ,Chr(231),"c",1,-1,0)

         gelenveri = Replace(gelenveri ,Chr(221),"i",1,-1,0)

         gelenveri = Replace(gelenveri ,Chr(236),"i",1,-1,0)

         gelenveri = Replace(gelenveri ,Chr(237),"i",1,-1,0)

         gelenveri = Replace(gelenveri ,Chr(214),"o",1,-1,0)

         gelenveri = Replace(gelenveri ,Chr(246),"o",1,-1,0)

         gelenveri = Replace(gelenveri ,Chr(252),"u",1,-1,0)

         gelenveri = Replace(gelenveri ,Chr(220),"u",1,-1,0)

    Cevir = gelenveri 

End Function

%>