Convert a string to a list

on text2List(theText, theDelimiter)

set {tid, AppleScript's text item delimiters} to {AppleScript's text item delimiters, theDelimiter}

set theList to every text item of theText

set AppleScript's text item delimiters to tid

return theList

end text2List

>>Ouvrir le script dans l'éditeur