set imageNameExtensions to {"jpg", "jpeg", "png", "tiff", "bmp", "gif"}
set videoNameExtensions to {"mov", "mp4", "m4v", "avi"}
set nameExtensions to (videoNameExtensions & imageNameExtensions)
set myFolder to (choose folder) as text
set theChoice to display dialog ¬
"Select Your Option" buttons {"Cancel", "Main Folder", "Main Folder And Sub-Folders"} ¬
default button 3 ¬
cancel button 1 ¬
with title ¬
"CHOOSE A FOLDER" giving up after 30
if button returned of theChoice is "Main Folder And Sub-Folders" then