2015-11-13 3 views
0

Я импортировал область формы с помощью командного элемента в свой проект.Форма Область Пользовательское действие

Я создал CustomAction к моему formdesigner.vb как этот

Private Shared Sub InitializeManifest(ByVal manifest As Microsoft.Office.Tools.Outlook.FormRegionManifest, ByVal factory As Microsoft.Office.Tools.Outlook.Factory) 
      Dim FormRegionCustomActionImpl1 As Microsoft.Office.Tools.Outlook.FormRegionCustomAction = factory.CreateFormRegionCustomAction 
      FormRegionCustomActionImpl1.Body = Microsoft.Office.Tools.Outlook.FormRegionCustomActionBody.Prefix 
      FormRegionCustomActionImpl1.Method = Microsoft.Office.Tools.Outlook.FormRegionCustomActionMethod.Send 
      FormRegionCustomActionImpl1.Name = "Complete" 
      FormRegionCustomActionImpl1.ShowOnRibbon = False 
      FormRegionCustomActionImpl1.SubjectPrefix = "Completed: " 
      FormRegionCustomActionImpl1.Title = "Complete" 
      manifest.CustomActions.Add(FormRegionCustomActionImpl1) 
      manifest.FormRegionName = "CallCenterRd" 
      manifest.FormRegionType = Microsoft.Office.Tools.Outlook.FormRegionType.Replacement 
      manifest.ShowInspectorCompose = False 
      manifest.Title = "Test" 

     End Sub 

Как я могу «запустить» это действие, когда я нажимаю мои формы региона CommandButton?

ответ

0

Ваше пользовательское действие может быть выполнено по имени, по его получения из коллекции MailItem.Actions и вызова Action.Execute:

https://msdn.microsoft.com/EN-US/library/ff868574.aspx

+0

Привет again.Almost получил его ... Теперь, когда я использую нажмите событие Private Sub CommandButton1_Click() Ручки commandButton1.Click Dim myItem As Object myItem = Me.OutlookItem.Application.CreateItem (Outlook.OlItemType.olMailItem) myItem.actions ("Complete"). Execute() End Sub Я получаю сообщение System.NullReferenceException во главе с кодом пользователя HResult = -2147467261 Сообщение = переменная объекта или с переменной блока не установлена. – john341

+0

Ваш код не работает на Me.OutlookItem. Me не является допустимым объектом, и не является OutlookItem. Попробуйте myItem = Application.CreateItem –

Смежные вопросы