isminiz : sifreniz : Guvenlik Kodu :204310 Hatirla :

  Kalbimingulu Kalplerin ve Sevginin Bulustugu Site Kalbimingulu-Forumu || Webmaster icin bilgiler konular
   Siteyi Utf-8 Cevirmenin YUzde YUz Ayarlari

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



Mesaj sayisi : 95
Giris sayisi : 138
Konu puani : 0  Toplam P : 18
Konuya Puan ver
uye bilgileri

Siteyi Utf-8 Cevirmenin YUzde YUz Ayarlari

 

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

<!DOCTYPE html>
<html lang="tr" >
<head>
<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">
<title>simemi utf-8 nasil ceviririm sorunsuz olarak</title>
</head>

yukardaki kodu ekledim simdi o kod tUm sitelerin basina gelen kodur

 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 nedemek

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-8 bu 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

KarakterTemizleme 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","<br>", 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, "&amp;lt;br&amp;gt;", "&lt;br&gt;",1,-1,1)
str = Replace(str, "&#286;", "Ğ" ,1,-1,1)
str = Replace(str, "&#304;", "İ" ,1,-1,1)
str = Replace(str, "&#350;", "Ş" ,1,-1,1)
str = Replace(str, "&#287;", "ğ" ,1,-1,1)
str = Replace(str, "&#305;", "ı" ,1,-1,1)
str = Replace(str, "&#351;", "ş" ,1,-1,1)
str = Replace(str, "&#231;", "U" ,1,-1,1)
str = Replace(str, "&#252;", "U" ,1,-1,1)
str = Replace(str, "&#199;", "U" ,1,-1,1)
str = Replace(str, "&#246;", "U" ,1,-1,1)
str = Replace(str, "&#214;", "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
<?xml version="1.0" encoding="utf-8"?>
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, "&#221;", "i" ,1,-1,0)
'temizle = Replace(temizle, "&#253;", "i" ,1,-1,0)
temizle = Replace(temizle, "<span>", "" ,1,-1,0)
temizle = Replace(temizle, "</span>", "" ,1,-1,0)
temizle = Replace(temizle, "&nbsp;", " " ,1,-1,0)
temizle = Replace(temizle, "&#43;", "" ,1,-1,0)
temizle = Replace(temizle, "&#39;", "" ,1,-1,0)
temizle = Replace(temizle, "&#180;", "" ,1,-1,0)
temizle = Replace(temizle, "&#44;", "" ,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

<!--#include file="Replace.asp" --> 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




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

     

Bunlarda Belki ilginizi Cekebilir Tikla.
Acan
Forum istatistikleri
Siteyi Utf-8 Cevirmenin YUzde YUz Ayarla..
keoma
Bir Asp siteyi utf-8 kolay cevirebilirsi..
Siyahinci
Forumdaki 18 Kategoride 58 Forum var, Bu forumlara acilan 482 Konuya 547 Cevap yazildi..
uye :  Misafir : 185 Toplam : 185 Rekor :
Aktif uyeler  Aktif uye yok..
Genel Sorumlu - Yonetici - Forum Yoneticisi - Editor - VIP uye
iyiki Dogdunuz Nice yillara.. memduh0619 , 

Site: 0,13 Yuklendi.