Come creare una cartella utilizzando la libreria di oggetti di Microsoft Outlook

November 12

Come creare una cartella utilizzando la libreria di oggetti di Microsoft Outlook


Il oggetti di Microsoft Outlook libreria contiene le funzioni ed i membri che consentono di manipolare e interagire con Outlook. La libreria di oggetti è un assembly di interoperabilità primario (PIA). A Pia è fondamentalmente una definizione di tipo che è stato firmato con un nome sicuro. Riferimenti a questo PIA consente di accedere a tutte le stesse funzionalità di Outlook un utente finale avrebbe. È possibile aggiungere, modificare e rimuovere oggetti come attività, contatti, eventi del calendario, bozze ed e-mail, oltre alle cartelle. Le cartelle sono versatili e possono essere aggiunti in qualsiasi tipo di oggetto, casella di posta elettronica non solo dell'utente.

istruzione

1 Creare una nuova cartella utilizzando il codice di esempio # C al di sotto:

Outlook._Application oApplication = new Outlook.ApplicationClass ()
ANDARE
Outlook._NameSpace oNamespace = oApplication.GetNamespace (\ "MAPI \")
ANDARE
Outlook.MAPIFolder oInbox = oNamespace.GetDefaultFolder (Outlook.OlDefaultFolders.olFolderInbox)
ANDARE
Outlook.Folders oFolders = oInbox .folders
ANDARE
Outlook.MAPIFolder oPersonal = oFolders.Add (\ "Messaggi personali \");

2 Aggiungere una cartella con Visual Basic, Applications Edition (VBA) copiando il codice seguente:

Dim oNamespace As Outlook.NameSpace
Dim oInbox As Outlook.Folder
Dim oNewFolder As Outlook.Folder

Set oNamespace = Application.GetNamespace (\ & quot; MAPI \ & quot;)
Set oInbox = oNamespace.GetDefaultFolder (olFolderInbox)
Set oNewFolder = myFolder.Folders.Add (\ & quot; Nuova cartella \ & quot;)

3 Creare una cartella di Outlook supplementare con VB.NET utilizzando il seguente codice:

Dim oOutlook As Outlook._Application
oOutlook = New Outlook.Application()
Dim oNamespace As Outlook._NameSpace = oOutlook.Session
Dim oInbox As Outlook.MAPIFolder = oNamespace.GetDefaultFolder(Outlook.OlDefaultFolders.olFolderInbox)
Dim oNewFolder As Outlook.MAPIFolder = oInbox.Folders.Add(\"Personal Folder\")

Consigli e avvertenze

  • Avrete bisogno di aggiungere una clausola di importazione o di utilizzare per la \ "Microsoft.Office.Interop.Outlook \" libreria di collegamento dinamico alla parte superiore del file di codice.
  • La nuova cartella può essere di uno dei seguenti tipi: olFolderCalendar, olFolderContacts, olFolderDrafts, olFolderInbox, olFolderJournal, olFolderNotes o olFolderTasks.