Appeler une routine dans un script

Bonjour,

Je viens de nouveau chercher de l'aide sur le forum et j'en suis désolé.

J'ai placé les lignes d'impression du mail dans une routine afin de pouvoir l'appeler à partir de plusieurs scripts.

La routine se présente ainsi. Je l'ai compilée. Je l'ai enregistrée sous "Catherine:Users:Programmes:Imprimer"

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

on Impression() tell application "System Events" keystroke "p" using {command down} delay 0.5 keystroke tab keystroke tab delay 0.25 keystroke "1" delay 0.25 keystroke return end tell end Impression

---

Voici les instruction qui appellent la routine dans les scripts

Code:

---

1 2 3 4 5 6 7 8 9 10

tell application "Mail" activate -- lignes de création du courrier dans Mail. send courrier delay 1 set Imp to load script "Catherine:Users:Programmes:Imprimer" tell Imp my Impression() end tell end tell

---

Quand je l'exécution du script, je reçois ce message
error "Erreur dans Mail*: Il est impossible de rendre \"Catherine:Users:Programmes:Imprimer\" en type file." number -1700 from "Catherine:Users:Programmes:Imprimer" to file

Je ne vois pas l'erreur que j'ai faite. J'utilise 10.9.4
L'un d'entre vous pourrait-il venir à l'aide.

Cordialement

jf Zuinghedau.

Bonjour Jefmonde,
Ta ligne 6 doit être corrigée en ajoutant le mot "file", pour convertir ton chemin en type file, et le fichier "Imprimer" doit être complété par son extension qui doit être ".scpt" :

Code:

---

set Imp to load script file "Catherine:Users:Locatif:Programmes:Imprimer.scpt"

---

Bonne journée

Bonjour PBell

Merci pour ta réponse matinale.
Je marquerai bien la discussion comme résolue ... ;
si je n'ai pas encore besoin de ton aide, pour répondre un dernier message d'erreur (le script a été compilé)

error "«script» ne comprend pas le message «*impression*»." number -1708 from «script»


Puis-je également revenir sur une de tes réponses. Tu donnes les lignes de programme pour déployer le dialogue d'impression au cas où il ne l'était pas. Je rappelle les instructions que tu a donné ;

Code:

---

1 2 3 4 5 6

tell application process "Mail" to tell sheet 1 of front window -- test si le dialogue d'impression est déployé. Si non, click pour le déployer if (accessibility description of checkbox 1 is "Déploiement de la zone de dialogue Imprimer") and (value of checkbox 1 = 0) then click checkbox 1 end if end tell

---

Quand j'exécute le script, le dialogue d'impression non déployé, rien ne se passe, mais aucun message d'erreur.

J'espère ne pas trop abusé de ta disponibilité.

Bonne journée. Cordialement

jf Zuinghedau

J'ai trouvé l'erreur de syntaxe pour la première question.
Dans le code qui appelle la routine pour impression des e-mails, ligne 8 du script appelant, il faut retirer my qui ne s'emploi qu'à l'intérieur d'un bloc Tell application.

L'appel de la routine "Imprimer" s'écrit comme ci-dessous.

Code:

---

1 2 3 4

set Imp to load script "Catherine:Users:Programmes:Imprimer" tell Imp Impression() end tell

---

Bon, reste la deuxième question dont l'erreur de syntaxe reste une énigme pour moi.

Bonsoir Jefmonde,
Dans la recopie de mon script, tu as juste oublié qu'il était inséré dans un bloc tell "System Event"

Code:

---

1 2 3 4 5 6 7 8 9

tell application "System Events" tell application process "Mail" to tell sheet 1 of front window -- test si le dialogue d'impression est déployé. Si non, click pour le déployer if (accessibility description of checkbox 1 is "Déploiement de la zone de dialogue Imprimer") and (value of checkbox 1 = 0) then clickcheckbox 1 end if end tell end tell

---

Il est vrai que c'était noyé dans le code global

Cordialement

Merci PBell pour cette Unième précision.
Toutefois avec Mavericks rien ne se passait, mais rien ne se bloquait. J'ai donc cherché encore.

J'ai écris ce script à partir de ton script et de cette adresse
http://n8henrie.com/2013/03/a-strate...n-applescript/
et je l'ai lancé.

Code:

---

1 2 3 4 5 6 7 8

tell application "System Events" to tell process "Mail" set frontmost to true keystroke "p" using {command down} delay 1 tell sheet 1 of front window UI éléments end tell end tell

---

J'ai obtenu dans la fenêtre "Résultat" le détail de la composition de la page où j'ai relevé cette info :
button "Afficher les détails" of sheet 1 of window "Re: Info Express" of application process "Mail" of application "System Events"

J'ai donc modifier le script principal ainsi :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16

tell application "Mail" activate -- les instructions pour composer le courrier delay 1 tell application "System Events" keystroke "p" using {command down} delay 0.25 tell process "Mail" to tell sheet 1 of front window if exists button ("Afficher les détails") then click button ("Afficher les détails") end if end tell -- les instructions pour choisir des options d'impression et lancer l'impression end tell end tell

---

qui fonctionne chez moi

Voilà, j'ai fini par arriver à imprimer quelque soit l'état initial de la fenêtre "Imprimer" de Mail, avec ton aide.

Je te remercie infiniment pour ton dévouement et ton suivi.

jf Zuinghedau