Unicode Problem

[Kenji Kojima]

Hi Takashi-san,


>> 2. set the unicode text
>> 
>> Here is my script.
>> 
>> on mouseUp
>> 
>>  put "A1.txt" into theFileName
>>  put AbsolutePathFromStack(theFileName) into theFullPath
>> 
>>  open file theFullPath
>>  read from file theFullPath until EOF
>>  set the unicodeText of fld "A1" to it
>>  close file theFullPath
>> 
>> end mouseUp
>> 
>> I want read some Japanese from a file.


If your Japanese text file is "UTF 8" 

on mouseUp
   answer file "" 
   put url ("file:" & it) into tUrl 
   set the unicodeText of field 1 to uniencode(tUrl, utf8)
end mouseUp


best,
--
Kenji Kojima / 小島健治
http://www.kenjikojima.com/