Apple, AppleScript, AppleScript Studio, AppleTalk, AppleWorks, ColorSync, Finder, HyperCard, iBook, iLife, iMac, iWork, Keynote, Mac, Macintosh, Mac OS, Pages, Panther, PowerBook, Power Mac, Power Macintosh, QuickTime, Safari, Tiger, Xcode sont des marques déposées par Apple Computer, Inc., enregistrées aux Etats-Unis et dans les autres pays. Liste officielle

De : Proniewski <patpro@xxxxxxx.net>
À : <maison@xxxxxxx.net>
Date : lundi 2 octobre 2000 16:57
Objet : Tr: applescript_fr Digest #35


--
la mailing list applescript francophone
c'est http://www.macplus.net/ML/AS_fr.shtml

----------
>De : <applescript_fr@xxxxxxx.net> (Liste AppleScript francophone)
>À : <applescript_fr@xxxxxxx.net> (Liste AppleScript francophone)
>Objet : applescript_fr Digest #35
>Date : Lun 02 oct 2000 16:52
>

>         Liste AppleScript francophone Digest #35
>
>  1) Services d'impression
>     by fmpbox <fmpbox@xxxxxxx.com>
>  2) Re: Services d'impression
>     by Jean-Marie Hoornaert <jean.marie.hoornaert@xxxxxxx.be>
>
> This digest is sent to you because you are subscribed to
>   the mailing list <applescript_fr@xxxxxxx.net>.
> To unsubscribe, E-mail to: <applescript_fr-off@xxxxxxx.net>
> To switch to the FEED mode, E-mail to <applescript_fr-feed@xxxxxxx.net>
> Send administrative queries to  <applescript_fr-request@xxxxxxx.net>
>
> Date: Mon, 02 Oct 2000 09:12:44 +0200
> Subject: [AS] Services d'impression
> From: fmpbox <fmpbox@xxxxxxx.com>
> Message-ID: <B5FE020C.50A%fmpbox@xxxxxxx.com>
> Content-type: text/plain; charset="ISO-8859-1"
> Content-transfer-encoding: quoted-printable
>
> *This message was transferred with a trial version of CommuniGate(tm) Pro*
> Bonjour,
>
> J'aimerais utiliser le complément de Pilotage Service d'impression pour
> changer de pilote d'impression.
> Est ce que quelqu'un pourrait m'expliquer comment m'en servir (Utilisation
> des différentes routines) et me fournir quelques exemples.
>
> Merci d'avance.
> A+
>
> Date: Mon, 02 Oct 2000 13:48:48 +0200
> Subject: [AS] Re: Services d'impression
> From: Jean-Marie Hoornaert <jean.marie.hoornaert@xxxxxxx.be>
> Message-ID: <B5FE42C0.1257%jean.marie.hoornaert@xxxxxxx.be>
> Content-type: text/plain; charset="ISO-8859-1"
> Content-transfer-encoding: quoted-printable
>
> *This message was transferred with a trial version of CommuniGate(tm) Pro*
>
> le 02/10/2000 9:12, fmpbox à fmpbox@xxxxxxx.com a écrit :
>
>> Bonjour,
>> 
>> J'aimerais utiliser le complément de Pilotage Service d'impression pour
>> changer de pilote d'impression.
>> Est ce que quelqu'un pourrait m'expliquer comment m'en servir (Utilisation
>> des différentes routines) et me fournir quelques exemples.
>> 
>> Merci d'avance.
>> A+
>> 
>
> J'ai essayé et j'ai finalement renoncé à scripter le Pilotage Service
> d'impression.
>
> J'ai placé le script suivant dans une base FileMaker pour modifier
> l'imprimante depuis celle-ci.
>
> L'OSAX "Set printer to" fonctionne très bien dans 99 % des cas, sauf
> quelques imprimante exotique (USB d'origine PC par exemple).
> J'ai donc ajouté une seconde commande qui reproduit en fait ce que l'on fait
> manuellement quand on sélectionne une imprimante dans le Finder et que l'on
> exécute l'article "Imprimante par défaut" dans le menu "Impression" ou
> l'équivalent clavier "pomme-L". Fait appel à l'OSAX "Akua Sweets".
>
> [script]
> tell current application -- "FileMaker Pro"
>     set ex to cell "Extension" of current record -- nom de ¬
> l'extension système ou de l'extension sélecteur
>     set im to cell "Imprimante" of current record -- nom de ¬
> l'imprimante sur le bureau
> end tell
> set chemin to (path to startup disk as text) & "Desktop Folder:" & im & ":"
> try
>     set printer to ex named im -- OSAX "Set printer to"
> on error -- cas d'une imprimante "exotique"
>     try
>         tell application "Finder"
>             activate
>             select alias chemin
>             select alias chemin
>             puppet menu {"Impression", "Imprimante par défaut"} -- OSAX ¬
> "Akua Sweets"
>         end tell
>     on error -- cas d'une imprimante exotique non affichée sur le bureau
>         tell me to activate
>         display dialog "Une erreur s'est produite." buttons {"OK"} ¬
> default button 1 with icon 2
>     end try
> end try
> tell me to activate
> [/script]
>
> Cela fonctionne pas mal, mais si quelqu'un sait comment utiliser le
> dictionnaire du Pilotage Services d¹impression pour sélectionner une
> imprimante, je suis également preneur.
>
> Cordialement.
>
> Jean-Marie -HOO;-)
> __________________
> Courriel : jean.marie.hoornaert@xxxxxxx.be
> Page personnelle sans prétention : http://users.skynet.be/jmh-h2o
>