कार्यालय के काम के लिए सामान्य प्रयोजन की अपील

मैं कई अप्प्लस्क्रिप्ट समाधानों के अपने स्वयं के विकास को साझा करना चाहता हूं, जिसके लिए शाब्दिक रूप से हर कोई एक आवेदन पा सकता है, और साथ ही "सामान्य उद्देश्य" के अन्य समान सार्वभौमिक समाधानों के उदाहरण भी सुन सकता है। मैं एक आरक्षण करता हूँ कि मैं हॉट कीज़ के माध्यम से स्क्रिप्ट चलाता हूँ, क्विकसिल्वर के माध्यम से आवश्यक स्क्रिप्ट लॉन्च करने के लिए बटन को बाँधता हूँ, यह बाइंडिंग 5 सेकंड है।

इसलिए, इस तरह की सामान्य-प्रयोजन लिपियों से जो गतिविधि की परवाह किए बिना सभी के लिए उपयुक्त होंगी, मैंने निम्नलिखित बनाया।
1. इच्छित विषय पंक्ति, वांछित शरीर पाठ और सही प्राप्तकर्ता के साथ मेल द्वारा चयनित फ़ाइल भेजें:

property Myrecipient : "" property mysubject : "" property EmailBody : "" on run tell application "Finder" set sel to (get selection) end tell new_mail(sel) end run on open droppedFiles new_mail(droppedFiles) end open on new_mail(theFiles) tell application "Mail" set newMessage to make new outgoing message with properties {visible:true, subject:mysubject, content:EmailBody} tell newMessage make new to recipient with properties {address:Myrecipient} tell content repeat with oneFile in theFiles make new attachment with properties {file name:oneFile as alias} at after the last paragraph end repeat end tell end tell activate end tell end new_mail 

2. वांछित फ़ोल्डर खोलें:

 tell application "Finder" activate open folder "" of folder "" of folder "" of folder "Users" of startup disk end tell 

3. हाइलाइट किए गए पत्र से एक अनुस्मारक बनाएं:

 tell application "Mail" using terms from application "Mail" set selectedMails to selection set theMessage to first item of selectedMails set theBody to "message:%3C" & message id of theMessage & "%3E" set theSubject to the subject of theMessage & " (From " & the sender of theMessage & ")" tell application "Reminders" set theList to list "Inbox" set newToDo to make new reminder with properties {name:theSubject, body:theBody, container:theList} end tell end using terms from end tell 

4. उदाहरण के लिए, लाल रंग में पत्र पेंट करें:

 tell application "Mail" set maillist to selection repeat with i from 1 to number of items in maillist set this_item to item i of maillist if class of this_item is message then set background color of this_item to red -- other colors are -- gray / green / orange / red end if end repeat end tell 

5. फ़ोल्डर या फ़ाइल का पथ प्राप्त करें - उदाहरण के लिए, पत्र या चैट में सम्मिलित करने के लिए:

 >tell application "Finder" set sel to the selection as text set the clipboard to POSIX path of sel end tell 

यह मुझे Alt के माध्यम से गर्म कुंजियों को लॉन्च करने के लिए सबसे सुविधाजनक तरीका लग रहा था - "pansystem" कॉल के लिए यह वास्तव में मुफ्त है, जबकि Cmd में अनुप्रयोगों के अंदर कई बुनियादी कार्य हैं, और Ctrl फिर से अनुप्रयोगों के अंदर बहुत सारे कस्टम फ़ंक्शन बनाता है। और यहाँ alt + r - उदाहरण के लिए अनुस्मारक के लिए मेल भेजा।

मुझे बहुत खुशी होगी कि टिप्पणियों में स्क्रिप्ट के लिए कोई भी विचार है जो नियमित संचालन के लिए उपयोगी हो सकता है, गतिविधि के प्रकार की परवाह किए बिना।