convert to upper or to lowercase

 

Compatibilities:

This item has not yet been rated

This functions will convert any string to upper or lower case. It can contains accent marked characters too. example: put str_to_uppercase ("sfdő_- .adfkjbvélsaekjv éowi eruzgőq34zuf -'+!UG !GU !TOGBU!TÉBUVŐ") -- "SFDŐ_- .ADFKJBVÉLSAEKJV ÉOWI ERUZGŐQ34ZUF -'+!UG !GU !TOGBU!TÉBUVŐ" put str_to_lowercase ("sfdő_- .adfkjbvélsaekjv éowi eruzgőq34zuf -'+!UG !GU !TOGBU!TÉBUVŐ") -- "sfdő_- .adfkjbvélsaekjv éowi eruzgőq34zuf -'+!ug !gu !togbu!tébuvő"

--------------------------------------------------------------- on str_to_uppercase str   repeat with i=1 to str.length     str_num=chartonum(str.char[i])     upper_num=chartonum(str.char[i])-32     if numtochar(str_num)=numtochar(upper_num) then       uppered=uppered&numtochar(upper_num)     else       uppered=uppered&numtochar(str_num)     end if   end repeat   return uppered end --------------------------------------------------------------- on str_to_lowercase str   repeat with i=1 to str.length     str_num=chartonum(str.char[i])     lower_num=chartonum(str.char[i])+32     if numtochar(str_num)=numtochar(lower_num) then       lowered=lowered&numtochar(lower_num)     else       lowered=lowered&numtochar(str_num)     end if   end repeat   return lowered end

Upload Provided by ABCUpload ASP