Türkçe Destekli, Karakter Büyütme Fonksiyonu

<%
'Karakter Büyütme Fonksiyonu
'mydesign | mydesign@mydesign.gen.tr

Function Buyut(strBaslik)
strBaslik = Replace(strBaslik, "a", "A")
strBaslik = Replace(strBaslik, "b", "B")
strBaslik = Replace(strBaslik, "c", "C")
strBaslik = Replace(strBaslik, "ç", "Ç")
strBaslik = Replace(strBaslik, "d", "D")
strBaslik = Replace(strBaslik, "e", "E")
strBaslik = Replace(strBaslik, "f", "F")
strBaslik = Replace(strBaslik, "g", "G")
strBaslik = Replace(strBaslik, "ğ", "Ğ")
strBaslik = Replace(strBaslik, "h", "H")
strBaslik = Replace(strBaslik, "ı", "I")
strBaslik = Replace(strBaslik, "i", "İ")
strBaslik = Replace(strBaslik, "j", "J")
strBaslik = Replace(strBaslik, "k", "K")
strBaslik = Replace(strBaslik, "l", "L")
strBaslik = Replace(strBaslik, "m", "M")
strBaslik = Replace(strBaslik, "n", "N")
strBaslik = Replace(strBaslik, "o", "O")
strBaslik = Replace(strBaslik, "ö", "Ö")
strBaslik = Replace(strBaslik, "p", "P")
strBaslik = Replace(strBaslik, "q", "Q")
strBaslik = Replace(strBaslik, "r", "R")
strBaslik = Replace(strBaslik, "s", "S")
strBaslik = Replace(strBaslik, "ş", "Ş")
strBaslik = Replace(strBaslik, "t", "T")
strBaslik = Replace(strBaslik, "u", "U")
strBaslik = Replace(strBaslik, "ü", "Ü")
strBaslik = Replace(strBaslik, "v", "V")
strBaslik = Replace(strBaslik, "w", "W")
strBaslik = Replace(strBaslik, "x", "X")
strBaslik = Replace(strBaslik, "y", "Y")
strBaslik = Replace(strBaslik, "z", "Z")
Buyut = strBaslik
End Function
%>

Yorum Yapabilmek İçin Üye Girişi Yapmanız Gerekmektedir.

türkçe destekli karakter büyütme fonksiyonu