isminiz : Şifreniz : Güvenlik Kodu :522180 Hatirla :

  Kalbimingulu Kalplerin ve Sevginin Bulustugu Site Kalbimin Gülü Forumuna HoÅŸgeldiniz || Webmaster icin bilgiler konular
   Asp Siteyi Utf-8 cevirmenin Yuzde Yuz Ayarlarini oku

30.12.2021 12:25 Okunma Sayisi 757 Defa
keoma
[Site Admini]



Mesaj sayisi : 97
Giris sayisi : 152
Konu puani : 0  Toplam P : 19
Konuya Puan ver
uye bilgileri

Turkce Karakter Sorunu Kesin cozum
Asp Siteyi Utf-8 cevirmenin Yuzde Yuz Ayarlari

Burya utf-8 kodlarini ekledigin icin turkce karakterlerin hepsini ingilizceye cerirmis.. ne kadar turkce karakter yazsam hepsini ceviriyor

cunku alt tarafta kod ayikla kodlari var unun icin tr harflerini ingilizceye ceviriyor.

ister Asp Olsun ister php veya html olsun Hic bir yerde arayipta bulamadiginiz Bilgileri zize burda anlatacagim Bu yaziyi yazmamin sebebi Sanal aleminde binlerde site var hic biri dogru degil hepsi bir birinden yopya yapmislar.

Adamlar site kodlamasini bilmiyor bir kac yerden bilgi alip sitesine yerlestiriyor hava atiyor salaklar.

Arkadaslar Sakin mysqld --character-set-server=utf8mb3 veya utf8mb4_turkish_ci Hic birseyi deyistirmeyim hepsi yalan Zaten MYSQL PHP admin Ayarlidir utf8mb4_general_ci General ne demek Universal demek yani dUnyadaki dil lisansi tUmUne general denir sakin ve sakin orayi kurcalamayin basiniza is yaparsiniz..

Simdi Sitenin ust tarafinda bu kodlar olmasi lazim

meta http-equiv="Content-Type" content="text/html; charset=utf-8" />

<meta http-equiv="X-UA-Compatible" content="IE=edge,chrome=1">

<meta name="viewport" content="width=device-width, initial-scale=1">

simemi utf-8 nasil ceviririm sorunsuz olarak

yukardaki kodu ekledim simdi o kod tUm sitelerin basina gelen konur

simdi gelelim bir asp siteye Asp sitede assagdaki kodlarim olmasi lazim

<%

Response.ContentType = "text/html"

Response.AddHeader "Content-Type", "text/html;charset=UTF-8"

Response.CodePage = 65001

Response.CharSet = "UTF-8"

%>

text/html;charset ne demek

Yazilan yazi karackerin anlami yani texte yazimiz TXT bos sayfaya yaziyoruz ya anlami o demek UTF-8 kodu DUnya capinda 65001 dir ( 65001 kodu olmadan utf 8 calismaz CharSet = "UTF-8bu uft 8 Universal dil destegi.

Simdi bunlari ekledik sitemizde tUrkce harfle cikiyor ÅŸ Åž U U U ÄŸ Äž Ä°

benimsitem.com/UnlU-aÅŸUi-yemeÄŸi-getirirken-yemeÄŸi-dUktU.html Simdi yukardaki link kodunu google hic indexlemez es gecip seninlemi ugrasacam der. ve ayriyeten tUrkce harflerine bize simdi sUzgec lazim tUrkce harflerini ingilizceye cevirmek icin hecx kodlari lazim SUzgec denilen kodlar olmassa bUtUm emegimiz bosuna. KarakterTemizle kodlari lazim

KarakterTemizle me kodlari bu kodlar olmassa sitemiz bir ise yaramaz

<%

Function cevir(metin)

metin = Replace(metin,"%u015F","ÅŸ", 1, -1)

metin = Replace(metin,"%u015E","Åž", 1, -1)

metin = Replace(metin,"%3A",":", 1, -1)

metin = Replace(metin,"%2C",",", 1, -1)

metin = Replace(metin,"%20"," ", 1, -1)

metin = Replace(metin,"%0D%0A","

", 1, -1)

metin = Replace(metin,"%21","!", 1, -1)

metin = Replace(metin,"%28","(", 1, -1)

metin = Replace(metin,"%29",")", 1, -1)

metin = Replace(metin,"%u011F","ÄŸ", 1, -1)

metin = Replace(metin,"%u011E","Äž", 1, -1)

metin = Replace(metin,"%u0130","Ä°", 1, -1)

metin = Replace(metin,"%u0131","ı", 1, -1)

metin = Replace(metin,"%E7","U", 1, -1)

metin = Replace(metin,"%C7","U", 1, -1)

metin = Replace(metin,"%F6","U", 1, -1)

metin = Replace(metin,"%D6","U", 1, -1)

metin = Replace(metin,"%FC","U", 1, -1)

metin = Replace(metin,"%DC","U", 1, -1)

cevir = metin

End Function

%>

simdi tUkce kodlarini sUzgecten gecireceyiz yukardaki kodlar bozuk olan harfleri temizliyor.

<%

Function KarakterTemizle(Veri)

KarakterTemizle = Replace(Veri, chr(254), "s")

KarakterTemizle = Replace(KarakterTemizle, chr(222), "S")

KarakterTemizle = Replace(KarakterTemizle, "ı", "i")

KarakterTemizle = Replace(KarakterTemizle, "Ä°", "I")

KarakterTemizle = Replace(KarakterTemizle, "U", "u")

KarakterTemizle = Replace(KarakterTemizle, "U", "U")

KarakterTemizle = Replace(KarakterTemizle, "ÄŸ", "g")

KarakterTemizle = Replace(KarakterTemizle, "Äž", "G")

KarakterTemizle = Replace(KarakterTemizle, "U", "o")

KarakterTemizle = Replace(KarakterTemizle, "U", "O")

KarakterTemizle = Replace(KarakterTemizle, "U", "c")

KarakterTemizle = Replace(KarakterTemizle, "U", "C")

KarakterTemizle = Replace(KarakterTemizle, " ", "-")

End Function

%>

simdi yukardaki kodlarda bu harfleri temizliyor ÅŸ Åž U U U ÄŸ Äž Ä° sUzgecten gecirdigimiz takdirde linkimiz assagdaki gibi olacak

benimsitem.com/unlu-asci-yemegi-getirirken-yemegi-doktu.html

ve UcUncU kodlarimizda hafleri temizledik ama baska seyleri temizlemedik onlarida tUm temizliyelim.

<% function trsil(veri)

veri = Replace (veri ,"U", "c")

veri = Replace (veri ,"U", "c")

veri = Replace (veri ,"ÅŸ", "s")

veri = Replace (veri ,"Åž","s",1,-1,1)

veri = Replace (veri ,"U","u",1,-1,1)

veri = Replace (veri ,"U","u",1,-1,1)

veri = Replace (veri ,"ÄŸ","g",1,-1,1)

veri = Replace (veri ,"Äž","g",1,-1,1)

veri = Replace (veri ,"U","o",1,-1,1)

veri = Replace (veri ,"U","o",1,-1,1)

veri = Replace (veri ,"ı","i",1,-1,1)

veri = Replace (veri ,"ÄŸ","g",1,-1,1)

veri = Replace (veri ,"Ä°","i",1,-1,1)

veri = Replace (veri ,"ı","i",1,-1,1)

veri = Replace (veri ,"ÅŸ","s",1,-1,1)

veri = Replace (veri ,"U","o",1,-1,1)

veri = Replace (veri ,"U","u",1,-1,1)

veri = Replace (veri ,"U","u",1,-1,1)

veri = Replace (veri ,"U","c",1,-1,1)

veri = Replace (veri ,"Äž","g",1,-1,1)

veri = Replace (veri ,"Åž","s",1,-1,1)

veri = Replace (veri ,"U","o",1,-1,1)

veri = Replace (veri ,"U","c",1,-1,1)

veri = Replace (veri ,"?","",1,-1,1)

veri = Replace (veri ,"@","",1,-1,1)

veri = Replace (veri ,"%","",1,-1,1)

veri = Replace (veri ,"/","",1,-1,1)

veri = Replace (veri ,"*","",1,-1,1)

veri = Replace (veri ,"!","",1,-1,1)

veri = Replace (veri ,"&", "")

veri = Replace (veri ,"$","",1,-1,1)

veri = Replace (veri ,"#","",1,-1,1)

veri = Replace (veri ,".","",1,-1,1)

veri = Replace (veri ,",","",1,-1,1)

veri = Replace (veri ,"-","",1,-1,1)

veri = Replace (veri ,";","",1,-1,1)

veri = Replace (veri ,":","",1,-1,1)

veri = Replace (veri ,"<","",1,-1,1)

veri = Replace (veri ,">","",1,-1,1)

veri = Replace (veri ,"|","",1,-1,1)

veri = Replace (veri ,"\","",1,-1,1)

veri = Replace (veri ,"=","",1,-1,1)

veri = Replace (veri ,chr(10),"",1,-1,1)

veri = Replace(veri ,Chr(32),"-",1,-1,0)

trsil=veri

end function

%>

<%

str = Server.HTMLEncode(str)

str = Replace(str, "
", "
",1,-1,1)

str = Replace(str, "Äž", "Äž" ,1,-1,1)

str = Replace(str, "Ä°", "Ä°" ,1,-1,1)

str = Replace(str, "Åž", "Åž" ,1,-1,1)

str = Replace(str, "ÄŸ", "ÄŸ" ,1,-1,1)

str = Replace(str, "ı", "ı" ,1,-1,1)

str = Replace(str, "ÅŸ", "ÅŸ" ,1,-1,1)

str = Replace(str, "U", "U" ,1,-1,1)

str = Replace(str, "U", "U" ,1,-1,1)

str = Replace(str, "U", "U" ,1,-1,1)

str = Replace(str, "U", "U" ,1,-1,1)

str = Replace(str, "U", "U" ,1,-1,1)

TagSil = str

End Function

%>

Sitenin LCID degeri TURKCE icin 1055 Bunu unutmayin Bu tUrkce dil kodu bunu degistirirseniz siteniz komple bozulur..

RSS dosyalari icin Ustteki kod olmasi lazim

Bu kodlar Rss ve html icin kodlardir tUrkce yaziyi ayirmak icin simdi yazimizin sonuna geldik ve en Unemli yere geldik

simdi bir asp dosyasi yapiyoruz ve ftpnin ana dizisine atiyoruz ve icine gelecek kodlari yaziyorum...

<%

Response.ContentType = "text/html"

Response.AddHeader "Content-Type", "text/html;charset=UTF-8"

Response.CodePage = 65001

Response.CharSet = "UTF-8"

%>

<%

Function ukarakter(temizle)

temizle = temizle & ""

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

For i = 0 To 47

temizle = Replace(temizle ,Chr(i), "" ,1,-1,0)

Next

For i = 58 To 64

temizle = Replace(temizle ,Chr(i), "" ,1,-1,0)

Next

For i = 91 To 94

temizle = Replace(temizle ,Chr(i), "" ,1,-1,0)

Next

temizle = Replace(temizle, Chr(96), "" ,1,-1,0)

For i = 123 To 198

temizle = Replace(temizle ,Chr(i), "" ,1,-1,0)

Next

temizle = Replace(temizle, Chr(199), "C" ,1,-1,0)

temizle = Replace(temizle, "U", "C" ,1,-1,0)

For i = 200 To 207

temizle = Replace(temizle ,Chr(i), "" ,1,-1,0)

Next

temizle = Replace(temizle, Chr(208), "G" ,1,-1,0)

temizle = Replace(temizle, "U", "G" ,1,-1,0)

For i = 209 To 213

temizle = Replace(temizle ,Chr(i), "" ,1,-1,0)

Next

temizle = Replace(temizle, Chr(214), "O" ,1,-1,0)

temizle = Replace(temizle, "U", "O" ,1,-1,0)

For i = 215 To 219

temizle = Replace(temizle ,Chr(i), "" ,1,-1,0)

Next

temizle = Replace(temizle, Chr(220), "U" ,1,-1,0)

temizle = Replace(temizle, "U", "U" ,1,-1,0)

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

temizle = Replace(temizle, "ı", "i" ,1,-1,0)

temizle = Replace(temizle, Chr(222), "S" ,1,-1,0)

temizle = Replace(temizle, "ÅŸ", "S" ,1,-1,0)

For i = 223 To 230

temizle = Replace(temizle ,Chr(i), "" ,1,-1,0)

Next

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

temizle = Replace(temizle, "U", "c" ,1,-1,0)

For i = 232 To 239

temizle = Replace(temizle ,Chr(i), "" ,1,-1,0)

Next

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

temizle = Replace(temizle, "ÄŸ", "g" ,1,-1,0)

For i = 241 To 245

temizle = Replace(temizle ,Chr(i), "" ,1,-1,0)

Next

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

temizle = Replace(temizle, "U", "o" ,1,-1,0)

For i = 246 To 251

temizle = Replace(temizle ,Chr(i), "" ,1,-1,0)

Next

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

temizle = Replace(temizle, "U", "u" ,1,-1,0)

temizle = Replace(temizle, Chr(253), "i" ,1,-1,0)

temizle = Replace(temizle, "ı", "i" ,1,-1,0)

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

temizle = Replace(temizle, "ÅŸ", "s" ,1,-1,0)

ukarakter = temizle

End Function

Function Seokarakter(temizle)

temizle = temizle & ""

temizle = Replace(temizle, "U", "C" ,1,-1,0)

temizle = Replace(temizle, "U", "G" ,1,-1,0)

temizle = Replace(temizle, "U", "O" ,1,-1,0)

temizle = Replace(temizle, "U", "U" ,1,-1,0)

temizle = Replace(temizle, "ı", "i" ,1,-1,0)

temizle = Replace(temizle, "ÅŸ", "S" ,1,-1,0)

temizle = Replace(temizle, "U", "c" ,1,-1,0)

temizle = Replace(temizle, "ÄŸ", "g" ,1,-1,0)

temizle = Replace(temizle, "U", "o" ,1,-1,0)

temizle = Replace(temizle, "U", "u" ,1,-1,0)

temizle = Replace(temizle, "I", "i" ,1,-1,0)

temizle = Replace(temizle, "ÅŸ", "s" ,1,-1,0)

'temizle = Replace(temizle, "U", "i" ,1,-1,0)

'temizle = Replace(temizle, "U", "i" ,1,-1,0)

temizle = Replace(temizle, "", "" ,1,-1,0)

temizle = Replace(temizle, "", "" ,1,-1,0)

temizle = Replace(temizle, " ", " " ,1,-1,0)

temizle = Replace(temizle, "+", "" ,1,-1,0)

temizle = Replace(temizle, "'", "" ,1,-1,0)

temizle = Replace(temizle, "U", "" ,1,-1,0)

temizle = Replace(temizle, ",", "" ,1,-1,0)

temizle = Replace(temizle ,"and","" ,1,-1,0)

temizle = Replace(temizle ,"-","" ,1,-1,0)

temizle = Replace(temizle ," ","_" ,1,-1,0)

temizle = Replace(temizle ,"__","_" ,1,-1,0)

For se = 0 To 47

temizle = Replace(temizle ,Chr(se), "" ,1,-1,0)

Next

For se = 58 To 64

temizle = Replace(temizle ,Chr(se), "" ,1,-1,0)

Next

For se = 91 To 94

temizle = Replace(temizle ,Chr(se), "" ,1,-1,0)

Next

temizle = Replace(temizle, Chr(96), "" ,1,-1,0)

For se = 123 To 255

temizle = Replace(temizle ,Chr(se), "" ,1,-1,0)

Next

Seokarakter = LCase(temizle)

End Function

%>

<% function trsil(veri)

veri = Replace (veri ,"U", "c")

veri = Replace (veri ,"U", "c")

veri = Replace (veri ,"ÅŸ", "s")

veri = Replace (veri ,"Åž","s",1,-1,1)

veri = Replace (veri ,"U","u",1,-1,1)

veri = Replace (veri ,"U","u",1,-1,1)

veri = Replace (veri ,"ÄŸ","g",1,-1,1)

veri = Replace (veri ,"Äž","g",1,-1,1)

veri = Replace (veri ,"U","o",1,-1,1)

veri = Replace (veri ,"U","o",1,-1,1)

veri = Replace (veri ,"ı","i",1,-1,1)

veri = Replace (veri ,"ÄŸ","g",1,-1,1)

veri = Replace (veri ,"Ä°","i",1,-1,1)

veri = Replace (veri ,"ı","i",1,-1,1)

veri = Replace (veri ,"ÅŸ","s",1,-1,1)

veri = Replace (veri ,"U","o",1,-1,1)

veri = Replace (veri ,"U","u",1,-1,1)

veri = Replace (veri ,"U","u",1,-1,1)

veri = Replace (veri ,"U","c",1,-1,1)

veri = Replace (veri ,"Äž","g",1,-1,1)

veri = Replace (veri ,"Åž","s",1,-1,1)

veri = Replace (veri ,"U","o",1,-1,1)

veri = Replace (veri ,"U","c",1,-1,1)

veri = Replace (veri ,"?","",1,-1,1)

veri = Replace (veri ,"@","",1,-1,1)

veri = Replace (veri ,"%","",1,-1,1)

veri = Replace (veri ,"/","",1,-1,1)

veri = Replace (veri ,"*","",1,-1,1)

veri = Replace (veri ,"!","",1,-1,1)

veri = Replace (veri ,"&", "")

veri = Replace (veri ,"$","",1,-1,1)

veri = Replace (veri ,"#","",1,-1,1)

veri = Replace (veri ,".","",1,-1,1)

veri = Replace (veri ,",","",1,-1,1)

veri = Replace (veri ,"-","",1,-1,1)

veri = Replace (veri ,";","",1,-1,1)

veri = Replace (veri ,":","",1,-1,1)

veri = Replace (veri ,"<","",1,-1,1)

veri = Replace (veri ,">","",1,-1,1)

veri = Replace (veri ,"|","",1,-1,1)

veri = Replace (veri ,"\","",1,-1,1)

veri = Replace (veri ,"=","",1,-1,1)

veri = Replace (veri ,chr(10),"",1,-1,1)

veri = Replace(veri ,Chr(32),"-",1,-1,0)

trsil=veri

end function

%>

ve yaptigimiz safaya bu kodu yerlestiriyoruz

sayfamiza yerlestiriyoruz

simdi sitemiz utf-8 de normal calisiyor

Arkadaslar ben burda emek verdim kodlari kendiniz yapmis gibi calip kendi sitenize yerlestirmeyin alacaksaniz bari sitenin linkini yazin bilmiyenler yararlansin




Kervanlar : 30.07.2022 19:57:31 Tarihinde bu mesaji duzenledi..



Facebook Google Ding delicios yahoo
                               Sende Oy ver : 0-Kisi:Puani : 0

     

<
Bunlarda Belki ilginizi Cekebilir Tikla.
Acan
Forum istatistikleri
Asp Siteyi Utf-8 cevirmenin Yuzde Yuz Ay..
keoma
Bir Asp siteyi utf-8 kolay cevirebilirsi..
Siyahinci
Forumdaki 18 Kategoride 58 Forum var, Bu forumlara acilan 487 Konuya 553 Cevap yazildi..
üye :  Misafir : 489 Toplam : 489 Rekor :
Aktif uyeler  Aktif uye yok..
Genel Sorumlu - Yonetici - Forum Yoneticisi - Editor - VIP uye
iyiki Dogdunuz Nice yillara.. Bugun Dogan yok!

Site: 1,93 Yuklendi.