Outlook加载项实例创建问题... [英] Outlook Addin Instance Creation problem...
问题描述
大家好,我在创建类别接口实例时遇到问题.
我从MSDN复制此代码,并尝试在vb.net应用程序中执行.作为_Categories
Dim的ShortcutKey作为对象的
Dim的returnValue作为类别的
returnValue = instance.Add(名称,颜色,ShortcutKey)
但显示错误对象引用未设置为对象的实例."
这是msdn的链接.任何人都可以解决此问题,并在代码的帮助下给我建议...
http://msdn.microsoft.com/zh-cn/library/microsoft.office.interop.outlook._categories.add .aspx [^]
请帮忙.请注意
DC
Hi all
I m facing a problem with creating Instance of Categories Interface.
I copy this code from MSDN and try to execute in vb.net application.
Dim instance As _Categories
Dim Name As String
Dim Color As Object
Dim ShortcutKey As Object
Dim returnValue As Category
returnValue = instance.Add(Name, Color, ShortcutKey)
But it is showing Error "Object reference not set to an instance of an object."
Here is the link of msdn. Can anyone solve this problem and give me suggestion with the help of code...
http://msdn.microsoft.com/en-us/library/microsoft.office.interop.outlook._categories.add.aspx[^]
Plz help it''s urgent.
Regards
DC
推荐答案
实例不是设置为任何值,这就是您收到错误的原因.
请尝试以下代码:
Dim instance As Categories<br />Dim Name As String<br />Dim Color As OlColor<br />Dim ShortcutKey As OlCategoryShortcutKey<br /><br />Dim returnValue As Category<br /><br />Dim f As NameSpace<br />Set f = Application.GetNamespace("MAPI")<br />Set instance = f.Categories<br />Color = olColorFuchsia<br />Name = "MyCategory"<br />ShortcutKey = olCategoryShortcutKeyNone<br />Set returnValue = instance.Add(Name, Color, ShortcutKey)
instance is not set to anything, that''s why you get the error.
Try this code:Dim instance As Categories<br />Dim Name As String<br />Dim Color As OlColor<br />Dim ShortcutKey As OlCategoryShortcutKey<br /><br />Dim returnValue As Category<br /><br />Dim f As NameSpace<br />Set f = Application.GetNamespace("MAPI")<br />Set instance = f.Categories<br />Color = olColorFuchsia<br />Name = "MyCategory"<br />ShortcutKey = olCategoryShortcutKeyNone<br />Set returnValue = instance.Add(Name, Color, ShortcutKey)
这篇关于Outlook加载项实例创建问题...的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!