asp kod temizleme yardım

selam arkadaşlar.
kullandıgım kod aşagıdaki localde sorun olmuyor ama site üzerinden deneyince işler karışıyor yardımlarınızı bekkliyorum. teşekkurler.
<%
'html ve turkce karekter temzileme modulu
Private Function temizle(data)
data= server.htmlencode(data)
data = Replace (data ,"&lt ;","<",1,-1,1)
data = Replace (data ,"&gt ;",">",1,-1,1)
data = Replace (data ,"`","&#146 ;",1,-1,1)
data = Replace (data ,"'","&#x60 ;",1,-1,1)
data = Replace (data ,"&quot ;","",1,-1,1)
data = Replace (data ,"&amp ;","&",1,-1,1)
temizle = data
End Function

'html aktif
Private Function html(data)
data = Replace (data ,"&lt ;","<",1,-1,1)
data = Replace (data ,"&gt ;",">",1,-1,1)
html= data
End Function
Private Function tr(data)
data = Replace (data ,"&#351 ;","ş",1,-1,1)
data = Replace (data ,"&#305 ;","ı",1,-1,1)
data = Replace (data ,"&#287 ;","ğ",1,-1,1)
data = Replace (data ,"&#252 ;","ü",1,-1,1)
data = Replace (data ,"&#231 ;","ç",1,-1,1)
data = Replace (data ,"&#246 ;","ö",1,-1,1)
data = Replace (data ,"&#350 ;","Ş",1,-1,1)
data = Replace (data ,"&#304 ;","İ",1,-1,1)
data = Replace (data ,"&#286 ;","Ğ",1,-1,1)
data = Replace (data ,"&#220 ;","Ü",1,-1,1)
data = Replace (data ,"&#199 ;","Ç",1,-1,1)
data = Replace (data ,"&#214 ;","Ö",1,-1,1)

tr= data
End Function

Response.CharSet ="windows-1254"
%>

localde sorun olmuyor. godaddy kullanıyorum phpmyAdmin den yapinca yani site uzerinde çalışmıyor.

bozan karakterler ı ş ğ harfleri ç ü ö farflerinde sorun yok tuhaf ıma gelen. ş harfinin ascii kodu &#351 veritabanına eklediği ascii ise &#254 ;

ı ş ğ eklendiğinde normalde, gelen içerik &#305 ; &#351 ; &#387 ; veritabanına eklenmiş hali ise &#253 ; &#254 ; &#240 ;
yardımlarınızı bekliyorum 2 gunden beri ugraşıyorum arkadaşlar.

server daki sql server'ın dili ile alakalı sorun kendi pc deki sql server dili ne ona bak sonra server tel aç serverdakini de localdaki gibi yaptırırsan sorun ortadan kalkar