Yazılım Geliştirme Uzmanı & E-Ticaret Danışmanı
Asp , Excel , VBA , E-Ticaret , Mobil , Desktop, Web Uygulamaları
Tel : 0 534 797 31 21 , Mail : baranseren@gmail.com
Function ConvertTurkish

Function ConvertTurkish 3.3.2015

MySQL ve MSSQL de türkçe karakterleri replace etmek için fonksiyondur. Kullanımı ile ilgili sıkıntı yaşarsanız mail adresimden bilgi isteyebilirsiniz. VB , VB.NET , ASP , ASP.NET de direkt olarak kullanabilirsiniz. Function ConvertTurkish(ByVal metin) Metin = replace(metin, "ı", "ı") Metin = replace(metin, "Å?", "ş") Metin = replace(metin, "ü", "ü") Metin = replace(metin, "ç", "ç") Metin = replace(metin, "ö", "ö") Metin = replace(metin, "Ä?", "ğ") Metin = replace(metin, "ÅŸ", "ş") Metin = replace(metin, "Ç", "Ç") Metin = replace(metin, "Ä°", "i") Metin = replace(metin, "ÄŸ", "ğ") Metin = replace(metin, "Åž", "Ş") Metin = replace(metin, "Ö", "Ö") Metin = replace(metin, "Ãœ", "Ü") Metin = replace(metin, "ı", "ı") Metin = replace(metin, "Å?", "ş") Metin = replace(metin, "ç", "ç") Metin = replace(metin, "ö", "ö") Metin = replace(metin, "Ä?", "ğ") Metin = replace(metin, "ÅŸ", "ş") Metin = replace(metin, "Ç", "Ç") Metin = replace(metin, "Ä°", "i") Metin = replace(metin, "ÄŸ", "ğ") Metin = replace(metin, "Åž", "Ş") Metin = replace(metin, "Ö", "Ö") Metin = replace(metin, "Ãœ", "Ü") Metin = replace(metin, "ü", "ü") metin = Replace(metin, "ÄŸ", "ğ") metin = Replace(metin, "ð", "ğ") metin = Replace(metin, "ý", "ı") metin = Replace(metin, "þ", "ş") metin = Replace(metin, "Ð", "Ğ") metin = Replace(metin, "Ý", "İ") metin = Replace(metin, "Þ", "Ş") ConvertTurkish = metin End Function


Tags : MySQL , MSSQL , Türkçe , karakter , replace , Düzeltme