set f to a reference to file ((path to home folder as string) & \".reminders\")
set remInput to text returned of (display dialog \"REM 6 January 2008 MSG David's birthday.\" & return & \"REM 6 January +7 MSG David's Birthday is %b.\" default answer \"\" buttons {\"OK\", \"Cancel\"} default button \"OK\" with title \"Enter reminder\")
open for access f with write permission
write (\"\n\" & remInput as string) to f starting at eof
close access f
set remMessages to do shell script \"/usr/local/bin/rem\"
tell application \"FastScripts\"
display message remMessages dismissing after delay 0
end tell
tell application \"FastScripts\" to activate
It looks like you're new here. If you want to get involved, click one of these buttons!