<pre>function listFolderNames aFolder  put "tell application" && quote & "Finder" & quote & return after scriptVar  put "set myFiles to every folder of alias" && quote & aFolder & quote & return after scriptVar  put "set output to" && quote & quote & return after scriptVar  put "repeat with x in myFiles" & return after scriptVar  put "set output to output & (name of x as string) & return" & return after scriptVar  put "end repeat" & return after scriptVar  put "return output" & return after scriptVar  put "end tell" after scriptVar  do scriptVar as appleScript  return the resultend listFolderNames</pre>