De rien! -- Manfred 42° 42' 0" N, 9° 26' 59" E. iMac Intel Core 2 Duo, OS X 10.8.4. "I would trade all my technology for an afternoon with Socrates."(S.J.)
MV <michel.vauquois@orage.fr.invalid> wrote:
Bonjour,
Re ;)
Peut-on, avec un script AppleScript, provoquer la fermeture de toutes
les applications autres que le Finder (ou même : y compris le Finder) ?
Voui, j'ai ça en stock depuis des années: ça fonctionnait sous Leopard,
et ça continue sous ML. Le lien Dropbox est ici:
De rien!
--
Manfred
42° 42' 0" N, 9° 26' 59" E.
iMac Intel Core 2 Duo, OS X 10.8.4.
"I would trade all my technology for an afternoon with Socrates."(S.J.)
De rien! -- Manfred 42° 42' 0" N, 9° 26' 59" E. iMac Intel Core 2 Duo, OS X 10.8.4. "I would trade all my technology for an afternoon with Socrates."(S.J.)
michel.vauquois
Manfred La Cassagnère wrote:
Voui, j'ai ça en stock depuis des années: ça fonctionnait sous Leopard, et ça continue sous ML. Le lien Dropbox est ici:
Cent quiou... mais c'est un script AppleScript que je cherche pas une appli ! -- Michel Vauquois Que Dieu vous garde... Moi j'ai pas le temps (RD)
Manfred La Cassagnère <derfnam@wanadoo.fr> wrote:
Voui, j'ai ça en stock depuis des années: ça fonctionnait sous Leopard,
et ça continue sous ML. Le lien Dropbox est ici:
Cent quiou... mais c'est un script AppleScript que je cherche pas une
appli !
--
Michel Vauquois
Que Dieu vous garde... Moi j'ai pas le temps (RD)
Voui, j'ai ça en stock depuis des années: ça fonctionnait sous Leopard, et ça continue sous ML. Le lien Dropbox est ici:
Cent quiou... mais c'est un script AppleScript que je cherche pas une appli ! -- Michel Vauquois Que Dieu vous garde... Moi j'ai pas le temps (RD)
josephb
Bonsoir,
MV wrote:
Peut-on, avec un script AppleScript, provoquer la fermeture de toutes
voici un script qui, si ma mémoire est bonne, était fourni avec des exemples de script sous OS 9.2, mais semble marcher encore, du moins avec mon Tiger. Ça quitte tout, sauf le Finder lui-même
Il faut parfois le lancer deux fois, s'il tombe sur un process qu'il n'arrive pas à "tuer" du premier coup Attention, les fichiers non enregistrés ne le sont pas à la fermeture de l'appli (à cause du "ignoring ")
***************************
tell application "Finder" set ThisISMe to name of (path to me) set Plist to (name of every application process) as list end tell repeat with TheApp in Plist set TheApp to TheApp as text if TheApp is not ThisISMe then ignoring application responses tell application TheApp activate quit end tell end ignoring end repeat
******************************
Merci d'avance.
avec plaisir,
-- J. B.
Bonsoir,
MV <michel.vauquois@orage.fr.invalid> wrote:
Peut-on, avec un script AppleScript, provoquer la fermeture de toutes
voici un script qui, si ma mémoire est bonne, était fourni avec des
exemples de script sous OS 9.2, mais semble marcher encore, du moins
avec mon Tiger.
Ça quitte tout, sauf le Finder lui-même
Il faut parfois le lancer deux fois, s'il tombe sur un process qu'il
n'arrive pas à "tuer" du premier coup
Attention, les fichiers non enregistrés ne le sont pas à la fermeture de
l'appli (à cause du "ignoring ")
***************************
tell application "Finder"
set ThisISMe to name of (path to me)
set Plist to (name of every application process) as list
end tell
repeat with TheApp in Plist
set TheApp to TheApp as text
if TheApp is not ThisISMe then ignoring application responses
tell application TheApp
activate
quit
end tell
end ignoring
end repeat
Peut-on, avec un script AppleScript, provoquer la fermeture de toutes
voici un script qui, si ma mémoire est bonne, était fourni avec des exemples de script sous OS 9.2, mais semble marcher encore, du moins avec mon Tiger. Ça quitte tout, sauf le Finder lui-même
Il faut parfois le lancer deux fois, s'il tombe sur un process qu'il n'arrive pas à "tuer" du premier coup Attention, les fichiers non enregistrés ne le sont pas à la fermeture de l'appli (à cause du "ignoring ")
***************************
tell application "Finder" set ThisISMe to name of (path to me) set Plist to (name of every application process) as list end tell repeat with TheApp in Plist set TheApp to TheApp as text if TheApp is not ThisISMe then ignoring application responses tell application TheApp activate quit end tell end ignoring end repeat
******************************
Merci d'avance.
avec plaisir,
-- J. B.
Patrick Stadelmann
In article <1l8ycbi.1njkv1c1cey61qN%, (MV) wrote:
Manfred La Cassagnère wrote:
> Voui, j'ai ça en stock depuis des années: ça fonctionnait sous Leopard, > et ça continue sous ML. Le lien Dropbox est ici:
Cent quiou... mais c'est un script AppleScript que je cherche pas une appli !
Un truc du genre :
tell application "System Events" set appList to name of every application process ¬ whose visible is true and name is not "Finder" end tell repeat with cApp in appList quit application cApp end repeat
Patrick -- Patrick Stadelmann
In article <1l8ycbi.1njkv1c1cey61qN%michel.vauquois@orage.fr.invalid>,
michel.vauquois@orage.fr.invalid (MV) wrote:
Manfred La Cassagnère <derfnam@wanadoo.fr> wrote:
> Voui, j'ai ça en stock depuis des années: ça fonctionnait sous Leopard,
> et ça continue sous ML. Le lien Dropbox est ici:
Cent quiou... mais c'est un script AppleScript que je cherche pas une
appli !
Un truc du genre :
tell application "System Events"
set appList to name of every application process ¬
whose visible is true and name is not "Finder"
end tell
repeat with cApp in appList
quit application cApp
end repeat
Patrick
--
Patrick Stadelmann <Patrick.Stadelmann@unine.ch>
> Voui, j'ai ça en stock depuis des années: ça fonctionnait sous Leopard, > et ça continue sous ML. Le lien Dropbox est ici:
Cent quiou... mais c'est un script AppleScript que je cherche pas une appli !
Un truc du genre :
tell application "System Events" set appList to name of every application process ¬ whose visible is true and name is not "Finder" end tell repeat with cApp in appList quit application cApp end repeat
Patrick -- Patrick Stadelmann
Patrick Stadelmann
In article <1l8ydmt.1x79zn21wuv3o7N%, (Joseph B) wrote:
Attention, les fichiers non enregistrés ne le sont pas à la fermeture de l'appli (à cause du "ignoring ")
Ca ne devrait pas. Le "ignoring" indique au script de ne pas attendre la réponse de l'application, mais l'application se comportera comme si on avait fait une demande de fermeture normale.
Patrick -- Patrick Stadelmann
In article <1l8ydmt.1x79zn21wuv3o7N%josephb@nowhere.invalid>,
josephb@nowhere.invalid (Joseph B) wrote:
Attention, les fichiers non enregistrés ne le sont pas à la fermeture de
l'appli (à cause du "ignoring ")
Ca ne devrait pas. Le "ignoring" indique au script de ne pas attendre la
réponse de l'application, mais l'application se comportera comme si on
avait fait une demande de fermeture normale.
Patrick
--
Patrick Stadelmann <Patrick.Stadelmann@unine.ch>
In article <1l8ydmt.1x79zn21wuv3o7N%, (Joseph B) wrote:
Attention, les fichiers non enregistrés ne le sont pas à la fermeture de l'appli (à cause du "ignoring ")
Ca ne devrait pas. Le "ignoring" indique au script de ne pas attendre la réponse de l'application, mais l'application se comportera comme si on avait fait une demande de fermeture normale.
Patrick -- Patrick Stadelmann
josephb
Joseph B wrote:
voici un script qui, si ma mémoire est bonne, était fourni avec des exemples de script sous OS 9.2, mais semble marcher encore, du moins avec mon Tiger.
À enregistrer comme application, ça marche mieux. En effet, sous forme de script, si l'éditeur de script n'est pas le dernier de la liste des process, il est quitté avant d'avoir tout fermé.
Voici une version "script" qui contourne le pb, si l'on y tient absolument.
******************
tell me set ScrpEdit to name of me -- "Script Editor" end tell tell application "Finder" set ThisISMe to name of (path to me) set APPlist to (name of every application process) as list end tell repeat with TheApp in APPlist set TheApp to TheApp as text if TheApp is not ThisISMe and TheApp is not ScrpEdit ¬ then ignoring application responses tell application TheApp activate quit end tell end ignoring end repeat tell application ScrpEdit ignoring application responses quit end ignoring end tell
********************** -- J. B.
Joseph B <josephb@nowhere.invalid> wrote:
voici un script qui, si ma mémoire est bonne, était fourni avec des
exemples de script sous OS 9.2, mais semble marcher encore, du moins
avec mon Tiger.
À enregistrer comme application, ça marche mieux.
En effet, sous forme de script, si l'éditeur de script n'est pas le
dernier de la liste des process, il est quitté avant d'avoir tout fermé.
Voici une version "script" qui contourne le pb, si l'on y tient
absolument.
******************
tell me
set ScrpEdit to name of me -- "Script Editor"
end tell
tell application "Finder"
set ThisISMe to name of (path to me)
set APPlist to (name of every application process) as list
end tell
repeat with TheApp in APPlist
set TheApp to TheApp as text
if TheApp is not ThisISMe and TheApp is not ScrpEdit ¬
then ignoring application responses
tell application TheApp
activate
quit
end tell
end ignoring
end repeat
tell application ScrpEdit
ignoring application responses
quit
end ignoring
end tell
voici un script qui, si ma mémoire est bonne, était fourni avec des exemples de script sous OS 9.2, mais semble marcher encore, du moins avec mon Tiger.
À enregistrer comme application, ça marche mieux. En effet, sous forme de script, si l'éditeur de script n'est pas le dernier de la liste des process, il est quitté avant d'avoir tout fermé.
Voici une version "script" qui contourne le pb, si l'on y tient absolument.
******************
tell me set ScrpEdit to name of me -- "Script Editor" end tell tell application "Finder" set ThisISMe to name of (path to me) set APPlist to (name of every application process) as list end tell repeat with TheApp in APPlist set TheApp to TheApp as text if TheApp is not ThisISMe and TheApp is not ScrpEdit ¬ then ignoring application responses tell application TheApp activate quit end tell end ignoring end repeat tell application ScrpEdit ignoring application responses quit end ignoring end tell
********************** -- J. B.
josephb
Patrick Stadelmann wrote:
Ca ne devrait pas. Le "ignoring" indique au script de ne pas attendre la réponse de l'application, mais l'application se comportera comme si on avait fait une demande de fermeture normale.
Oui, autant pour moi ;-) -- J. B.
Patrick Stadelmann <Patrick.Stadelmann@unine.ch> wrote:
Ca ne devrait pas. Le "ignoring" indique au script de ne pas attendre la
réponse de l'application, mais l'application se comportera comme si on
avait fait une demande de fermeture normale.
Ca ne devrait pas. Le "ignoring" indique au script de ne pas attendre la réponse de l'application, mais l'application se comportera comme si on avait fait une demande de fermeture normale.
Oui, autant pour moi ;-) -- J. B.
michel.vauquois
Joseph B wrote:
tell me set ScrpEdit to name of me -- "Script Editor" end tell tell application "Finder" set ThisISMe to name of (path to me) set APPlist to (name of every application process) as list end tell repeat with TheApp in APPlist set TheApp to TheApp as text if TheApp is not ThisISMe and TheApp is not ScrpEdit ¬ then ignoring application responses tell application TheApp activate quit end tell end ignoring end repeat tell application ScrpEdit ignoring application responses quit end ignoring end tell
Marche pas non plus... Où se trouve talagent me demande l'Éditeur AppleScript. -- Michel Vauquois Que Dieu vous garde... Moi j'ai pas le temps (RD)
Joseph B <josephb@nowhere.invalid> wrote:
tell me
set ScrpEdit to name of me -- "Script Editor"
end tell
tell application "Finder"
set ThisISMe to name of (path to me)
set APPlist to (name of every application process) as list
end tell
repeat with TheApp in APPlist
set TheApp to TheApp as text
if TheApp is not ThisISMe and TheApp is not ScrpEdit ¬
then ignoring application responses
tell application TheApp
activate
quit
end tell
end ignoring
end repeat
tell application ScrpEdit
ignoring application responses
quit
end ignoring
end tell
Marche pas non plus... Où se trouve talagent me demande l'Éditeur
AppleScript.
--
Michel Vauquois
Que Dieu vous garde... Moi j'ai pas le temps (RD)
tell me set ScrpEdit to name of me -- "Script Editor" end tell tell application "Finder" set ThisISMe to name of (path to me) set APPlist to (name of every application process) as list end tell repeat with TheApp in APPlist set TheApp to TheApp as text if TheApp is not ThisISMe and TheApp is not ScrpEdit ¬ then ignoring application responses tell application TheApp activate quit end tell end ignoring end repeat tell application ScrpEdit ignoring application responses quit end ignoring end tell
Marche pas non plus... Où se trouve talagent me demande l'Éditeur AppleScript. -- Michel Vauquois Que Dieu vous garde... Moi j'ai pas le temps (RD)
michel.vauquois
Joseph B wrote:
***************************
tell application "Finder" set ThisISMe to name of (path to me) set Plist to (name of every application process) as list end tell repeat with TheApp in Plist set TheApp to TheApp as text if TheApp is not ThisISMe then ignoring application responses tell application TheApp activate quit end tell end ignoring end repeat
******************************
Marche pas... Une fenêtre dans l'Éditeur AppleScript apparaît me demandant où est talagent... -- Michel Vauquois Que Dieu vous garde... Moi j'ai pas le temps (RD)
Joseph B <josephb@nowhere.invalid> wrote:
***************************
tell application "Finder"
set ThisISMe to name of (path to me)
set Plist to (name of every application process) as list
end tell
repeat with TheApp in Plist
set TheApp to TheApp as text
if TheApp is not ThisISMe then ignoring application responses
tell application TheApp
activate
quit
end tell
end ignoring
end repeat
******************************
Marche pas... Une fenêtre dans l'Éditeur AppleScript apparaît me
demandant où est talagent...
--
Michel Vauquois
Que Dieu vous garde... Moi j'ai pas le temps (RD)
tell application "Finder" set ThisISMe to name of (path to me) set Plist to (name of every application process) as list end tell repeat with TheApp in Plist set TheApp to TheApp as text if TheApp is not ThisISMe then ignoring application responses tell application TheApp activate quit end tell end ignoring end repeat
******************************
Marche pas... Une fenêtre dans l'Éditeur AppleScript apparaît me demandant où est talagent... -- Michel Vauquois Que Dieu vous garde... Moi j'ai pas le temps (RD)
michel.vauquois
Patrick Stadelmann wrote:
Un truc du genre :
tell application "System Events" set appList to name of every application process ¬ whose visible is true and name is not "Finder" end tell repeat with cApp in appList quit application cApp end repeat
Une merveille de concision et surtout d'une efficacité rare sauf s'il y a des fichiers non enregistrés en cours d'élaboration. Un petit souci également avec OpenOffice. Je regarde ça de plus près d'ici demain. -- Michel Vauquois Que Dieu vous garde... Moi j'ai pas le temps (RD)
Patrick Stadelmann <Patrick.Stadelmann@unine.ch> wrote:
Un truc du genre :
tell application "System Events"
set appList to name of every application process ¬
whose visible is true and name is not "Finder"
end tell
repeat with cApp in appList
quit application cApp
end repeat
Une merveille de concision et surtout d'une efficacité rare sauf s'il y
a des fichiers non enregistrés en cours d'élaboration.
Un petit souci également avec OpenOffice.
Je regarde ça de plus près d'ici demain.
--
Michel Vauquois
Que Dieu vous garde... Moi j'ai pas le temps (RD)
tell application "System Events" set appList to name of every application process ¬ whose visible is true and name is not "Finder" end tell repeat with cApp in appList quit application cApp end repeat
Une merveille de concision et surtout d'une efficacité rare sauf s'il y a des fichiers non enregistrés en cours d'élaboration. Un petit souci également avec OpenOffice. Je regarde ça de plus près d'ici demain. -- Michel Vauquois Que Dieu vous garde... Moi j'ai pas le temps (RD)