if application "Finder" is frontmost then tell application "Finder" set theWindow to the front window of application "Finder" set selectedItem to selection of application "Finder" set destinationFolder to choose folder set confirmDialog to display dialog "Move item(s) to " & destinationFolder buttons {"Cancel", "OK"} default button 2 set userAnswer to button returned of confirmDialog if userAnswer = "OK" then try move items of selectedItem to destinationFolder replacing conflicts set target of theWindow to destinationFolder on error beep 3 end try end if end tell else beep 2 end if