Modelul de obiecte Microsoft Outlook este implementat ca o colecție de obiecte colectate în biblioteca Outlook.

Obiecte de aplicații Outlook

Masa 21.3 descrie principalele obiecte din modelul de obiecte Outlook.

Un obiect	Un fel	Descriere
Cerere	Obiect	Se referă la aplicația activă Microsoft Outlook. Folosit pentru a controla aplicația
NameSpace	Un obiect	Obiectul este un obiect rădăcină abstract pentru orice sursă de date
Liste de adrese (Liste de adrese)	Familia și obiectul	O familie de obiecte care reprezintă agende
Dosare (MAPIFoldere)	Familia și obiectul	O familie de obiecte MAPIFolders care reprezintă oricare dintre folderele disponibile într-un subset al acestora la același nivel al arborelui folderelor
Articole (Articol)	Obiect MAPIFolder
Linkuri (Link)	Obiectul obiectului	Reprezintă un obiect articol care este asociat cu un alt obiect element
Legături adecvate utilizatorului (UserProperty)	Obiectul obiectului	Această familie stochează informații despre proprietățile personalizate ale unui element Outlook creat de un utilizator.
FormDescription	Obiectul obiectului	Acest obiect stochează toate proprietățile standard ale articolului Outlook
Acțiuni (Acțiune)	Obiectul obiectului	Această colecție stochează informații despre comenzile asociate cu acest element Outlook. Rețineți că comenzile pot fi afișate prin extinderea filei Comenzi în modul de proiectare
Atașamente (Atașament)	Obiectul obiectului	O familie reprezintă toate atașamentele dintr-un articol
Destinatari (Recepint)	Obiectul obiectului	Această familie reprezintă informații despre destinatar pentru un element Outlook.
ReccurencePattern	Obiectul obiectului	Acest obiect setează modelul de recurență pentru întâlniri și sarcini.
Pagini adecvate (pagină corectă)	Familia și obiectul	O familie de PropertyPages care conțin file speciale cu proprietăți adăugate în caseta de dialog Opțiuni din Outlook
Setările de limbă	Un obiect	Oferă informații despre setările de limbă ale aplicației
Wizard de răspuns	Un obiect	Corespunde expertului de răspuns Microsoft Office. Toate aplicațiile Microsoft Office au exact un expert de răspuns, astfel încât orice modificare a acestui obiect va fi reflectată în aplicația activă
Asistent	Un obiect	Se referă la un obiect care reprezintă Asistentul Office activ
Căutare	Un obiect	Acest obiect reprezintă atât o căutare simplă, cât și o căutare avansată.
Mementouri (memento)	Familia și obiectul	Prezintă fereastra Alerte pentru toate mementourile pentru întâlniri, sarcini și multe altele.
Exploratori (Explorer)	Familia și obiectul	Familia de obiecte Explorer este o colecție de toate ferestrele care afișează conținutul unui folder
Selecție (articole)	Obiect Explorer	Familia tuturor articolelor afișate în fereastra de informații
CommandBars (CommandBar)	Obiect Explorer	Reprezintă meniurile normale și comenzile rapide și barele de instrumente pentru obiecte
Panouri (Panou)	Obiect Explorer	Familia de panouri Outlook (Windows) pentru un anumit obiect Explorer
Inspectori (inspector)	Familia și obiectul	Familia de obiecte Inspector este un set de toate ferestrele în care „sunt afișate elementele Outlook. Elementul este modulul principal de stocare a datelor din Outlook (cum ar fi un fișier din alte programe). Elementele includ mesaje de poștă electronică, întâlniri, contacte, sarcini, etc. (fig.21.4)
WordEditor și HTMLEditor	Obiecte	Reprezintă obiectele prin care editorii sunt selectați pentru obiectul Inspector
Pagini (Pagină)	Obiect inspector	Fiecare inspector este asociat cu propria sa familie de pagini, care include toate paginile actualizate de utilizator dintr-un formular. Dacă nu au fost aduse modificări formularului pentru articol, familia Pages este goală
Articol	Obiect inspector	Reprezintă un element Outlook standard situat într-un folder dat
MAPIFolder	Un obiect	Reprezintă un folder Outlook

Tabelul 21.3. Obiecte Outlook de bază

Masa 21.4-21.6 descrie principalele proprietăți, metode și evenimente ale obiectului Application.

Orez. 21.1.

Tabelul 21.4. Proprietățile de bază ale obiectului Aplicație

Tabelul 21.5. Metode de bază ale obiectului Application

Eveniment	Descriere
AdvancedSearchComplete	Se întâmplă când Căutarea avansată își termină activitatea
Articol Trimite	Apare atunci când un articol este trimis fie de inspector, fie de metoda Trimitere
MapiLogonComplete	Apare atunci când un utilizator se conectează
NewMail	Apare atunci când unul sau mai multe mesaje de e-mail sosesc în Mesaje primite
OptionPagesAdd	Apare atunci când se deschide caseta de dialog Opțiuni
Aducere aminte	Apare chiar înainte de o întâlnire, o sarcină sau o alertă de întâlnire
Lansare	Apare imediat după încărcarea aplicației Outlook
Părăsi	Apare când Outlook este închis

Tabelul 21.6. Evenimente obiect obiect

Obiecte MAPIFolderv și Mailltem

Deoarece exemplele din acest capitol și cele următoare utilizează proprietățile și metodele obiectelor MAPIFolder și Mailltem, am considerat că este necesar să oferim o scurtă descriere a acestora.

Obiectul MAPiFoider, așa cum s-a menționat mai sus, reprezintă un folder Outlook. Obiectul MAPiFoider poate conține alte obiecte MApiFoider. În acest caz, puteți controla accesul la subfoldere utilizând combinația Folder (index), unde index returnează un obiect MAPiFoider.

Outlook are un set special de foldere care acceptă funcționalitatea implicită Outlook. Pentru a accesa aceste foldere, utilizați metoda GetDefaultFolder (index), unde indexul este una dintre constantele olDefauitFoiders, de exemplu olFoiderinbox returnează un folder Inbox.

Masa 21.7 prezintă principalele proprietăți ale obiectului MAPiFoider și în tabel. 21.8 - metodele sale.

Tabelul 21.7. Proprietățile obiectului MAPiFolder

Tabelul 21.8. Metode de obiecte MAPiFolder

Câteva cuvinte despre obiectul Mailitem. Prezintă un mesaj de poștă electronică într-un folder Inbox(Inbox). Vom lua în considerare doar proprietățile și metodele acestui obiect care sunt necesare pentru exemplu.

Proprietatea Messageciass returnează sau setează clasa de mesaje pentru elementul Outlook. Proprietatea Messageciass asociază un element cu forma pe care se bazează. Când este selectat un element, Outlook folosește clasa de mesaje pentru a plasa formularul adecvat și pentru a seta proprietățile elementului.

Proprietatea RecivedTime returnează data și ora la care a fost primit mesajul. Metoda de afișare afișează un nou inspector pentru elementul selectat.

Programul 21.3 deschide toate mesajele primite în ultimele 24 de ore.

Programul 21.3. Deschiderea mesajelor de poștă electronică

Sub openLastMail () Dim ca Outlook.Application

Dim ns ca NameSpace; Dim fl As MAPiFolder Dim ob As Object Dim it As Mailitem

Dim i Ca număr întreg

Set oa = CreateObject ("OutLook.Application") Set ns = oa.GetNamespace ("MAPI") Set fl = ns.GetDefaultFolder (olFolderlnbox) For i = 1 To f1.Items.Count Set ob = fl.Items (i) On Error GoTo nextitem If ob.MessageClass = "IPM.Note" Then Set it = ob If it.ReceivedTime> Date - 1 Then

Afișare (fals) Sfârșit Dacă Sfârșit Dacă articolul următor:

cometariu

Pentru familiile Outlook, nu puteți utiliza instrucțiunea Pentru fiecare următor, deci este utilizată o buclă For. ... ... Numara.

Ca și în cazul tuturor aplicațiilor Office, în partea de sus a modelului de obiecte Outlook se află obiectul Aplicație. Poate fi folosit pentru a lansa Outlook din aplicații externe. O caracteristică distinctivă a obiectului Aplicație în Outlook este numărul relativ mic de proprietăți și metode (datorită faptului că unele dintre ele s-au mutat în obiectul spațiului de nume).

Proprietăți utilizate în mod obișnuit ale obiectului aplicației

- Exploratori- Această proprietate returnează o colecție de exploratori cu obiecte Explorer, fiecare reprezentând un folder Outlook pe care utilizatorul l-a deschis pentru vizualizare. Scopul este de a verifica dacă un folder este deja deschis de utilizator în Outlook și, în funcție de rezultat, de a activa această fereastră (Explorer.Activate ()) sau de a o închide (Explorer.Close ()).

- Inspectori- returnează o colecție de inspectori cu obiecte inspector. Inspectorii nu reprezintă foldere Outlook deschise precum Explorer, ci elemente deschise pentru vizualizare și editare (de exemplu, mesaje de poștă electronică).

- Memento-uri- vă permite să returnați o colecție de mementouri cu obiecte de memento care reprezintă alertele curente. De obicei, această proprietate este utilizată pentru a dezactiva programat toate alertele.

- Sesiune- Această proprietate vă permite să returnați un obiect namespace care reprezintă spațiul de nume pentru sesiunea curentă (adică spațiul de nume MAPI). Această proprietate poate fi utilizată în locul metodei GetNamespace ().

Metode

Metodele prefixate cu Active ... returnează pur și simplu o referință la obiectul Explorer sau Inspector activ.

- Cautare Avansata() este o metodă foarte importantă. Vă permite să căutați prin folderele Outlook (ceea ce este adesea necesar în practică).

- Copiaza fisier() - vă permite să copiați un fișier de pe disc în folderul Outlook. Poate fi folosit, de exemplu, pentru a muta toate fișierele din directorul documentației proiectului într-un folder public Exchange Server sau într-o bibliotecă de documente SharePoint Portal Server.

- CreateItem() este o metodă care se folosește foarte des. Vă permite să creați elemente noi în Outlook.

- CreateItemFromTemplate() - creează un nou element Outlook în același mod, dar pe baza unui șablon Outlook din sistemul de fișiere - deseori.

- GetNameSpace() este metoda care este probabil utilizată în majoritatea programelor VBA din Outlook. Preluează obiectul spațiului de nume MAPI.

- IsSearchSynchronous() - folosit pentru a verifica modul de căutare

- Părăsi() - iese din Outlook.

13.2. Unele caracteristici ale programării în Outlook

Programarea în Outlook are o serie de caracteristici interesante care trebuie menționate.

Prima caracteristică este locul în care sunt stocate exact modulele programului Outlook în care creăm codul. După cum ne amintim, în Word sunt stocate împreună cu documente (sau șabloane, de exemplu, Normal.dot), în Excel - în fișiere de registru de lucru, în Access - în fișiere de baze de date MDB.

ÎN Informațiile plug-in standard Outlook sunt stocate într-un fișier PST personal care este creat în mod implicit în profilul unui anumit utilizator.

ÎN Ca rezultat, pe de o parte, lucrul cu codul VBA în Outlook este simplificat: pentru un anumit utilizator de pe acest computer, el este întotdeauna disponibil din Outlook. Pe de altă parte, devine mai dificil să puneți acest cod la dispoziția altui utilizator. În această situație, puteți utiliza două moduri:

prima cale de ieșire este de a utiliza mijloacele de export și import de alimente

module gram care sunt disponibile din meniul contextual pentru modulul

Project Explorer (fig.13.2);

Orez. 13.2. Instrumente de import și export de cod

a doua cale de ieșire - creați aplicația container de ex. fișier

Word sau un registru de lucru Outlook din care să lansați programat Outlook și să efectuați acțiunile necesare în acesta.

A doua caracteristică a lucrului cu VBA în Outlook este că Outlook implementează conceptul de spațiu de nume. Un spațiu de nume din Outlook este definit formal ca un obiect rădăcină abstract pentru orice sursă de date (de exemplu, un folder dintr-o cutie poștală Exchange sau un fișier PST pe disc). Cel mai simplu mod de a vă gândi la spațiul de nume Outlook este să fiți un fel de driver pe care trebuie să îl utilizați pentru a vă conecta la date. Outlook acceptă în prezent doar un spațiu de nume -

MAPI (Messaging Application Programming Interface), dar dezvoltatorii Outlook necesită ca acest spațiu de nume să fie specificat în mod explicit pentru o mare varietate de operații. Obiectul Spațiului de nume care reprezintă spațiul de nume va fi discutat mai detaliat în Sec. 13.4. De exemplu, pentru a porni Outlook și a deschide folderul Inbox dintr-un alt program, va trebui să utilizați următorul cod (nu uitați să includeți linkul către biblioteca de obiecte Microsoft Outlook 11.0):

Setați oNameSpace = oOutlook.GetNamespace ("MAPI")

Setați oInbox = oNameSpace.GetDefaultFolder (olFolderInbox) oInbox.Display

A treia particularitate a colaborării cu Outlook este o confuzie terminologică. De obicei, în documentația modelului de obiect al aplicației Office, termenul Element este utilizat pentru a se referi la elementele dintr-o colecție. În Outlook, obține o a doua valoare: Elementul este orice poate fi stocat în folderele Outlook: mesaje de poștă electronică (obiect MailItem), contacte (obiect ContactItem), întâlniri (obiect Programare) etc. Nu vă confundați!

Outlook are încă o caracteristică. Timp de mulți ani, Outlook a fost primul program atacat de viruși, troieni și alte programe malware trimise prin e-mail. Uneori, astfel de atacuri au avut succes, iar Outlook de pe computerul utilizatorului însuși a început să trimită e-mailuri cu viruși (inclusiv folosind codul VBA). Pentru a reduce probabilitatea apariției evenimentelor în acest scenariu, dezvoltatorii Outlook au introdus în mod deliberat restricții în modelul său de obiecte pentru a preveni răspândirea virușilor. Uneori aceste limitări (au un nume special - Outlook Object Model Guard) interferează cu funcționarea normală a programelor VBA. Acestea vor fi discutate în secțiunile următoare. Uneori, din cauza unor astfel de restricții, este mai convenabil de utilizat în loc de obiect

Programare în Outlook

Bibliotecă CDO model Outlook, care este disponibilă pe orice computer cu

Windows 2000, XP sau 2003.

O caracteristică interesantă a Outlook este că, spre deosebire de alte aplicații Office, nu puteți crea în mod direct (folosind cuvântul cheie nou sau comanda CreateObject ()) niciun alt obiect Outlook decât aplicația. Pentru a crea toate celelalte obiecte, va trebui să utilizați metodele corespunzătoare ale obiectelor deja create.

Pentru orice eventualitate, observăm, de asemenea, că, din păcate, nu există un înregistrator de macrocomenzi în Outlook, precum și în Access. Va trebui să căutați toate informațiile suplimentare necesare folosind documentația.

13.3. Obiectul aplicației,

proprietățile și metodele sale

Ca și în cazul tuturor aplicațiilor Office, în partea de sus a modelului de obiecte Outlook se află obiectul Aplicație. Poate fi folosit pentru a lansa Outlook din aplicații externe (consultați exemplul din secțiunea anterioară). O caracteristică distinctivă a obiectului Aplicație în Outlook este numărul relativ mic de proprietăți și metode (datorită faptului că unele dintre ele s-au mutat la obiectul Spațiu de nume). Cele mai utilizate proprietăți ale obiectului Aplicație sunt prezentate mai jos.

Exploratori - Această proprietate returnează o colecție de exploratori cu exploratori, fiecare reprezentând un folder Outlook pe care utilizatorul l-a deschis pentru vizualizare. Scopul principal al acestei colecții și al obiectelor Explorer este de a verifica dacă un folder este deja deschis de utilizator în Outlook și, în funcție de rezultat, de a activa această fereastră.

[Explorer.Activate () ) sau închiderea acestuia ( Explorer.Închidere ()). Metodă

Obiectul ActiveExplorer () al obiectului Aplicație vă permite să obțineți un link către fereastra activă în prezent, iar GetExplorer () obține un link către obiectul Explorer pentru folderul Outlook specificat (fără a-l activa automat).

Inspectorii sunt o proprietate foarte asemănătoare cu Exploratorii. Returnează o colecție de inspectori cu obiecte inspector. Principala diferență este că obiectele Inspector nu reprezintă foldere Outlook deschise, precum Explorer, ci elemente deschise pentru vizualizare și editare (de exemplu, mesaje de poștă electronică). Obiectul Inspector este utilizat pentru aceleași verificări ca și obiectul Explorer, proprietățile și metodele sale sunt aproape exact aceleași cu proprietățile și metodele obiectului Explorer. În aceleași scopuri,

s-au uitat și metodele ActiveInspector () și GetInspector () al obiectului Application.

Mementouri - Vă permite să returnați o colecție de mementouri cu obiecte de memento care reprezintă alertele curente. De obicei, această proprietate este utilizată pentru a dezactiva programat toate alertele:

Dim oOutlook As New Outlook.Application

Dim oReminder Ca Outlook.Reminder

Pentru fiecare oReminder în oOutlook.Reminders

oReminder. Renunțați

Sesiune - Această proprietate vă permite să returnați un obiect spațiu de nume care reprezintă spațiul de nume pentru sesiunea curentă (adică spațiul de nume MAPI). Această proprietate poate fi utilizată în locul metodei GetNamespace (). Mai multe despre obiectul namespace vor fi discutate în sec. 13.4.

O proprietate de sesiune similară este furnizată pentru obiectul namespace în sine și pentru multe alte obiecte Outlook.

Acum să vorbim despre metodele obiectului Outlook.Application.

Metodele prefixate cu Active ... returnează pur și simplu o referință la obiectul Explorer sau Inspector activ.

AdvancedSearch () este o metodă foarte importantă. Vă permite să căutați prin folderele Outlook (ceea ce este adesea necesar în practică). Mai multe detalii despre această metodă și obiectele sale de căutare și rezultate aferente vor fi discutate în sec. 13.7.

CopyFile () - vă permite să copiați un fișier de pe disc în folderul Outlook. Poate fi folosit, de exemplu, pentru a muta toate fișierele din directorul documentației proiectului într-un folder public Exchange Server sau într-o bibliotecă.

Documente SharePoint Portal Server.

CreateItem () este o metodă foarte obișnuită. Vă permite să creați elemente noi în Outlook. De exemplu, puteți crea un element nou de tipul contactului, puteți completa proprietățile acestuia, salva și apoi îl puteți deschide pentru vizualizare după cum urmează:

Dim oOutlook As New Outlook.Application Dim oContact As Outlook.ContactItem

Setați oContact = oOutlook.CreateItem (olContactItem) oContact.FirstName = "Academia de cursuri de specialitate" oContact.Email1Address = " [e-mail protejat]„oContact.Save

13.3 Obiect Cerere, proprietățile și metodele sale

Outlook.Application Object, Outlook.Application Object Properties and Methods, Dezactivarea alertelor, Crearea contactelor

Ca și în cazul tuturor aplicațiilor Office, în partea de sus a modelului de obiecte Outlook se află obiectul Aplicație. Acest obiect poate fi folosit pentru a lansa Outlook din aplicații externe (a se vedea exemplul din secțiunea anterioară). O caracteristică distinctivă a obiectului Aplicație în Outlook este numărul relativ mic de proprietăți și metode (datorită faptului că unele dintre ele s-au mutat la obiectul Spațiu de nume). Cele mai utilizate proprietăți ale obiectului Aplicație sunt prezentate mai jos:

• Exploratori- Această proprietate returnează o colecție de exploratori cu obiecte Explorer, fiecare reprezentând un folder Outlook pe care utilizatorul l-a deschis pentru vizualizare. Scopul principal al acestei colecții și al obiectelor Explorer este de a verifica dacă un folder este deja deschis de utilizator în Outlook și, în funcție de rezultate, de exemplu, activarea acestei ferestre (Explorer.Activate () sau închiderea acestuia (Explorer.Închide () Metoda Application.ActiveExplorer () vă permite să obțineți un link către fereastra activă curentă, Application.GetExplorer () - pentru a obține un link către obiectul Explorer pentru folderul Outlook specificat (fără a-l activa automat).
• Inspectori este o proprietate care este foarte asemănătoare cu Explorers. Returnează o colecție de inspectori cu obiecte inspector. Principala diferență este că obiectele Inspector nu reprezintă foldere Outlook deschise, cum ar fi Explorer, ci elemente deschise pentru vizualizare / editare (de exemplu, mesaje de poștă electronică). Obiectul Inspector este utilizat în aceleași scopuri (verificări) ca și obiectul Explorer, proprietățile și metodele sale sunt aproape exact aceleași cu proprietățile și metodele obiectului Explorer. Metodele ActiveInspector () și GetInspector () sunt furnizate în aceleași scopuri.
• Memento-uri- Această proprietate vă permite să returnați o colecție de mementouri cu obiecte de memento care reprezintă alertele curente. De obicei utilizat pentru a dezactiva rapid toate alertele programatic:

Dim oReminder Ca Outlook.Reminder

Pentru fiecare oReminder în oOutlook.Reminders

oReminder. Renunțați

• Sesiune- Această proprietate vă permite să returnați un obiect de spațiu de nume reprezentând spațiul de nume pentru sesiunea curentă (citire - spațiu de nume MAPI). Această proprietate poate fi utilizată în locul metodei GetNamespace (). Obiectul Spațiului de nume va fi discutat mai detaliat în secțiunea următoare.

O proprietate de sesiune similară este furnizată pentru obiectul namespace în sine și pentru multe alte obiecte Outlook.

Acum pentru metodele obiectului Outlook.Application. Acestea prezintă un interes mai mare:

• metode Activ ... () returnați pur și simplu o referință la obiectul Explorer, Inspector sau Window activ.
• metodă Cautare Avansata () este o metodă foarte importantă. Vă permite să căutați prin folderele Outlook (ceea ce este adesea necesar în practică). Mai multe detalii despre această metodă și obiectele de căutare și rezultate însoțitoare vor fi descrise mai jos.
• Copiaza fisier ()- posibilitatea de a copia pur și simplu un fișier de pe un disc într-un folder Outlook. Îl puteți utiliza, de exemplu, pentru a muta toate fișierele dintr-un director de documentare a proiectului într-un folder public Exchange Server sau într-o bibliotecă de documente SharePoint Portal Server.
• CreateItem ()- o metodă care este folosită foarte des. Vă permite să creați elemente noi în Outlook. De exemplu, puteți crea un element nou de tipul contactului, puteți completa proprietățile acestuia, salva și apoi îl puteți deschide pentru vizualizare după cum urmează:

Dim oOutlook As New Outlook.Application

Dim oContact As Outlook.ContactItem

Setați oContact = oOutlook.CreateItem (olContactItem)

oContact.FirstName = "Academia de cursuri de specialitate"

oContact.Email1Address = " [e-mail protejat] site-ul web "

oContact.Salvați

oContact.Display

Acum imaginați-vă că creați obiecte de contact într-o buclă bazată pe înregistrări dintr-o bază de date sau rânduri într-un tabel Excel. Directorul de contact va fi încărcat în Outlook foarte rapid și eficient. Nu uitați să ștergeți obiectul din RAM după fiecare creare și salvare a unui contact - altfel memoria de pe computer se va epuiza și acest lucru va duce la o eroare!

• CreateItemFromTemplate ()- un nou element Outlook este creat în același mod, dar pe baza unui șablon Outlook din sistemul de fișiere - fișierul .oft.
• GetNameSpace () este metoda care este probabil utilizată în majoritatea programelor VBA din Outlook. Preluează obiectul spațiului de nume MAPI. Mai multe detalii despre lucrul cu acest obiect vor fi discutate în secțiunea următoare.
• IsSearchSynchronous ()- este utilizat pentru a verifica modul de căutare (consultați secțiunea despre căutarea în Outlook).
• Părăsi ()- doar ieșiți din Outlook.

Lucrul cu programul de poștă Outlook (din păcate, numai cu programul complet Outlook și nu cu Outlook Express cel mai frecvent utilizat) poate fi organizat folosind serverele OLE Automation. Serverul este creat de cod:

Folosește ComObj; var Outlook: OleVariant; Outlook: = CreateOleObject ("Outlook.Application");

Mai departe în obiectul Outlook, puteți utiliza obiectele conținute în Outlook. Aplicarea, proprietățile și metodele acestora. Toate acestea pot fi vizualizate în ajutorul de programare încorporat în Outlook. Iar principiile generale de lucru cu serverele de automatizare OLE sunt discutate în Sec. 6.1.3.

Așa cum se arată în Sec. 6.2 și 6.4, lucrul cu serverele OLE Automation este mult mai convenabil decât lucrul cu serverele COM. Cu toate acestea, este posibil să se organizeze lucrul cu Outlook pe baza serverelor COM. Pe pagina Servere a bibliotecii, există o componentă a aplicației Outlook - serverul COM al programului Outlook. Pentru a lucra cu acesta, trebuie doar să transferați această componentă în formular. De asemenea, puteți seta proprietățile AutoConnect și AutoQuit la true. Acest lucru vă va asigura că Outlook se conectează automat când pornește aplicația și Outlook se închide automat când aplicația se termină să ruleze.

De asemenea, puteți crea servere COM în aplicație fără programare, fără a utiliza componentele paginii Servere:

Folosește OleServer, OutlookXP; var Outlook: TOutlookApplication; Outlook: = TOutlookApplication.Create (Self);

În toate variantele, aplicația va avea acces la obiectele conținute în Outlook.Application, la proprietățile și metodele lor.

Următorul este un exemplu de cum să creați și să trimiteți automat un mesaj de poștă electronică utilizând OLE Automation Server:

Folosește ComObj, OutlookXP; var Outlook: OleVariant; Scrisoare: OleVariant; Outlook: = CreateOleObject ("Outlook.Application"); Scrisoare: = Outlook.Createltem (olMailItem);

Letter.Recipients.Add („ [e-mail protejat];[e-mail protejat]); // destinatari Letter.CC:= " [e-mail protejat]"; // copiați destinația

Letter.BCC: = " [e-mail protejat]"; // destinatar bcc

Letter.Subject: = "Test"; // subiectul scrisorii

Letter.Body: = Memol.Text; // textul scrisorii

(Următoarea declarație deschide o fereastră Outlook cu o literă încărcată, în care utilizatorul poate corecta ceva. Dacă nu este necesar, următoarea declarație poate fi ștearsă) Letter.Display; (Următorul operator trimite scrisoarea. Dacă există un operator anterior, atunci utilizatorul poate trimite scrisoarea din fereastra Outlook, deci în acest caz următorul operator nu este necesar. Este necesar dacă este intenționată trimiterea automată a scrisorilor. ) Scrisoare.Trimite; Outlook.Quit;

Declarația de utilizări include o referință la unitatea ComObj, care este necesară în orice aplicații care utilizează servere OLE Automation (a se vedea secțiunea 6.1.3). Pluginul OutlookXP sau Outlook2000 este inclus numai pentru a utiliza constante găsite în cod. În versiunile anterioare Delphi 2005, modulul Outlook8 poate fi conectat pentru a utiliza aceste constante în locul modulelor specificate.

Prima declarație care se execută leagă variabila Outlook de mailer utilizând funcția CreateOleObject. A doua declarație, utilizând metoda Createltem, creează un nou obiect de corespondență, Letter. Parametrul olMailltem indică faptul că este generat mesajul de poștă electronică. Apoi, două adrese sunt adăugate la lista destinatarilor mesajului (proprietatea Destinatari): " [e-mail protejat]" și " [e-mail protejat]". Adresa destinatarului copiei scrisorii este introdusă în proprietatea CC." [e-mail protejat]". Proprietatea BCC conține adresa destinatarului mesajului BCC." [e-mail protejat]". Subiectul mesajului este introdus în proprietatea Subiect. Textul mesajului din fereastra de editare Memol este introdus în proprietatea Corp.