我目前正试图让无需注册的 COM 使用 Excel 作为客户端,使用 .NET dll 作为服务器。目前,我只是试图让概念验证工作,但遇到了麻烦。
显然,当我使用 Excel 时,我不能简单地使用与可执行文件一起存在的客户端清单,所以我正在使用Microsoft.Windows.ActCtx
( link )
我将客户端清单、程序集清单和 dll 都放在同一个位置。
不幸的是,在 C# 中起作用的东西似乎在 Excel / VBA 中不起作用,我对原因感到困惑。虽然 C# 测试客户端运行良好,但 VBA 给出了80070002错误,消息Method 'CreateObject' of object 'IActCtx' failed。
COMTestObject
我有一个 .NET dll (COMTestService.dll) 向 COM ( / ) 公开单个类/接口ICOMTestObject
,如下所示:
[ComVisible(true), InterfaceType(ComInterfaceType.InterfaceIsIDispatch)]
[Guid("EEE50CDF-D8EC-4F38-B986-C231EC45171E")]
public interface ICOMTestObject
{
[ComVisible(true)]
string GetString(int number);
}
[ComVisible(true), ClassInterfaceAttribute(ClassInterfaceType.None), ComDefaultInterface(typeof(ICOMTestObject))]
[Guid("6E54611B-8B56-49E0-9415-E59B0774A4BE")]
public class COMTestObject : ICOMTestObject
{
public COMTestObject()
{
}
public string GetString(int number)
{
return string.Format("The number is: {0}", number);
}
}
客户端清单(COMTestService_Client.manifest):
<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<assembly
manifestVersion="1.0"
xmlns="urn:schemas-microsoft-com:asm.v1" >
<assemblyIdentity
name="client"
version="1.0.0.0" />
<dependency>
<dependentAssembly>
<assemblyIdentity
name="COMTestService"
version="1.0.0.0"
processorArchitecture="msil" />
</dependentAssembly>
</dependency>
</assembly>
程序集清单 (COMTestService.manifest):
<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<assembly
manifestVersion="1.0"
xmlns="urn:schemas-microsoft-com:asm.v1" >
<assemblyIdentity
name="COMTestService"
version="1.0.0.0"
processorArchitecture="msil" />
<clrClass
clsid="{6E54611B-8B56-49E0-9415-E59B0774A4BE}"
progid="COMTestService.COMTestObject"
threadingModel="Both"
name="COMTestService.COMTestObject"
runtimeVersion="v4.0.30319">
</clrClass>
<file
name="COMTestService.dll"
hashalg="SHA1">
</file>
</assembly>
VBA 客户端代码:
Dim actCtx As Object
Set actCtx = CreateObject("Microsoft.Windows.ActCtx")
actCtx.Manifest = "...\COMTestService_Client.manifest"
Dim testObject As Object
Set testObject = actCtx.CreateObject("COMTestService.COMTestObject") 'This line throws...
Dim text As String
text = thing.GetString(42)
Debug.Print text
C# 客户端代码:
var actCtxType = System.Type.GetTypeFromProgID("Microsoft.Windows.ActCtx");
dynamic actCtx = System.Activator.CreateInstance(actCtxType);
actCtx.Manifest = @"...\COMTestService_Client.manifest";
var type = System.Type.GetTypeFromProgID("COMTestService.COMTestObject");
dynamic obj = System.Activator.CreateInstance(type);
dynamic s = obj.GetString(42);
编辑
情节变厚了...只是为了好玩,我编写了一个快速的 COM 可见的 REGISTERED 辅助类来在 C# 中创建对象,然后使用类似于public object CreateObject(string manifestPath, string typeName)
Now 的方法将其传回,从 C# exe 调用它有效很好,但从 VBA 调用它失败(80070002 再次,消息:系统找不到指定的文件。)。现在我更迷茫了……
在此先感谢您的帮助,如果我需要提供更多信息,请告诉我,我很乐意提供帮助!