K
KiAr
Aktives Mitglied
Thread Starter
- Dabei seit
- 06.02.2007
- Beiträge
- 173
- Reaktionspunkte
- 2
Hallo Forum,
ich habe folgende Bitte an euch bzw. folgende Frage:
Gibt es eine Möglichkeit (bpsw. per AppleScript) Einladungen in "Kalender" automatisch anzunehmen?
Folgender Grund:
Ich habe einen Outlook Kalender auf Arbeit, hätte meine Termine aber auch gern auf meinem privaten Rechner. Aus diesem Grund habe ich in Outlook ein Makro erstellt, dass wenn ich einen Kalendereintrag erstelle, automatisch eine Mail mit einer .ics Datei an meine private Mail Adresse geschickt wird. Nun habe ich schon google bemüht aber leider keine Ahnung von AppleScript...ich habe allerdings schon folgendes geschafft:
--> Mail kommt an --> .ics Datei wird gespeichert --> Termin als Besprechungseinladung im Kalender eingetragen --> Mail wird gelöscht --> ...an dieser Stelle kommt jetzt der Punkt an dem ich nicht weiterkomme, das die Einladung automatisch angenommen wird.
Folgendes Script habe ich im Netz gefunden und konnte es soweit anpassen:
Weiterhin habe ich noch folgendes gefunden, kann damit aber nichts anfangen, bzw. funktioniert es bei mir nicht...kann mir da vielleicht einer sagen in wie weit ich hier was anpassen muss/kann:
Also, ich wäre euch super dankbar, wenn mir jemand weiterhelfen kann durch:
a.) Erweiterung des ersten Codes
b.) Erklärung des zweiten, bzw. was ich dem verändern muss damit es klappen könnte
c.) jede alternative Lösung die mir helfen könnte
Vielen Dank im Voraus,
Kiar
ich habe folgende Bitte an euch bzw. folgende Frage:
Gibt es eine Möglichkeit (bpsw. per AppleScript) Einladungen in "Kalender" automatisch anzunehmen?
Folgender Grund:
Ich habe einen Outlook Kalender auf Arbeit, hätte meine Termine aber auch gern auf meinem privaten Rechner. Aus diesem Grund habe ich in Outlook ein Makro erstellt, dass wenn ich einen Kalendereintrag erstelle, automatisch eine Mail mit einer .ics Datei an meine private Mail Adresse geschickt wird. Nun habe ich schon google bemüht aber leider keine Ahnung von AppleScript...ich habe allerdings schon folgendes geschafft:
--> Mail kommt an --> .ics Datei wird gespeichert --> Termin als Besprechungseinladung im Kalender eingetragen --> Mail wird gelöscht --> ...an dieser Stelle kommt jetzt der Punkt an dem ich nicht weiterkomme, das die Einladung automatisch angenommen wird.
Folgendes Script habe ich im Netz gefunden und konnte es soweit anpassen:
Code:
using terms from application "Mail"
on perform mail action with messages theMessages for rule theRule
repeat with This_Message in theMessages
tell application "Mail"
repeat with ma in mail attachments of This_Message
save ma in ("/Users/username/Downloads/mailattachment.ics")
tell application "Finder" to open ("/Users/username/Downloads/mailattachment.ics") as POSIX file
end repeat
end tell
end repeat
end perform mail action with messages
end using terms fromWeiterhin habe ich noch folgendes gefunden, kann damit aber nichts anfangen, bzw. funktioniert es bei mir nicht...kann mir da vielleicht einer sagen in wie weit ich hier was anpassen muss/kann:
Code:
property theAttachmentPath : (path to desktop) as Unicode text
property add_events : "Importieren" -- The title of the "Add Events" dialog on your system.
property cal_name : "myCalendar" -- The name of the target calendar.
using terms from application "Mail"
on perform mail action with messages theMessages for rule theRule
tell application "Mail"
repeat with This_Message in theMessages
repeat with ma in mail attachments of This_Message
set n to name of ma
if n ends with ".ics" then
save ma in file (theAttachmentPath & n)
my import_to_iCal(theAttachmentPath & n)
end if
end repeat
end repeat
end tell
end perform mail action with messages
end using terms from
on import_to_iCal(file_path)
tell application "iCal"
activate
set c to (count events of calendar cal_name)
ignoring application responses
open file file_path
end ignoring
end tell
tell application "System Events"
tell application process "iCal"
set frontmost to true
tell window add_events
repeat until (it exists)
delay 0.2
end repeat
click pop up button 1
repeat until (menu 1 of pop up button 1 exists)
delay 0.2
end repeat
click menu item cal_name of menu 1 of pop up button 1
repeat while (menu 1 of pop up button 1 exists)
delay 0.2
end repeat
click button "OK"
end tell
end tell
end tell
tell application "iCal"
repeat until ((count events of calendar cal_name) > c)
delay 0.2
end repeat
end tell
tell application "Finder" to delete file file_path
end import_to_iCalAlso, ich wäre euch super dankbar, wenn mir jemand weiterhelfen kann durch:
a.) Erweiterung des ersten Codes
b.) Erklärung des zweiten, bzw. was ich dem verändern muss damit es klappen könnte
c.) jede alternative Lösung die mir helfen könnte
Vielen Dank im Voraus,
Kiar
