我想将自定义 c# windows 窗体（或 WPF）用户控件嵌入到 Outlook 视图中。我正在使用 Outlook 2003 和 Visual Studio 2008。
我确实在这里下载了 Outlook 2007 的示例：
还有这里：
http://msdn.microsoft.com/en-us/library/aa479345.aspx
我对其进行了测试，并且在 2007 年它可以正常工作，但是对于 2003 年，当我想打开视图时出现以下错误：
由于错误 80131509 无法完成操作
我可以从 Visual Studio 启动它，它可以很好地注册文件夹，调试工作等等。它创建了一个 HTML 页面，其中包含我的类型作为对象参数 - 但应该调用的 Initialize 方法要么不存在（未通过 JS 显示），要么有一些错误。
RegisterSafeForScripting 的断点也永远不会被命中 - 可能与此有关。
听起来您需要为程序集创建运行时安全策略。Visual Studio / VSTO自动设置它。您可以通过从 Visual Studio 运行项目然后打开管理工具下的 Microsoft .NET Framework 2.0 配置应用程序来检查这一点。浏览到运行时安全策略并检查代码组。VSTO 项目位于用户 > 代码组 > All_Code > VSTOProjects 下。
以下是我的笔记。
代码访问安全策略工具使用户和管理员能够修改机器策略级别、用户策略级别和企业策略级别的安全策略。
使用 Windows Installer 为 Office System SE 解决方案部署 Visual Studio 2005 工具（第 1 部分，共 2 部分）
首先感谢 AMissico - 我也会查看您提供的描述和链接。以下代码对我有用（但按钮控件和其他控件的布局已损坏-但 WFP 有效，因此我将使用 wpf）。我必须重构代码，但它是我的工作版本......
在为我稍微调整了一下之后，我终于发现这个例子有效：http: //www.microsoft.com/downloads/details.aspx? familyid=078124E9-1E88-4F51-8C98-3C1999CFE743&displaylang=en
以下文件或多或少取自上述示例
using System;
using System.IO;
using System.Collections.Generic;
using MSOutlook = Microsoft.Office.Interop.Outlook;
using System.Runtime.InteropServices;
namespace Outlook2003KnowledgeBaseAddIn.Setup
{
public sealed class FolderHomePage
{
/// <summary>
/// List of web view files that have been written out during this Outlook intance
/// </summary>
private static List<string> listWebViewFiles = new List<string>();
/// <summary>
/// Registers a specific managed type as a folder home page. Returns a file path for the folder home page
/// </summary>
/// <param name="viewType">Type of the home page control.
/// Control must be ComVisible should be registered safe for scripting</param>
/// <returns>file path to the folder home page</returns>
public static string RegisterType(Type viewType)
{
if (viewType == null)
return null;
//TODO: ensure that viewType inherits from System.Windows.Forms.Control
//Create the Local App Data directory for the Web view files to reside in
string webViewDirectory = Path.Combine(Environment.GetFolderPath(Environment.SpecialFolder.LocalApplicationData), Properties.Resources.WebViewDirectoryName);
if (Directory.Exists(webViewDirectory) == false)
Directory.CreateDirectory(webViewDirectory);
//Create the web view file name based on the viewType guid in the web view directory
string webViewFile = Path.Combine(webViewDirectory, viewType.GUID.ToString("N") + ".htm");
//if the file has been written out already in this session, return
if (listWebViewFiles.Contains(webViewFile))
return webViewFile;
//If the file exists, delete it (for versioning reasons)
if (File.Exists(webViewFile))
File.Delete(webViewFile);
//Open a file stream and text writer for the Web view stream
FileStream stm = new FileStream(webViewFile, FileMode.Create, FileAccess.Write);
TextWriter writer = new StreamWriter(stm, System.Text.Encoding.ASCII);
//Look to see if the viewType has an init method that takes a single Outlook App parameter
System.Reflection.MethodInfo initInfo = viewType.GetMethod("Initialize", new Type[] { typeof(MSOutlook.Application) });
//If the viewType doesn't have an Init method, just write out the html page header
//TODO move HTML code to resource strings
if (initInfo == null)
{
writer.WriteLine("<html><body rightmargin = '0' leftmargin ='0' topmargin ='0' bottommargin = '0'>");
}
//If the viewType does have an Init method, write script to trap the Body.OnLoad event and call the Init method
//passing in the window.external.OutlookApplication object as the parameter
else
{
writer.WriteLine("<html><body rightmargin = '0' leftmargin ='0' topmargin ='0' bottommargin = '0' onload='OnBodyLoad()'>");
writer.WriteLine("<script>\n\tfunction OnBodyLoad()\n\t{\n\t\tvar oApp = window.external.OutlookApplication;");
writer.WriteLine("\t\t{0}.Initialize(oApp);", viewType.Name);
writer.WriteLine("\t}\n</script>");
}
//Write out an object tag that loads up the viewType as a com object via its class id
writer.WriteLine("<object classid='clsid:{0}' ID='{1}' VIEWASTEXT width='100%' height='100%'/>", viewType.GUID, viewType.Name);
writer.WriteLine("</body></html>");
//Close the file
writer.Close();
stm.Close();
//save this file name so we don't write it out multiple times per outlook session
listWebViewFiles.Add(webViewFile);
return webViewFile;
}
private const string CATID_SafeForScripting = "7DD95801-9882-11CF-9FA9-00AA006C42C4";
private const string CATID_SafeForInitializing = "7DD95802-9882-11CF-9FA9-00AA006C42C4";
/// <summary>
/// Registers a managed type that's exposed for COM interop as safe for initializing and scripting
/// </summary>
/// <param name="comType"></param>
public static void RegisterSafeForScripting(Type comType)
{
Guid clsid = comType.GUID;
Guid interfaceSafeScripting = new Guid(CATID_SafeForScripting);
Guid interfaceSafeForInitializing = new Guid(CATID_SafeForInitializing);
ICatRegister reg = (ICatRegister)new ComComponentCategoriesManager();
reg.RegisterClassImplCategories(ref clsid, 1, new Guid[] { interfaceSafeScripting });
reg.RegisterClassImplCategories(ref clsid, 1, new Guid[] { interfaceSafeForInitializing });
}
/// <summary>
/// Unregisters a managed type that's exposed for COM interop as safe for initializing and scripting
/// </summary>
/// <param name="comType"></param>
public static void UnregisterSafeForScripting(Type comType)
{
Guid clsid = comType.GUID;
Guid interfaceSafeScripting = new Guid(CATID_SafeForScripting);
Guid interfaceSafeForInitializing = new Guid(CATID_SafeForInitializing);
ICatRegister reg = (ICatRegister)new ComComponentCategoriesManager();
reg.UnRegisterClassImplCategories(ref clsid, 1, new Guid[] { interfaceSafeScripting });
reg.UnRegisterClassImplCategories(ref clsid, 1, new Guid[] { interfaceSafeForInitializing });
}
}
[ComImport(), Guid("0002E005-0000-0000-C000-000000000046")]
class ComComponentCategoriesManager
{
}
[ComImport(), Guid("0002E012-0000-0000-C000-000000000046")]
[InterfaceType(ComInterfaceType.InterfaceIsIUnknown)]
interface ICatRegister
{
void RegisterCategories(int cCategories, IntPtr rgCategoryInfo);
void UnRegisterCategories(int cCategories, IntPtr rgcatid);
void RegisterClassImplCategories(
[In()] ref Guid rclsid,
int cCategories,
[In(), MarshalAs(UnmanagedType.LPArray)] Guid[] rgcatid);
void UnRegisterClassImplCategories(
[In()] ref Guid rclsid,
int cCategories,
[In(), MarshalAs(UnmanagedType.LPArray)] Guid[] rgcatid);
void RegisterClassReqCategories(
[In()] ref Guid rclsid,
int cCategories,
[In(), MarshalAs(UnmanagedType.LPArray)] Guid[] rgcatid);
void UnRegisterClassReqCategories(
[In()] ref Guid rclsid,
int cCategories,
[In(), MarshalAs(UnmanagedType.LPArray)] Guid[] rgcatid);
}
}
连同这个文件：
using System;
using System.Collections.Generic;
using System.Text;
using System.Security.Policy;
using System.Security;
using Outlook2003KnowledgeBaseAddIn.Setup;
using Outlook2003KnowledgeBaseAddIn.UI;
using Outlook2003KnowledgeBaseAddIn.UI.OutlookIntegration;
namespace Outlook2003KnowledgeBaseAddIn
{
[System.ComponentModel.RunInstaller(true)]
public class Installer : System.Configuration.Install.Installer
{
public Installer()
{
}
public override void Install(System.Collections.IDictionary stateSaver)
{
base.Install(stateSaver);
try
{
ConfigureSecurityPolicy();
RegisterFolderHomePages();
}
catch (Exception ex)
{
throw new System.Configuration.Install.InstallException("Custom Installer Failed", ex);
}
}
public override void Uninstall(System.Collections.IDictionary savedState)
{
base.Uninstall(savedState);
try
{
DeleteSecurityPolicy();
UnregisterFolderHomePages();
}
catch (Exception ex)
{
throw new System.Configuration.Install.InstallException("Custom Installer Failed", ex);
}
}
private void RegisterFolderHomePages()
{
//Utility.FolderHomePage.RegisterSafeForScripting(typeof(FolderHomePages.AccountToday));
FolderHomePage.RegisterSafeForScripting(typeof(WebViewControl));
}
private void UnregisterFolderHomePages()
{
//Utility.FolderHomePage.UnregisterSafeForScripting(typeof(FolderHomePages.AccountToday));
FolderHomePage.UnregisterSafeForScripting(typeof(WebViewControl));
}
private void ConfigureSecurityPolicy()
{
// Find the machine policy level
PolicyLevel machinePolicyLevel = GetMachinePolicyLevel();
// Get the install directory of the current installer
string assemblyPath = this.Context.Parameters["assemblypath"];
string installDirectory =
assemblyPath.Substring(0, assemblyPath.LastIndexOf("\\"));
if (!installDirectory.EndsWith(@"\"))
installDirectory += @"\";
installDirectory += "*";
// Create the code group
CodeGroup codeGroup = new UnionCodeGroup(
new UrlMembershipCondition(installDirectory),
new PolicyStatement(new NamedPermissionSet("FullTrust")));
codeGroup.Description = Properties.Resources.CasPolicyDescription;
codeGroup.Name = Properties.Resources.CasPolicyName;
// Add the code group
machinePolicyLevel.RootCodeGroup.AddChild(codeGroup);
// Save changes
SecurityManager.SavePolicy();
}
private static void DeleteSecurityPolicy()
{
PolicyLevel machinePolicy = GetMachinePolicyLevel();
foreach (CodeGroup codeGroup in machinePolicy.RootCodeGroup.Children)
{
if (codeGroup.Name == Properties.Resources.CasPolicyName)
machinePolicy.RootCodeGroup.RemoveChild(codeGroup);
}
SecurityManager.SavePolicy();
}
private static PolicyLevel GetMachinePolicyLevel()
{
System.Collections.IEnumerator policyHierarchy = SecurityManager.PolicyHierarchy();
while (policyHierarchy.MoveNext())
{
PolicyLevel level = (PolicyLevel)policyHierarchy.Current;
if (level.Type == PolicyLevelType.Machine)
return level;
}
throw new ApplicationException("Could not find Machine Policy level. Code Access Security is not configured for this application.");
}
}
}
此方法设置 Web 视图：
private void CreateWebViewFolders()
{
MSOutlook.MAPIFolder root = Folder.GetRootFolder(Application.Session);
MSOutlook.MAPIFolder webViewFolder = Folder.CreateFolder(root, Properties.Resources.WebViewFolderName);
webViewFolder.WebViewURL = FolderHomePage.RegisterType(typeof(WebViewControl));
webViewFolder.WebViewOn = true;
}