Vlákno názorů k článku Má TextLink.cz skutečně výměnný poměr 1:1? od David Bures - nasleduje clanek, zverejneny na netday (podobnych tam) byly...
-
Článek je starý, nové názory již nelze přidávat.
- Podle hodnocení
- Podle vláken
- Nejnovější
-
David Bures (neregistrovaný)nasleduje clanek, zverejneny na netday (podobnych tam) byly mraky ...
-------------------------------
Při tvorbě kvalitních WWW stránek je občas nutné vytvořit jejich verzi bez diakritiky. Tato činnost by nebyla nikterak zábavná, kdyby neexistovala funkce ToASCII, která konvertuje veškeré znaky s diakritikou na jejich "kamarády", které diakritiku neobsahují.
ToASCII nalezne své využití například při tvorbě WAP stránek, kdy je vhodné(nikoliv však nutné) WML stránky oprostit od háčků a čárek. ToASCII je v tomto případě neocenitelným pomocníkem.
Funkce ToASCII
<%
Function ToASCII(Txt2ASCII)
'Otestujeme zda-li řetězec ke zpracování nění prázdný(délka=0).
If IsNull(Txt2ASCII) Then
ToASCII = ""
'Jestliže platí IsNull, vyskočíme z funkce a vrátíme prázdný řetězec.
Exit Function
End if
'Nadefinujeme používané proměnné.
Dim strVysledek, Case_Volba, X
strVysledek = ""
'Pomocí následujícího cyklu FOR projdeme celý řetězec pěkně znak po znaku.
For X = 1 To Len(Txt2ASCII)
'Funkce Mid vrátí znak na aktuální pozici výběru(proměnná X).
Case_Volba = Mid(Txt2ASCII,X ,1 )
'Testujeme zda-li vrácený znak v proměnné Case_volba není s diakritikou.
Select Case Case_volba
Case "á"
Case_volba = "a"
Case "Á"
Case_volba = "A"
Case "č"
Case_volba = "c"
Case "Č"
Case_volba = "C"
Case "ď"
Case_volba = "d"
Case "Ď"
Case_volba = "D"
Case "é","ě"
Case_volba = "e"
Case "É","Ě"
Case_volba = "E"
Case "í"
Case_volba = "i"
Case "Í"
Case_volba = "I"
Case "ň"
Case_volba = "n"
Case "Ň"
Case_volba = "N"
Case "ó"
Case_volba = "o"
Case "Ó"
Case_volba = "O"
Case "ř"
Case_volba = "r"
Case "Ř"
Case_volba = "R"
Case "š"
Case_volba = "s"
Case "Š"
Case_volba = "S"
Case "ť"
Case_volba = "t"
Case "Ť"
Case_volba = "T"
Case "ú","ů"
Case_volba = "u"
Case "Ú","Ů"
Case_volba = "U"
Case "ý"
Case_volba = "y"
Case "Ý"
Case_volba = "Y"
Case "ž"
Case_volba = "z"
Case "Ž"
Case_volba = "Z"
End Select
'Výsledek konverze jednoho znaku připojíme k již upravenému řetězci strVysledek.
strVysledek = strVysledek & Case_volba
Next
'Jako výsledek vrátíme strVysledek.
ToASCII = strVysledek
End Function
%>
Syntaxe:
strVystup = ToASCII(strToPreklad)
strVystup - řetězcová hodnota(string), která bude obsahovat řetězec vrácený funkcí(řetězec bez diakritiky).
strToPreklad - řetězcová hodnota(string), kterou chcete oprostit od háčků a čárek.
Příklad:
<%
Dim strRetezec
strRetezec = ToASCII("čřýásssffščýřéščýřéřýíéěsdššdfěřěfžšžřšýčřýčřhgfh")
Response.Write(strRetezec)
%>
Výstup tohoto příkladu bude následující:
cryasssffscyrescyreryieesdssdferefzszrsycrycrhgfh
-
David Bures (neregistrovaný)Umeni Mumie - Cendry, nehlede na to, ze se uz nekolikrat provalilo, ze pouzivany design ukradl (na jinych jeho projektech). Plus bych jeste zminil hacknuti jeho "systemu" textlink, ktery ukazoval nekolik dni: "Zdenek Cendra se omlouva za vsechny dusevni vyplody a kradeze" ...
A tenhle clovek neco vyhral? -
Zdenek Cendra (neregistrovaný):-)
...ten kod co ukazujete jsem psal asi pred dvema roky ... nevim, ale mam pocit, ze vy nejspise take programujete a ze jste TAKE ZACINAL ... a pokud tvrdite, ze jste podobna zverstva na zactku nepsal, tak lzete ... kazdy se nejak vyviji a zlepsuje sve kody ....
:) ... ale to uz je lehce mimo tema clanku, ne?
-
Ing Álois Gustavson (neregistrovaný)http://www.lzive.cz/article.php?sid=2
http://www.lzive.cz/article.php?sid=6
http://www.lzive.cz/article.php?sid=4
Pro šťouraly: Nejsem žádný programátorský a neomylný guru, ale taky nikoho programovat neučím. S panem Cendrou jsem spolu s panem "Global.asa - Wencou" polemizoval na serveru NETDAY.cz delší dobu... Výsledek? Zjištění, že pana Cendru nelze uargumentovat, protože má vždy po ruce příhodné vysvětlení.
Lojza, www.lzive.cz -
Carcharodon Carcharides (neregistrovaný)Když máš problém s mým nickem, tak se mrkni do webstera co znamená, aspoň si rozšíříš obzory :o)
Já jsem se svým nickem spokojenej - ně např. tvůj nick "mumie" naprosto nevadí.
BTW svoje jméno dávám jen důvěryhodým lidem mezi něž tebe neřadím.
Ad YO - o problému s YO toho vím dost na to abych si udělal úsudek a koneckonců i tady na stránkách je vyjádření lidí z YO. -
Kápo (neregistrovaný)Jsi mu měl rozkopat bábovičky.
To je síla. Někomu je 15 a už takových příspěvků proti němu. Mě by to v tom věku poznamenalo na celý život.
Ještě k těm kódum, kterým vůbec nerozumim. Co jsem ale pochopil, tak mumie před 2 lety začal programovat a dělal jako každý začátečník šílený zvěrstva. V té době naprogramoval textlink.cz, na který od té doby nešah. Myslím, že rovnice je jasná.
