daily pastebin goal


a guest Jul 27th, 2009 633 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. tell application "Finder"
  2.         set theFolder to the target of the front Finder window
  3.         set dlgResult to display dialog "What file name?" default answer ""
  4.         set fileName to the text returned of dlgResult
  5.         if the button returned of dlgResult is "OK" and fileName is not "" then
  6.                 set theFile to make new file in theFolder
  7.                 set the name of theFile to fileName
  8.         end if
  9. end tell
RAW Paste Data