|
|
1.1 ! misha 1: @main[] ! 2: ^load[161_utf8.txt] ! 3: ^load[161_utf8.txt;UTF-8] ! 4: ^load[161_windows1251.txt;WINDOWS-1251] ! 5: ! 6: ! 7: @load[sFile;sCharset][f] ! 8: $f[^file::load[text;$sFile; ! 9: ^if(def $sCharset){ ! 10: $.charset[$sCharset] ! 11: } ! 12: ]] ! 13: ! 14: ^if(def $sCharset){$sCharset}{^$request:charset ($request:charset)}: =$f.text=<br />