on countFields(myStr, sep)
set OriginalDelimiters to AppleScript's text item delimiters
set AppleScript's text item delimiters to {sep}
set myStr to text items of myStr
return count myStr
end countFields
myStrをsep区切りで項目数を返す
on countFields(myStr, sep)
set OriginalDelimiters to AppleScript's text item delimiters
set AppleScript's text item delimiters to {sep}
set myStr to text items of myStr
return count myStr
end countFields
myStrをsep区切りで項目数を返す
コメントする