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