Τρόπος αυτοματοποίησης του Outlook από άλλο πρόγραμμα

Μεταφράσεις άρθρων Μεταφράσεις άρθρων
Αναγν. άρθρου: 201096 - Δείτε τα προϊόντα στα οποία αναφέρεται το συγκεκριμένο άρθρο.
Για μια έκδοση του Microsoft Outlook 97, αυτού του άρθρου, ανατρέξτε στην ενότητα168095.
Για την έκδοση αυτού του άρθρου το Microsoft Outlook 98, ανατρέξτε στο θέμα181202.
Για μια έκδοση του Microsoft Outlook 2002 αυτού του άρθρου, ανατρέξτε στην ενότητα291120.
Ανάπτυξη όλων | Σύμπτυξη όλων

Σε αυτήν τη σελίδα

Περίληψη

Αυτό το άρθρο παρέχει μια επισκόπηση για τον προγραμματισμό του Outlook με αυτοματοποίηση από άλλο πρόγραμμα.

Περισσότερες πληροφορίες

Η Microsoft παρέχει παραδείγματα προγραμματισμού μόνο για επεξήγηση, χωρίς να παρέχει καμία εγγύηση, είτε σιωπηρή είτε ρητή, περιλαμβανομένων, ενδεικτικά, των σιωπηρών εγγυήσεων εμπορευσιμότητας ή/και καταλληλότητας για συγκεκριμένο σκοπό. Αυτό το άρθρο προϋποθέτει ότι είστε εξοικειωμένοι με τη γλώσσα προγραμματισμού που παρουσιάζεται, καθώς και με τα εργαλεία που χρησιμοποιούνται για τη δημιουργία και τον εντοπισμό σφαλμάτων διαδικασιών. Οι μηχανικοί υποστήριξης της Microsoft μπορούν να σας εξηγήσουν τη λειτουργικότητα μιας συγκεκριμένης διαδικασίας, αλλά δεν θα τροποποιήσουν αυτά τα παραδείγματα για να παράσχουν πρόσθετες λειτουργίες, ούτε θα δημιουργήσουν διαδικασίες, για να καλύψουν τις συγκεκριμένες ανάγκες σας.
Εάν δεν έχετε μεγάλη εμπειρία προγραμματισμού, ίσως χρειαστεί να επικοινωνήσετε με κάποιον πιστοποιημένο συνεργάτη της Microsoft (Microsoft Certified Partner) ή να χρησιμοποιήσετε τις συμβουλευτικές υπηρεσίες Microsoft Advisory Services. Για περισσότερες πληροφορίες, επισκεφθείτε αυτές τις τοποθεσίες της Microsoft στο Web:

Πιστοποιημένοι συνεργάτες της Microsoft -https://partner.microsoft.com/global/30000104

Συμβουλευτικές υπηρεσίες της Microsoft-http://support.Microsoft.com/GP/advisoryservice

Για περισσότερες πληροφορίες σχετικά με τις επιλογές υποστήριξης που είναι διαθέσιμες και τον τρόπο επικοινωνίας με τη Microsoft, επισκεφθείτε την ακόλουθη τοποθεσία της Microsoft στο Web:http://support.microsoft.com/default.aspx?scid=fh;EN-US;CNTACTMSΑυτοματοποίηση επιτρέπει σε ένα πρόγραμμα για να ελέγξετε ένα άλλο πρόγραμμα εκδίδει εντολές ή ανάκτηση πληροφοριών μέσω προγραμματισμού. Μπορείτε να χρησιμοποιήσετε τα παραδείγματα κώδικα σε αυτό το άρθρο στο Microsoft Word, το Microsoft Excel, η Microsoft Visual Basic ή οποιοδήποτε άλλο πρόγραμμα που υποστηρίζει αυτοματισμό.

Νωρίς και την τελευταία ημερομηνία σύνδεσης

Μπορείτε να χρησιμοποιήσετε την "πρώτη" είτε "τελευταία" σύνδεση για να ξεκινήσετε μια περίοδο λειτουργίας αυτοματισμού. Καθυστέρηση σύνδεσης χρησιμοποιεί είτε τοGetObjectήCreateObjectη λειτουργία για την προετοιμασία του Outlook. Για παράδειγμα, ο κώδικας που ακολουθεί ορίζει ένα αντικείμενο με το πρόγραμμα Outlook, το οποίο είναι το υψηλότερο επίπεδο αντικειμένου στο μοντέλο αντικειμένου του Outlook. Όλος ο κώδικας αυτοματοποίησης πρέπει πρώτα να ορίσετε μιαOutlook.ApplicationΓια να αποκτήσετε πρόσβαση σε οποιοδήποτε από τα άλλα αντικείμενα Outlook κάτω από την οποία το αντικείμενο.
Dim objOL as Object
Set objOL = CreateObject("Outlook.Application")
				
Για να χρησιμοποιήσετε την πρώτη σύνδεση, πρέπει πρώτα να αναφέρουν το Outlook είναι διαθέσιμες βιβλιοθήκη αντικειμένων. Για να το κάνετε αυτό από την Επεξεργασία Visual Basic (VB) ή της Visual Basic for Applications, ακολουθήστε τα εξής βήματα:
  1. Στην επεξεργασία της Visual Basic, από τοΕργαλείαμενού, κάντε κλικ στο κουμπίΑναφορές.
  2. Κάντε κλικ για να επιλέξετε τοΤο Microsoft Outlook 9.0 Object Libraryπλαίσιο ελέγχου και, στη συνέχεια, κάντε κλικ στο κουμπίOk.
Το αντικείμενο αρχείου βιβλιοθήκης είναι Msoutl9.olb και εγκαθίσταται στο φάκελο C:\Program Files\Microsoft Office\Office από προεπιλογή. Από τη στιγμή που αναφέρονται στη βιβλιοθήκη αντικειμένων του Outlook, μπορείτε να χρησιμοποιήσετε την παρακάτω σύνταξη για να ξεκινήσετε μια περίοδο λειτουργίας του Outlook:
Set ol = New Outlook.Application
				
Χρησιμοποιώντας πρώιμη σύνδεση έχει δύο σημαντικά πλεονεκτήματα. Πρώτα, χρησιμοποιώντας πρώιμη σύνδεση κώδικας εκτελείται γρηγορότερα από κώδικα χρησιμοποιώντας σύνδεση αργά (CreateObject/GetObject). Δεύτερον, επειδή αναφέρονται στη βιβλιοθήκη αντικειμένων του Outlook, μπορείτε να λάβετε ηλεκτρονική Outlook προγραμματισμού Βοήθεια για τη χρήση του προγράμματος περιήγησης του αντικειμένου και σύστημα Βοήθειας.

Το μοντέλο αντικειμένου του Outlook

Το μοντέλο αντικειμένου του Outlook σας επιτρέπει να χειριστείτε τα δεδομένα που είναι αποθηκευμένα στους φακέλους του Outlook. Νέες δυνατότητες στο Outlook σάς επιτρέπουν επίσης να διαχειρίζονται τη γραμμή του Outlook, εργασία με τα επιλεγμένα στοιχεία σε ένα φάκελο και χειριστείτε παράθυρα και επίπεδο είδους και επιπέδου εφαρμογής. Προσθέτοντας τα συμβάντα, ο κώδικάς σας μπορεί να αποκριθεί σε πολλά πράγματα που παρουσιάζονται στο Outlook, δίνοντάς σας τη δυνατότητα να δημιουργήσετε μια λύση που καθοδηγείται από το συμβάν.

Ωστόσο, θα βρείτε που σε σύγκριση με το Word και το Excel, είναι διαθέσιμο για τον έλεγχο του Outlook στον εαυτό περιορισμένη λειτουργικότητα. Πολλές δυνατότητες του Outlook δεν είναι εκτεθειμένο ή προσαρμόσιμο μέσω του Outlook στο μοντέλο αντικειμένου. Για παράδειγμα, δεν μπορείτε να χρησιμοποιήσετε το μοντέλο αντικειμένου για να αλλάξετε τοOptionsρυθμίσεις σχετικά με τοΕργαλείαμενού, παρόλο που μια νέα δυνατότητα του Outlook είναι ότι μπορεί να δημιουργήσετε τη δική σας σελίδα με τοOptions, ήΙδιότητες φακέλουπαράθυρο διαλόγου.

ΣΗΜΕΙΩΣΗ: Ως πιθανή λύση για τους περιορισμούς σχετικά με το μοντέλο αντικειμένου, μπορείτε να χρησιμοποιήσετε τοCommandBarsτο αντικείμενο που παρέχεται από το Microsoft Office, για να εκτελέσετε τις περισσότερες εντολές που σας έχουν ανατεθεί είτε κουμπιά γραμμών εργαλείων ή εντολές μενού. Για παράδειγμα, μπορείτε να χρησιμοποιήσετε τοCommandBarsΓια να εκτελέσετε το αντικείμενο τουΔημιουργία κλήσηςεντολής από τοΣύνδεση μέσω τηλεφώνουδευτερεύον μενού από τοΕργαλείαμενού, για να εμφανιστεί τοΔημιουργία κλήσηςπαράθυρο διαλόγου.

Οι περισσότερες λύσεις προγραμματισμού πρέπει να αλληλεπιδρούν με τα δεδομένα που αποθηκεύονται στο Outlook. Το Outlook αποθηκεύει όλες τις πληροφορίες σε φακέλους Messaging Application Programming Interface (MAPI). Επομένως, αφού ορίσετε μια μεταβλητή αντικειμένουOutlook.Application, συχνά θα ορίσετε έναΟ χώρος ονομάτωναντικείμενο MAPI:
Set ol = New Outlook.Application
Set olns = ol.GetNamespace("MAPI")
				
Αφού ορίσετε τοΟ χώρος ονομάτωναντικείμενο, είστε έτοιμοι για να ορίσετε το επόμενο αντικείμενο σε ένα φάκελο μέσα στο χώρο ονομάτων του MAPI. Ένας συνηθισμένος τρόπος του με αυτόν τον τρόπο είναι καθορίζοντας το Outlook από προεπιλογή στους φακέλους, τα οποία είναι οι φάκελοι στο ίδιο επίπεδο του φακέλου όπως "Εισερχόμενα" που λαμβάνει εισερχόμενα μηνύματα ηλεκτρονικού ταχυδρομείου. Ο κώδικας που ακολουθεί θα ορίσει τοobjFolderτο αντικείμενο στον προεπιλεγμένο φάκελο επαφών:
Set ol = New Outlook.Application
Set olns = ol.GetNamespace("MAPI")
Set objFolder = olns.GetDefaultFolder(olFolderContacts)
				
Για πρόσθετες πληροφορίες σχετικά με την αναφορά σε άλλους τύπους φακέλων, ανατρέξτε στο ακόλουθο άρθρο της Γνωσιακής Βάσης της Microsoft:
208520Παραδείγματα προγραμματισμού για αναφορά σε στοιχεία και φακέλους
Εφόσον μέσω προγραμματισμού με το φάκελο που περιέχει τα στοιχεία που θέλετε να χρησιμοποιήσετε ή να δημιουργήσετε, μπορείτε να χρησιμοποιήσετε το κατάλληλο κωδικό για την εκτέλεση του προγραμματισμού εργασίας. Δείτε τα παραδείγματα αργότερα στο άρθρο για μερικά συνηθισμένα παραδείγματα προγραμματισμού.

Επιπρόσθετα με την πρόσβαση στο Outlook δεδομένα από άλλη εφαρμογή, μπορείτε επίσης να επιλέξετε την εφαρμογή σας να γνωρίζετε πότε συμβαίνουν ορισμένα συμβάντα στο Outlook. Παραδείγματα συμβάντων είναι κατά την προσθήκη ενός στοιχείου σε ένα φάκελο, όταν ο χρήστης επιλέγει ένα διαφορετικό στοιχείο του φακέλου ή όταν εμφανίζεται μια υπενθύμιση του Outlook. Για μια πλήρη λίστα των διαθέσιμων συμβάντων, ανατρέξτε στο Microsoft Outlook Visual Basic Reference (Vbaoutl9.chm). Για πληροφορίες σχετικά με τη λήψη του αρχείου Βοήθειας, ανατρέξτε στην ενότητα "Αναφορές" αυτού του άρθρου.

Για ένα παράδειγμα του πώς μπορείτε να ενοποιήσετε το Outlook συμβάντα στην εφαρμογή σας, ανατρέξτε στο ακόλουθο άρθρο της Γνωσιακής Βάσης της Microsoft:
225502Χρήση του Outlook συμβάντα σε ένα άλλο πρόγραμμα

Δείγμα κώδικα για κοινές εργασίες προγραμματισμού

Παράδειγμα: Δημιουργία νέου προεπιλεγμένου στοιχείου εργασίας

Sub CreateNewDefaultOutlookTask()

   Dim ol As Outlook.Application
   Dim NewTask As Outlook.TaskItem

   ' Set the Application object.
   Set ol = New Outlook.Application

   ' Create a new standard task.
   Set NewTask = ol.CreateItem(olTaskItem)

   ' Display the new task form so the user can fill it out.
   NewTask.Display

End Sub
				

Παράδειγμα: Δημιουργία μια νέας επαφής με χρήση μιας προσαρμοσμένης φόρμας

Sub CreateNewContactFromCustomForm()

   Dim ol As Outlook.Application
   Dim olns As Outlook.NameSpace
   Dim objFolder As Outlook.MAPIFolder
   Dim AllContacts As Outlook.Items
   Dim NewContact As Outlook.ContactItem

   ' Set the Application object.
   Set ol = New Outlook.Application

   ' Set the Namespace object.
   Set olns = ol.GetNamespace("MAPI")

   ' Set the default Contacts folder.
   Set objFolder = olns.GetDefaultFolder(olFolderContacts)

   ' Set objAllContacts equal to the collection of all contacts.
   Set AllContacts = objFolder.Items

   ' Add a new contact to the AllContacts collection using the
   ' "IPM.Contact.MyForm" form.
   Set NewContact = AllContacts.Add("IPM.Contact.MyForm")

   ' Display the new contact form.
   NewContact.Display

End Sub
				

Παράδειγμα: Επανάληψη μέχρι όλες οι επαφές του προεπιλεγμένου

Sub GetOutlookContacts()

   Dim ol As Object
   Dim olns As Object
   Dim objFolder As Object
   Dim objAllContacts As Object
   Dim Contact As Object

   ' Set the Application object.
   Set ol = New Outlook.Application

   ' Set the Namespace object.
   Set olns = ol.GetNamespace("MAPI")

   ' Set the default Contacts folder.
   Set objFolder = olns.GetDefaultFolder(olFolderContacts)

   ' Set objAllContacts equal to the collection of all contacts.
   Set objAllContacts = objFolder.Items

   ' Loop through each contact.
   For Each Contact In objAllContacts

      ' Display the Fullname field for the contact.
      MsgBox Contact.FullName

   Next

End Sub
				

Αναφορές

Για πρόσθετες πληροφορίες σχετικά με τους διαθέσιμους πόρους και απαντήσεις σε συνήθεις ερωτήσεις που αφορούν τις λύσεις του Microsoft Outlook 2000, ανατρέξτε στο ακόλουθο άρθρο της Γνωσιακής Βάσης της Microsoft (Knowledge Base):
146636Ερωτήσεις που αφορούν προσαρμοσμένες φόρμες και λύσεις για το Outlook

Ιδιότητες

Αναγν. άρθρου: 201096 - Τελευταία αναθεώρηση: Τετάρτη, 21 Σεπτεμβρίου 2011 - Αναθεώρηση: 3.0
Οι πληροφορίες σε αυτό το άρθρο ισχύουν για:
  • Microsoft Outlook 2000 Standard Edition
Λέξεις-κλειδιά: 
kbautomation kbdtacode kbhowto kbprogramming kbmt KB201096 KbMtel
Μηχανικά μεταφρασμένο
ΣΗΜΑΝΤΙΚΟ: Αυτό το άρθρο είναι προϊόν λογισμικού μηχανικής μετάφρασης της Microsoft και όχι ανθρώπινης μετάφρασης. Η Microsoft σάς προσφέρει άρθρα που είναι προϊόντα ανθρώπινης αλλά και μηχανικής μετάφρασης έτσι ώστε να έχετε πρόσβαση σε όλα τα άρθρα της Γνωσιακής Βάσης μας στη δική σας γλώσσα. Ωστόσο, ένα άρθρο που έχει προκύψει από μηχανική μετάφραση δεν είναι πάντα άριστης ποιότητας. Ενδέχεται να περιέχει λεξιλογικά, συντακτικά ή γραμματικά λάθη, όπως ακριβώς τα λάθη που θα έκανε ένας μη φυσικός ομιλητής επιχειρώντας να μιλήσει τη γλώσσα σας. Η Microsoft δεν φέρει καμία ευθύνη για τυχόν ανακρίβειες, σφάλματα ή ζημίες που προκύψουν λόγω τυχόν παρερμηνειών στη μετάφραση του περιεχομένου ή χρήσης του από τους πελάτες της. Επίσης, η Microsoft πραγματοποιεί συχνά ενημερώσεις στο λογισμικό μηχανικής μετάφρασης.
Η αγγλική έκδοση αυτού του άρθρου είναι η ακόλουθη:201096

Αποστολή σχολίων

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com