folder Tahribat.com Forumları
linefolder Asp - Php - Cgi - Perl
linefolder Fso Writeline Utf-8 Sorunu



Fso Writeline Utf-8 Sorunu

  1. KısayolKısayol reportŞikayet pmÖzel Mesaj
    Tuna
    Tuna's avatar
    Kayıt Tarihi: 17/Temmuz/2005
    Erkek

    fso ile oluşturduğum dosyanın formatını nasıl utf8 yaparım ? manuel yapmayacam. dosya oluşurkenutf8 formatında oluşacak.

    oluşturduğum dosyayı bi yere include etmem gerekiyor.

    Set dosyayarat = nesne.CreateTextFile(Server.MapPath("dosyaadi.txt"),erisim_izni,erisim_formati)

    Erişim formatı için kullanılabilir özellikler;
    -2 = Bilgisayarın default ayarları ile açar.
    -1 = Unicode olarak açar.
    0 = ASCII olarak açar.

     

    0 yapınca bazı karakterler bozuluyor. cünkü include ettiğim sayfa utf8 formatında

    -1 deyince asp unicode bu yontemi desteklemiyor diyor

    -2 gene aynı hata..

    bu değerlerden utf olanına karşılık gelen bi sayı varmı 1,2,3 veya -4 -5 gibi?

     

  2. KısayolKısayol reportŞikayet pmÖzel Mesaj
    Fikret
    Fikret's avatar
    Kayıt Tarihi: 01/Ekim/2007
    Erkek

    <%

    set fs = CreateObject("Scripting.FileSystemObject")
    set file = fs.CreateTextFile("C:\temp\10312000.txt", true, true)
    file.WriteLine("Hello World!")
    file.Close

    %>

     

    CreateTextFile(filename [, overwrite [, unicode]]) şeklinde eger en sondaki true false olurse o zaman ascii yazdırırsın hadi kolay gele

    Burayada bakabilirisin

    http://www.brainjar.com/asp/fileops/default.asp

    alıntı :) 


    screw you guys! i"m goin" hoooome!
  3. KısayolKısayol reportŞikayet pmÖzel Mesaj
    wasd
    wasd's avatar
    Kayıt Tarihi: 14/Haziran/2006
    Erkek
    abi asp kullanıyorsun madem niye utf-8 :D windows-1254 fln kullansana?

    :)
  4. KısayolKısayol reportŞikayet pmÖzel Mesaj
    JerusaLem
    JerusaLem's avatar
    Savaş Madalyası Developer Madalyası Üstün Hizmet Madalyası Bilgi/Destek Madalyası
    Kayıt Tarihi: 27/Eylül/2002
    Erkek

    Zamanında bende çok aramıştır, google aramalarından sonuçlarda bile çıkmıyordu. 

     

    'UTF-8 şekliyle dosya açmak 

    Function BilgiAc(Gelen)
        set stm=server.CreateObject("adodb.stream")
        stm.Type=2
        stm.mode=3
        stm.charset=  "UTF-8"
        stm.open
        stm.loadfromfile server.MapPath(Gelen)
        kod=stm.readtext
        stm.Close
        set stm=nothing

    StrKod = Replace (kod,"<","<",1,-1,1)
    Kod = Replace (kod,">",">",1,-1,1)

    BilgiAc = Kod
    End Function

     

     

    'UTFT-8 şekliyle dosyayı yazmak. 

     Function Dosyaz(haber,adres)
        set stm=server.CreateObject("adodb.stream")
        stm.Type=2
        stm.mode=3
        stm.charset=  "UTF-8"
        stm.open
        stm.WriteText haber
        stm.SaveToFile server.MapPath(adres),2
        stm.flush
        stm.Close
        set stm=nothing
        Response.write "<li>Sitede düzeltildi.</li><br>"
    End Function


    ey ulu TÜRK öğün, eşin yoktur altında göğün..!
  5. KısayolKısayol reportŞikayet pmÖzel Mesaj
    Tuna
    Tuna's avatar
    Kayıt Tarihi: 17/Temmuz/2005
    Erkek

    @jerusalem

    abi bende buna uğraşıyordum sabahtan beri. gözünü sevdiğim. hay Allah razı olsun.

    http://www.bilik.cn/bbs//viewthread.php?action=printable&tid=14755

    burda buldum. uğraşıyom uğüraşıyom. bir türlü işin içinden çıkamadıydım. çokı teşekkür ederim.

    selam ve dua ile :D

     

    @fikret. abi, onu denediydim zaten. yine de tşk ederim.

     

    @wasd, bende isterim başım ağrımasın ama:S ajax kullanıyom. utf-8den başkası yaramadı.

     

    ayrıca; aynı sorunu windows-1254 vs yaşayan olursa http://www.codetoad.com/asp_utf8.asp burdaki fonksiyonlar işinize yarayabilir.

     

    jerusalem tekrar teşekkürler. hemen deniyorum

     

  6. KısayolKısayol reportŞikayet pmÖzel Mesaj
    Tuna
    Tuna's avatar
    Kayıt Tarihi: 17/Temmuz/2005
    Erkek

    oldu ag:D çok pis sevinceklendim:)) jeru çok teşekkürlerr ;)

     

  7. KısayolKısayol reportŞikayet pmÖzel Mesaj
    JerusaLem
    JerusaLem's avatar
    Savaş Madalyası Developer Madalyası Üstün Hizmet Madalyası Bilgi/Destek Madalyası
    Kayıt Tarihi: 27/Eylül/2002
    Erkek

    Türkçe konuşmaya ve yazmaya özen gösterirsen bende çok sevinecem. :)

     

    İyi günlerde kullan. 


    ey ulu TÜRK öğün, eşin yoktur altında göğün..!
Toplam Hit: 1867 Toplam Mesaj: 7