Set photo titles to picture capture date in iPhoto

Set photo titles to picture capture date in iPhoto: "The titles iPhoto chooses for just-added photos is the annoying 'IMG_nnnn' serial number from the camera. This AppleScript simply takes the date of the photo (EXIF info that iPhoto knows very well) and uses it as the photo title. The format is: yyyy-mm-dd-hh.mm.ss, so it's a bit easier to read than the ISO version, but also easily sortable.



Here's the code:

tell application 'iPhoto'
  --  activate -- bring iPhoto back to front
  copy (my selected_images()) to these_images
  
  if these_images is {} then error 'Please select some images before using this script.'
  set thename to ''
  set thepaths to ''
  set thedates to ''
  repeat with i from 1 to the count of these_images
    set this_image to item i of these_images
    
    --set this_file to the image path of this_image    
    set thename ...



  
  
  
  
  

"

(Via MacOSXHints.com.)