IPB     Il futuro di Tevac dipende da te!  

Benvenuto Visitatore ( Log In | Registrati )

  · · · · · · · · · · · ·
Reply to this topicStart new topic
> [BibDesk e Mail] Allegare file a Mail
Marco Coïsson
messaggio 19 Aug 2008, 09:12
Messaggio #1


life, n: a whim of several billion cells to be you for a while
***********

Gruppo: Supporter
Messaggi: 9.337
Iscritto il: 18-May 03
Da: Torino
Utente Nr.: 65



Mi succede spesso di dover passare a qualcuno per posta elettronica file pdf regolarmente catalogati nel mio database di pubblicazioni gestito con BibDesk. Come per qualunque cosa che deve essere fatta per più di tre volte, merita anche in questo caso farsi uno script. Magari non tutti usano BibDesk, ma lo script può comunque servire per vedere come si fa a creare un nuovo messaggio con allegati in Mail.
Lo script prende tutte le pubblicazioni selezionate in BibDesk, ne estrae il file associato (non deve necessariamente essere un pdf, può essere qualunque cosa), crea un nuovo messaggio con Mail e allega tutti i file precedentemente estratti a questo messaggio. Lascia vuoti destinatari(o), soggetto e testo.

CODE
set allegati to {}

tell application "BibDesk"
    tell document 1
        set sel to (get selection)
        repeat with pub in sel
            set percorso to ((POSIX path of linked file of pub) as string)
            set allegati to (allegati & percorso)
        end repeat
    end tell
end tell

tell application "Mail"
    set messaggio to make new outgoing message
    tell messaggio
        set visible to true
        repeat with att in allegati
            tell content
                make new attachment with properties {file name:att} at after the last word of the last paragraph
            end tell
        end repeat
    end tell
end tell


--------------------
Marco Coïsson
http://homepage.mac.com/marco_coisson

L'atomo divisibile: podcast gratuito di divulgazione scientifica.

X come Macintosh
Go to the top of the page
 
+Quote Post

Reply to this topicStart new topic

 

Collapse

> 

    Titolo discussione Risposte Autore discussione Visite Ultima azione
No New Posts   4 SoHo 57 Ieri, 19:38
Ultimo messaggio di: SoHo
No new   32 Biba 1.216 1 December 2008 - 16:43
Ultimo messaggio di: Biba
No New Posts   5 Tevac 1.229 1 December 2008 - 15:35
Ultimo messaggio di: murpy
No New Posts   5 area00 94 26 November 2008 - 10:48
Ultimo messaggio di: sirguich_
No New Posts   0 Tevac Staff 80 25 November 2008 - 11:57
Ultimo messaggio di: Tevac Staff
No New Posts   2 arbushell 63 25 November 2008 - 02:11
Ultimo messaggio di: Martini
No New Posts   4 bacillino80 76 24 November 2008 - 23:28
Ultimo messaggio di: bacillino80
No new   141 Italo 3.791 23 November 2008 - 22:58
Ultimo messaggio di: massimiliano amadori
No New Posts   6 ryosaeb4 133 20 November 2008 - 19:54
Ultimo messaggio di: Max31055
No New Posts   0 carlerchemez 72 17 November 2008 - 22:18
Ultimo messaggio di: carlerchemez
No New Posts   8 Andy 173 17 November 2008 - 22:14
Ultimo messaggio di: han
No New Posts   0 ryosaeb4 68 17 November 2008 - 10:32
Ultimo messaggio di: ryosaeb4

Modalità di visualizzazione: Normale · Passa a: Lineare · Passa a: Outline


RSS Versione Lo-Fi Oggi è il: 5 December 2008 - 12:36
IP.Board Skin Developed By Creative Networks