Türkçe karakter sorununa çözüm

Kodu en üste ekleyin
<% function turkceyap(kelime) istek =replace(kelime,"Ý","İ") istek =replace(istek ,"ý","ı") istek =replace(istek ,"þ","ş") istek =replace(istek ,"ð","ğ") istek =replace(istek ,"Ð","?") istek =replace(istek ,"Þ","Ş") turkceyap=istek end function %>
Çağırma şeklimiz
Burada çağıracağımız sütün haber
<%=gelecekonline(turkceyap("haber"))%>
veya değişik bir kullanım
……id=<%=turkceyap(server.HTMLEncode(rs_haber))%>
Kaynak: