Code: Select all
on mouseUp
put "שלום עולם" into url("file:" & $USERPROFILE&"\Documents\TEXT" & ".txt")
end mouseUp
What is the solution?
Moderators: FourthWorld, heatherlaine, Klaus, kevinmiller, robinmiller
Code: Select all
on mouseUp
put "שלום עולם" into url("file:" & $USERPROFILE&"\Documents\TEXT" & ".txt")
end mouseUp
Code: Select all
on mouseUp
put textencode("שלום עולם","UTF-8") into url("file:" & specialfolderpath("documents") & "/TEXT.txt")
end mouseUp
Code: Select all
on mouseUp
put url("file:" & specialfolderpath("documents") & "/TEXT.txt") into tText
put textdecode(tText,"UTF-8") into fld 1
end mouseUp
Code: Select all
on mouseUp
ask file "Choose where you wish to export your text"
if the result = "cancel"
then exit mouseUp
else
put the htmltext of fld "hTEXT" into url("file:" & it & ".html")
set the itemDelimiter to slash
set the defaultFolder to item 1 to -2 of the longFilePath of it
end if
end mouseUp
Code: Select all
on mouseUp
ask file "Choose where you wish to export your text"
if the result = "cancel"
then exit mouseUp
else
put the RTFtext of fld "hTEXT" into url("file:" & it & ".rtf")
get the longFilePath of it
set the itemDelimiter to slash
set the defaultFolder to item 1 to -2 of the longFilePath of it
end if
end mouseUp