aboutsummaryrefslogtreecommitdiff
path: root/samples/AppleScript/Get User Name.applescript
diff options
context:
space:
mode:
Diffstat (limited to 'samples/AppleScript/Get User Name.applescript')
-rw-r--r--samples/AppleScript/Get User Name.applescript41
1 files changed, 41 insertions, 0 deletions
diff --git a/samples/AppleScript/Get User Name.applescript b/samples/AppleScript/Get User Name.applescript
new file mode 100644
index 0000000..9be5239
--- /dev/null
+++ b/samples/AppleScript/Get User Name.applescript
@@ -0,0 +1,41 @@
+(*
+Get User Name
+
+This script uses UI element scripting to get the name for the
+current user.
+
+If "Enable access for assistive devices" is not checked,
+this script will open the Universal Access System Preference and ask
+the user to check the checkbox.
+
+Copyright 2007 Apple Inc.
+
+You may incorporate this Apple sample code into your program(s) without
+restriction. This Apple sample code has been provided "AS IS" and the
+responsibility for its operation is yours. You are not permitted to
+redistribute this Apple sample code as "Apple sample code" after having
+made changes. If you're going to redistribute the code, we require
+that you make it clear that the code was descended from Apple sample
+code, but that you've made changes.
+*)
+
+tell application "System Preferences"
+ activate
+ set current pane to pane "com.apple.preferences.users"
+end tell
+
+tell application "System Events"
+ if UI elements enabled then
+ tell tab group 1 of window "Accounts" of process "System Preferences"
+ click radio button 1
+ delay 2
+ get value of text field 1
+ end tell
+ else
+ tell application "System Preferences"
+ activate
+ set current pane to pane "com.apple.preference.universalaccess"
+ display dialog "UI element scripting is not enabled. Check \"Enable access for assistive devices\""
+ end tell
+ end if
+end tell \ No newline at end of file