Thoát khỏi tất cả các ứng dụng bằng cách sử dụng Applescript?

Question

Làm cách nào để thoát khỏi tất cả các ứng dụng người dùng đang chạy bằng cách sử dụng Applescript?

Answer 1

Không sao đâu ... Tôi nghĩ rằng tôi đã tìm thấy câu trả lời của tôi:

tell application "System Events" to set the visible of every process to true 

set white_list to {"Finder"} 

try 
    tell application "Finder" 
     set process_list to the name of every process whose visible is true 
    end tell 
    repeat with i from 1 to (number of items in process_list) 
     set this_process to item i of the process_list 
     if this_process is not in white_list then 
      tell application this_process 
       quit 
      end tell 
     end if 
    end repeat 
on error 
    tell the current application to display dialog "An error has occurred!" & return & "This script will now quit" buttons {"Quit"} default button 1 with icon 0 
end try 

Answer 2

tell application "System Events" to set quitapps to name of every application process whose visible is true and name is not "Finder" 

repeat with closeall in quitapps 

quit application closeall 

end repeat 

Answer 3

tell application "System Events" to set the visible of every process to true 

set white_list to {"Finder"} 

try 
    tell application "Finder" 
     set process_list to the name of every process whose visible is true 
    end tell 
    repeat with i from 1 to (number of items in process_list) 
     set this_process to item i of the process_list 
     if this_process is not in white_list then 
      tell application this_process 
       quit 
      end tell 
     end if 
    end repeat 
on error 
    tell the current application to display dialog "An error has occurred!" & return & "This script will now quit" buttons {"Quit"} default button 1 with icon 0 
end try 

Answer 4

Sau khi một số googling, tôi tìm thấy một cách tiếp cận tốt hơn:

• Nó sử dụng để xây dựng background only danh sách ứng dụng ban đầu, thay vì visible is true. Sự khác biệt là các tập lệnh khác sẽ không thành công để thoát khỏi ứng dụng bị ẩn với ⌘H.
• Danh sách này cung cấp một danh sách loại trừ để, ví dụ: bạn có thể ngăn trình chỉnh sửa tập lệnh của mình không bị bỏ mỗi khi bạn kiểm tra tập lệnh.

Được điều chỉnh từ a thread on MacScripter.

-- get list of open apps 
tell application "System Events" 
    set allApps to displayed name of (every process whose background only is false) as list 
end tell 

-- leave some apps open 
set exclusions to {"AppleScript Editor", "Automator", "Finder", "LaunchBar"} 

-- quit each app 
repeat with thisApp in allApps 
    set thisApp to thisApp as text 
    if thisApp is not in exclusions then 
    tell application thisApp to quit 
    end if 
end repeat