MS-Office-Forum

MS-Office-Forum (http://www.ms-office-forum.net/forum/index.php)
-   Visual C/C++ für Windows (alle Versionen bis 6.0) (http://www.ms-office-forum.net/forum/forumdisplay.php?f=59)
-   -   Outlook Add-In Benutzerdefinierte Formulare (http://www.ms-office-forum.net/forum/showthread.php?t=329538)

cyberduck 23.01.2016 23:13

Outlook Add-In Benutzerdefinierte Formulare
 
Hallo,

mit einem Add-In werden mehrerer Persönliche Formulare wie folgt in STDMETHODIMP CConnect::OnConnection(...) installiert:
Code:

CComPtr m_spApp(Application);
CComVariant myFolder(DISP_E_PARAMNOTFOUND, VT_ERROR);
ComQIPtr CustomMailItem;
BSTR bstrName_T = "C:\\CustomFormular.oft";
HRESULT hr = m_spApp->CreateItemFromTemplate(bstrName, myFolder,(IDispatch**) &CustomMailItem);

Die Formulare sind dann in Outlook zu finden unter:
Datei -> Optionen -> Erweitert -> Entwickler -> Benutzerdefinierte Formulare -> Formulare verwalten -> Persönliche Formulare

Wie kann ich später eines von diesen Formularen per Code Öffnen, Anzeigen oder löschen?

So in etwa sollte es mit VBA funktionieren, aber wie ist das mit C++ möglich?
Code:

Dim oViews As MAPI.Folder
Dim oMessage As MAPI.Message
Dim oFolders As MAPI.Folders
Dim oMessages As MAPI.Messages
Dim sMessageClass As String

Set oView = oFolders.Item("Commons")
Set oMessages = oView.HiddenMessages
For Each oMessage In oMessages
  If oMessage.Type = "IPM.Microsoft.FolderDesign.FormsDescription" Then
      sMessageClass = oMessage.Fields(&H6800001E)
      If sMessageClass = "IPM.Note.CustomFormular" Then
        oMessage.Open()
        Exit For
      End If
Next

Ein kleines Beispiel oder ein Link dazu würde mir sehr weiterhelfen. Durch Suchen, Googlen habe ich leider nichts für mich verständliches gefunden.

Schon mal vielen Dank und ein schönes Wochenende!


Alle Zeitangaben in WEZ +1. Es ist jetzt 00:05 Uhr.

Powered by: vBulletin Version 3.6.2 (Deutsch)
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.