Nova poruka

.NET i kodna stranica 852

poruka: 6
|
čitano: 2.650
|
moderatori: Lazarus Long, XXX-Man, vincimus
1
+/- sve poruke
ravni prikaz
starije poruke gore
ninoid 
16 godina
neaktivan
offline
pet 3.4.2009 13:37
Odgovori Citiraj
.NET i kodna stranica 852

Pozdrav svima!

 

Dali netko zna kako se u .Net-u mogu zamijeniti znakovi tipa:

'}' => 'ć'

']' => 'Ć'

'@' => 'Ž'

'Đ' => '\'

 

i slicno.  Radim sa datotekom u kojoj su znakovi (ČčĆćĐđ...) zamijenjeni sa (~^\  ...).

Mislim uspio sam taj problem rijesiti na staromodni nacin: "pjeske" Belji se

 

DAli postoje neki obijekti koji mi olaksaju stavar sa ovim...

 

 

POZDRAV SVIM POSIJETITELJIMA NAJBOLJEG PORTALA U HRVATSKOJ  www.bug.hr

bila je ekstaza, moja bivsa staza...
 
trajni link
0 0 hvala 0
itf4n 
17 godina
offline
pet 3.4.2009 13:39
Odgovori Citiraj
.NET i kodna stranica 852

String::Replace funkcija?

 
trajni link
0 0 hvala 0
braindozer 
16 godina
neaktivan
offline
pet 3.4.2009 13:56
Odgovori Citiraj
RE: .NET i kodna stranica 852

U System.Text imaš encodere sa static Convert(), pogledaj šta se nudi.

 

 

Ostavio bi Sample, ali nisam siguran da shvaćam iz čega u šta konvertirati.

 
trajni link nadporuka
0 0 hvala 0
ninoid 
16 godina
neaktivan
offline
pet 3.4.2009 20:33
Odgovori Citiraj
RE: .NET i kodna stranica 852

Uradio sam pijeske sa String::Replace funkcijama ali me zanima jos jednostavniji nacin Namigiva

bila je ekstaza, moja bivsa staza...
 
trajni link nadporuka
0 0 hvala 0
ninoid 
16 godina
neaktivan
offline
pet 3.4.2009 20:35
Odgovori Citiraj
RE: .NET i kodna stranica 852

trebam zamijeniti znakove npr '@' u 'Ž',   '~' u 'č'   itd...

najbitnije je da sam uradio, ali me ioceniti zanima za ubuduce da znam raditi slicne stvari...

bila je ekstaza, moja bivsa staza...
 
trajni link nadporuka
0 0 hvala 0
nadimak888 
17 godina
neaktivan
offline
pet 3.4.2009 21:58
Odgovori Citiraj
.NET i kodna stranica 852

evo nesto na brzinu, u vb.net:

 

    Function filter(ByVal ulaz As String) As String
        Dim a As String, i As Integer, tmp As String
        For i = 1 To Len(ulaz)
            a = Mid(ulaz, i, 1)

            Select Case a
                Case "}"
                    a = "ć"
                Case "]"
                    a = "Č"
                Case "@"
                    a = "ž"
                    '....
            End Select
            tmp = tmp & a

        Next

        Return tmp
    End Function

Moj PC  
trajni link
0 0 hvala 0
1
Nova poruka
Pronađi
Prijava korisnika
E-mail:
Lozinka:
 
Aktivne teme
vrh stranice
Copyright © 2008 - 2025 Bug d.o.o. sva prava pridržana.