CLR & Silverlight上海研发团队的Blog : CLR Interop

CLR 4 新特性 ------ 概览

SilverlightShanghai — Sat, 06 Jun 2009 17:42:00 GMT

.NET 4中发布了最新版本的公共语言运行时，简称CLR (Common Language Runtime) 。这个版本是CLR 2.0之后又一个新的版本，包含着CLR小组几年以来的辛勤工作。

CLR上海团队计划在未来的几个月内陆续介绍其中的一些特性，本文作为一个概览，先作蜻蜓点水，抛砖引玉。也欢迎大家回复本文，告诉我们你所感兴趣的话题，我们会进一步作深入的介绍。

CLR 简介

CLR作为.NET框架中最为底层的部件，扮演着运行托管代码虚拟机的角色，承担着诸如即时编译(Just In Time Compile)，垃圾回收(Garbage Collect)等任务。打一个比方，如果把操作系统看做是运行二进制程序的宿主，那么CLR就是托管世界的操作系统。

图一 CLR 在.NET框架中所处的位置

CLR作为.NET框架中的一部分，总是跟着.NET发行，但是近年来.NET的发行版本从2.0一直到3.5, 但是CLR却还一直保留在2.0，如下表所示：

.NET框架版本	时间	CLR
1.0	2002.2	1.0
1.1	2003.4	1.1
2.0 (Generics)	2006.1	2.0
3.0 (WPF/WCF/WF)	2006.11	2.0
3.5 (LINQ)	2007.11	2.0
4.0 Beta	2009.5	4.0

图二 CLR 版本

大家可以看到，2.0的发行已经是三年之前的事情了，在这几年中，CLR小组的工作最后都汇集在了这次发行之中，可谓是众星云集，下面我们一一叙来。

托管与本地代码的互操作

托管代码与本地代码之间的互操作(interop)担负着.NET世界对外联系的责任。比如调用一个本地dll或者COM组件。在CLR 4中，我们作了以下工作，来提高互操作的易用性。

网络广播：http://msevents.microsoft.com/CUI/EventDetail.aspx?EventID=1032417433&Culture=zh-CN

1. 自定义QI(Custom QI)

当托管代码被COM调用的时候，它扮演着COM组件的角色。对于COM组件来说，IUnknown::QueryInerface(QI)是类型转化的关键。CLR4之前，为每个托管COM组件提供了一个QI实现; CLR4 允许用户自定义QI，大家可以从mscorlib中新增的interface，System.Runtime.InteropServices.ICustomQueryInterface着手了解这一新功能。

2. TlbImp源代码以及自定义工具

在托管代码中调用COM组件，需要这个COM组件用托管语言申明自己的接口，也就是Interop Assembly(IA)。在一般情况下，用户不需要自己动手撰写这些assembly，而可以使用TlbImp这个工具，根据TLB生成IA。在CLR 4的开发中，我们用托管代码把TlbImp重写了，并且把源代码公布在了codeplex上面。

发布TlbImp的源代码的好处之一，是方便使用者根据自己的需求，通过修改源代码来自拓展TlbImp的功能。我们也收集了很多客户需要自定义TlbImp的要求，并且提取了一些呼声最高的自定义请求，制作了TlbImp自定义工具，也在codeplex发行。详见http://blogs.msdn.com/silverlightshanghai/archive/2009/03/13/codeplex-tlbimp.aspx

3. 等价类型

前面提到，COM组件要为.NET所用，需要Interop Assembly。不同版本的COM组件，带来了部署上的问题。在CLR 4.0之中，我们通过等价类型的引入，就部署IA的问题，给出了更好的解决方案。

4. StubMethodReditection

自定义Stub来处理Interop中的Marshalling和目标函数调用；

5. 其他

Interop其他方面的改动，使用COM取代了原先的远程对象访问；让用户自己决定清理RCW的时机等等，会有更为详细的博文作具体介绍。

垃圾回收

垃圾回收一直是CLR中的核心模块，对托管程序运行的性能至关重要。在这个版本中，CLR引入了background GC，和原来的Concurrent GC相比，在GC进行的过程中，会更少的阻断其他进程，从而提高整个CLR的运行效率。同时，此前在sp2中引入的GC::RegisterForFullGCNotification可以让 CLR4.0可以通知用户第二代GC发生，从而使服务器有机会处理负载平衡，使得整个服务器端的处理能力不至于因为GC的发生受到太大的影响。

代码约定

在CLR4.0中，引入了代码约定，更方便用户规范代码的行为，大家可以从System.Diagnostics.Contracts这一命名空间着手，进一步了解其内容。

Corrupted state exception

CLR 4.0中，对异常处理的哲学有了一个改进：在默认情况下，try/catch语句将不能捕获诸如AccessViolationException等异常。因为这些异常的损毁(Corrupt)了机器的状态(state)，即使用户捕获了它们，也无法继续执行代码，或者说，继续执行代码也会变得非常危险。

新的安全模型

用过CLR v2的安全模型的朋友们可能还会记得诸如Evidence，Policy以及Permission等概念，这些复杂的对象一起构筑了v2的安全模型的框架，CLR4.0中，安全模型被大大简化，SecurityCritical，SecurSafeCritical等一些安全级别构筑了新的安全模型的基础。

同一个进程，多个CLR

CLR4.0的出现，又添加了一个CLR的版本，尽管我们尽量保证各个不同版本之间的兼容性，但是还是可能出现一些已经开发的组件，需要特定的版本才能运行。为了确保用户过去编写的组件不会因为新的CLR版本而不能运行，CLR4.0中允许用户在一个进程中，运行不同的CLR版本，这样不同的组建就可以各取所需，运行在适合他们的CLR中了。

基本类库

基本类库，也就是mscorlib.dll，包括了诸如System.Object这样在整个类型系统中最为核心的类库。CLR4.0也包含了很多新功能：比如用于支持动态语言的System.Tuple,新的集合类型System.Collections.Generic.SortedSet，用于提高文件系统浏览性能的API，操作注册表的API，以及对内存映射文件的支持等等。

总的来说，CLR4.0相较于CLR2.0，在保证了很高的兼容性的同时，做了大量的改进工作，在之后的一系列博客中，我们团队的成员会进一步作更为具体的介绍，敬请大家期待。

字符串marshalling进阶篇

SilverlightShanghai — Mon, 01 Jun 2009 07:14:00 GMT

1. 字符串Marshalling基础

在本地代码中,字符串按编码可分为ASNI字符串和Unicode字符串，按实现不同，可分为LPSTR(char*,wchar*)和BSTR。

在托管代码中，与字符串相关的有String,stringBuilder两个。

为了实现本地代码与托管代码中字符串的相互转换，Marshalling 引入了几个属性值。

BSTR系列

UnmanagedType.AnsiBStr

UnmanagedType.BStr [COM Interop中为默认值］

UnmanagedTYpe.TBStr

LPSTR系列:

UnmanagedType.LPStr

UnmanagedType.LPWStr

UnmanagedType.LPTStr［批女哦棵中为默认值］

2.字符串的内存操作

LPString的内存操作:

本地代码相关函数：CoTaskMemAlloc,CoTaskMemFree

BSTR的内存操作:

本地代码相关函数：SysAllocString,SysFreeString

3. String和StringBuilder在Marshalling中的区别

在Marshalling中，如果你要传递的字符串仅仅需要在原有的字符串中改变某个或某几个字符（in-place change），在这种情况下，你就最好在托管代码中使用StringBuilder,而不是string。

.NET Interop入门-P/Invoke和Reverse P/Invoke

SilverlightShanghai — Sat, 28 Mar 2009 18:24:00 GMT

最近在论坛上经常看到一些基本的interop的问题，给我动力写完之前的.net interop入门系列，给刚刚涉足.NET interop的朋友们一个大体上的概念。

每每谈及.NET interop，我的脑中总是出现下面一幅图:

该图代表了.net interop的四个典型场景。之前我的同事和我讨论了.NET和COM互操作的应用：

在.NET中调用COM：COM Interop入门
在COM中调用.NET：在COM应用中使用.NET组件，使用IDispatch::Invoke函数在C++中调用C#实现的托管类库方法。

今天我主要讲一下P/Invoke和Reverse P/Invoke，和COM interop相比，P/Invoke无需注册组件，使用上更轻量，更绿色。

1. P/Invoke

P/Invoke(platform invoke)是.NET调用本地代码(native code)的一种比较轻便的方式。只需要将本地代码编写成动态链接库，然后在c#代码中，声明一个外部静态函数，并且用DllImport属性指明动态连接库的入口。举例如下：

using System;
using System.Runtime.InteropServices;

class PInvoke
{
    [DllImportAttribute("user32.dll", EntryPoint = "MessageBoxW")]
    public static extern  int MessageBoxW(
        [In]System.IntPtr hWnd,
        [In][MarshalAs(UnmanagedType.LPWStr)] string lpText,
        [In][MarshalAs(UnmanagedType.LPWStr)] string lpCaption,
        uint uType);

    public static void Main()
    {
        MessageBoxW(IntPtr.Zero, "Hello", "Interop", 0);
    }
}

稍加解释这个代码。类PInvoke中，有个MessageBoxW的函数声明，它的实现在user32.dll(系统自带)中，入口是MessageBoxW，参数的构成是根据windows API的声明而定的，我们在Codeplex上有一个工具，专门帮助大家声称一个本地代码(c++)编写的函数在托过代码(c#)中的函数声明，之前我们团队的成员也撰文介绍了这个工具的使用。

有了这个声明以后，在Main中调用MessageBox，就和调用其他托管代码一样轻松自如了。

2. Reverse P/Invoke

接着，我们来看看在本地代码中调用.NET方法。本地代码需要拿到一个.NET委托(delegate)，然后把这个delegate当作一个函数指针使用，示例如下：

using System;
using System.Windows.Forms;
using System.Runtime.InteropServices;

public class Program
{
    internal delegate void DelegateMessageBox([MarshalAs(UnmanagedType.LPWStr)]string msg);

    [DllImport("Native.dll", CallingConvention = CallingConvention.Cdecl)]
    static extern void NativeMethod(DelegateMessageBox d);

    public static void ShowMessageBox(string msg)
    {
       MessageBox.Show(msg);
    }

    public static void Main()
    {
        NativeMethod(new DelegateMessageBox(ShowMessageBox));
    }
}

这个例子中，我们希望本地代码能够调用托管函数ShowMessageBox来显示一个对话框。为了让本地代码可以调用这个函数，我们根据它的声明，定了了一个delegate，并且通过P/Invoke把这个委托传给了本地代码。本地代码可以如下调用托管代码：

#include <stdio.h>
#include <wtypes.h>

extern "C" {
    __declspec(dllexport) void NativeMethod(void (__stdcall *pShowMsgBox)(WCHAR *wChar))
    {
        (*pShowMsgBox)(L"hello reverse interop");
    }
}

注意到托管代码中的委托到了本地代码中，就是一个函数指针，本地代码可以像一个普通的函数指针一般调用托管代码。

大家可能注意到dll的声明用了extern “C”，它指明了调用规范是cdecl，在之前的托过代码的DllImport中，也相应的注明了调用约定，关于调用约定的详细介绍，可以参见我的另一篇博客。

今天的介绍就到这里，大家可以把这些示例代码当作一个template，根据实际需求作相应的具体改动。

CodePlex上TlbImp新版本发布：基于规则的自定义功能

SilverlightShanghai — Fri, 13 Mar 2009 10:31:15 GMT

大家好。距离上次我们发布在CodePlex上的新版本TlbImp已经过了快半年了。在这半年的时间内，除了主要进行.NET 4.0相关的新功能开发之外，我们上海CLR小组也没有忘记进行TlbImp相关功能的继续开发，于今年3月9日再次发布了TlbImp的一个新版本：

http://www.codeplex.com/clrinterop/Release/ProjectReleases.aspx?ReleaseId=17579

这次版本中我们引入了两个重要功能：

1. 通过规则自定义互操作程序集以及规则自定义编辑器

2. 回归测试工具

基于规则的自定义功能

我们先来看一下自定义功能。这个新版本的TlbImp允许用户通过自定义的一系列的规则来指定TlbImp如何生成最终的互操作程序集。之前有不少用户向我们提到在使用TlbImp的时候，经常需要对TlbImp生成的结果做一些修改，而且必须是自动化的修改。他们通常使用的方法是先使用ILDASM反汇编，使用Perl脚本修改反汇编代码，然后再使用ILASM重新生成互操作程序集。为了解决这个问题，我们引入了一个新功能，允许用户以非常自由的方式来定义他们最终想要看到的结果。

让我们先来看一个简单的例子：假设我们希望改变互操作程序集中的某个类型的名称。先双击打开TlbImpConfigFileEditor.exe启动自定义文件的编辑器，然后打开我们需要自定义的Type Library，这里我们选择发布版本中Samples\ChangeManagedName\ChangeManagedNameSample.tlb文件，如下：

左边显示的是我们需要自定义的Type Library，而右边，则是我们需要自定义的规则，这些规则可以告诉TlbImp如何修改最终生成的互操作程序集。首先，将我们需要修改的IComparable接口结点从左边拖到右边，松开鼠标，出现如下的对话框：

上面这个对话框是用来创建一个新的规则，规则指定TlbImp对于哪些对象应用何种动作。在这个对话框中我们需要定义这个规则所对应的动作（Action），因此需要在Action下拉框中选择ChangeManagedName，然后点击OK即可。之后编辑器状态如下（需要自己展开结点）：

大家可以看到右边已经出现了一个新的规则叫做Change interface name，对应的Category是Type，也就是说这个规则是针对互操作程序集中的类型设置的。Condition指定了规则所需要满足的条件，选中Condition节点（或者其子节点）可以在下面的Condition Expression中看到对应的规则表达式，也就是NativeName Equal ‘ICompareable’，意思是该规则是针对任何名字叫做IComparable的类型。注意因为我们是从IComparable节点直接拖到右边，因此这些条件是编辑器自动生成的。大家如果需要也可以自己通过点击Native Equal IComparable条件来修改，或者点击<Empty>来增加新的条件。现在我们可以点击<Empty>节点，在下拉框中选择TypeKind，第二个下拉框选择Equal，第三个下拉框选择Interface，最终的结果如下：

注意表达式节点的组织方式是类似语法树的样子，也就是说And节点下面的互相之间是And关系，最终的结果总是可以在Condition Expression一栏看到：

( NativeName Equal 'IComparable' ) And ( TypeKind Equal 'Interface')

当编辑好了规则的时候，我们需要指定对应的具体动作的参数。因为我们需要修改对象类型的名称，双击Action下面的NewName子结点会弹出如下对话框：

输入我们想修改成的名字，然后点击OK。

这样一个规则就完成了：

修改完毕之后存盘为ChangeInterfaceName.xml，然后在命令行下面调用TlbImp，使用/config参数引用之前存盘的Config文件（黄色加亮部分：

之后通过ILDASM打开我们生成的结果：

可以看到IComparable已经被改名成了IMyInterface。

TlbImp总共支持下面几种动作（Action）：

1. ChangeManagedName：修改类型、函数的名称

2. ResolveTo：将一个类型替换为另外一个类型（可以是另外一个程序集的类型）。现在已经有用户在CodePlex上面提出这个功能需求了：http://clrinterop.codeplex.com/WorkItem/View.aspx?WorkItemId=2565

3. AddAttribute：为任意类型添加任意Attribute

4. PreserveSig：为单个函数或者类型中的所有函数添加PreserveSigAttribute并相应修改函数的原型

5. ConvertTo：修改函数中的参数类型

每种对应的动作在Samples目录下面都有对应的例子，有兴趣的朋友可以参照文档自行实验。

回归测试工具

为了帮助用户在修改TlbImp代码的时候可以更容易保证自己的修改不会引起其他问题，我们引入了一个简单的回归测试工具，大家可以到这里下载：

http://clrinterop.codeplex.com/Release/ProjectReleases.aspx?ReleaseId=17579

下载完毕之后打开Bin目录下面的TlbImpRegressionTestTool.exe，然后通过File菜单打开Testcase目录下面的testcases.xml文件：

可以看到所有的Testcase都被列出来了。下一步在Run菜单里面选择Settings，输入TlbImp2.exe和WinDiff.exe所在位置：

完毕之后，选择Run下面的Run All Testcases或者Run Selected Testcases，该工具便会调用TlbImp2.exe依次运行Testcase来检查TlbImp2的相应功能是否正确：

绿色为测试成功，红色为失败。如果有失败的情况，双击该行可以打开WinDiff比较TlbImp2当前生成的结果和应该生成的结果之间的区别。

最后，希望大家能够积极试用TlbImp的新功能。如果有希望看到的TlbImp的新功能，或者对目前的TlbImp有哪些觉得做的不够好的地方，都可以到下面的地址提出你的宝贵意见: http://clrinterop.codeplex.com/WorkItem/List.aspx

在COM应用中使用.NET组件

SilverlightShanghai — Wed, 23 Jul 2008 17:51:00 GMT

上一博中，我们用Visual Studio把.NET组件(托管组件)变成了COM服务器。本博继续这个话题，看看如何使用.NET工具包来完成相应的功能。

首先我们来看看今天的主题和CLR Interop的关系，在我们组里，interop这个术语包含了四个范畴，即P/Invoke, Reverse P/Invoke, COM Interop和Reverse COM Interop。前二个概念通过动态连接库(DLL)在native世界和.NET世界中实现互通性；后两个概念顾名思义，就是和COM打交道了。其中，COM interop是在.NET应用中使用COM组件；Reverse COM Interop指的是在COM应用中使用.NET组件。概念有些绕口令，看官先别急着抛转，看看下图。

可能有人会问， COM技术已经历史悠久了，.NET程序员为什么需要和它打交道呢？问题的答案就在于”组件”一词。举个例子，若干年前一个牛人写了个程序，扩展性极佳，他用了COM把插件的接口定义的明明白白，而我们想用.NET来做这个插件。。。

为COM写一个.NET组件，可以参照以下三部曲

1. 定义.NET接口，撰写.NET class

2. 部署.NET组件

3. 撰写COM客户端

第一步骤对经常从事.NET的开发朋友来说非常熟悉，这里给出例子，不再赘述。

csc /target:library a.cs

第二，要部署.NET组件，这里包括两个方面：

regasm a.dll /tlb

1. 把类型库(type library)导出。对于COM应用来说，它只懂得类型库，是为COM组件遵循的二进制”标准”。/tlb选项告诉regasm，导出类型库。我们可以用oleview察看tlb的内容，如下图所示，此前定义的.NET接口和类都在其中。

2. 把步骤2中生成的dll放到注册表中。COM并不懂得诸如GAC的概念，而是通过注册表来查询HKEY_CLASSES_ROOT\CLS_ID\00000000-0000-0000-FFFF-000000000004，观察这个注册表项，InprocServer32中把COM的动态链接库指向了mscoree.dll，这就是传说中的垫片(shim)，它会负责加载公共语言运行时，并找到真正的.NET组件----a.dll。

有了以上两步，我们就可以在COM应用中使用.NET组件了。如何撰写COM组件超出了本文的范畴，有兴趣的读者可以参考代码中的注释。

cl client.cs

// client.cs

#define _WIN32_COM

#include <stdio.h>

#include <wtypes.h>

#import "a.tlb" no_namespace named_guids raw_interfaces_only

// a.tlb是第二步中导出的

int main()

{

IUnknown *pUnk = NULL;

IA *pIA = NULL;

HRESULT hresult;

// 0. 初始化COM组件

hresult = CoInitializeEx(NULL, COINIT_MULTITHREADED);

if (FAILED(hresult))

{

printf("ERROR: cannot initialze COM: 0x%x\n", hresult);

return -1;

}

// 1. 获取IUnknown接口

hresult = CoCreateInstance(CLSID_A, NULL, CLSCTX_INPROC_SERVER, IID_IUnknown, (void **)&pUnk);

if (FAILED(hresult))

{

printf("ERROR: cannot Get the IUnkown interface: 0x%x\n", hresult);

return -1;

}

// 2. 获得IA接口

hresult = pUnk->QueryInterface(IID_IA, (void **)&pIA);

if (FAILED(hresult))

{

printf("ERROR: cannot Convert to IDispatch interface: 0x%x\n", hresult);

pUnk->Release();

return -1;

}

pUnk->Release();

// 3. 调用.NET组件

hresult = pIA->Hello();

if (FAILED(hresult))

{

printf("ERROR: Invoke failed: 0x%x\n", hresult);

}

// 4. 清理

pIA->Release();

CoUninitialize();

return 0;

}

By com.microsoft.stbc.devdiv.ndp.interop.dev/mountaintai二世

使用IDispatch::Invoke函数在C++中调用C#实现的托管类库方法

SilverlightShanghai — Tue, 22 Jul 2008 07:51:00 GMT

CLR Interop简而言之是让非托管代码与托管代码之间可以相互调用的技术。这项技术可以使开发人员重用已有的托管或非托管组建，并根据自己的需要，权衡托管代码的简易性与非托管代码的灵活性，选择适合自己实际情况的编程语言，而不用过多考虑重用的组件是用哪种语言开发的。Interop中文的意思是互通性，既然是互通，代码的调用就有两种不同的方向。本文所要讲述的是使用COM Interop技术在非托管代码方如何调用托管代码。

1. 创建托管服务器

首先让我们在Visual Studio 2008创建一个C#的Class Library（类库）项目，取名为MyManagedServer，在该项目中，我们要声明并实现一个接口。

接口声明代码如下：

为了说明简单，该接口中只有一个方法，用于打印一些信息。其中的ComVisible属性至关重要，当它的值为true时，该接口才对COM可见。

view plain copy to clipboard print ?

using System;
using System.Runtime.InteropServices;
namespace MyManagedServer
{
[ComVisible(true),
Guid("79EDDA1C-F243-47C5-8954-5DEF01FA3D44"),
InterfaceType(ComInterfaceType.InterfaceIsDual)]
public interface IManagedFooClass
{
[PreserveSig, DispId(1)]
void PrintFoo();
}
}

using System;
using System.Runtime.InteropServices;

namespace MyManagedServer
{
    [ComVisible(true),
     Guid("79EDDA1C-F243-47C5-8954-5DEF01FA3D44"),
     InterfaceType(ComInterfaceType.InterfaceIsDual)]     
    public interface IManagedFooClass
    {
        [PreserveSig, DispId(1)]
        void PrintFoo();
    }
}

接下来是实现该接口的类：

view plain copy to clipboard print ?

using System;
using System.Runtime.InteropServices;
namespace MyManagedServer
{
[ComVisible(true),
ClassInterface(ClassInterfaceType.AutoDual),
ProgId("MyManagedServer.ManagedFooClass")
]
public class CustomCOMClient :
IManagedFooClass,
IManagedBarClass
{
public CustomCOMClient()
{
}
#region IManagedFooClass Members
[DispId(1)]
public void PrintFoo()
{
Console.WriteLine("in MyManagedServer: CustomCOMClient.PrintFoo()");
}
#endregion
}
}

using System;
using System.Runtime.InteropServices;

namespace MyManagedServer
{
    [ComVisible(true),
     ClassInterface(ClassInterfaceType.AutoDual),
     ProgId("MyManagedServer.ManagedFooClass")
    ]
    public class CustomCOMClient : IManagedFooClass, IManagedBarClass
    {
        public CustomCOMClient()
        {
        }
        
        #region IManagedFooClass Members

        [DispId(1)]
        public void PrintFoo()
        {
            Console.WriteLine("in MyManagedServer: CustomCOMClient.PrintFoo()");
        }

        #endregion
    }
}

这里我们给这个类的ProgId属性赋一个值。等会儿在注册组件的时候，注册表中将会增加一个键值，将ProgId和runtime为我们自动生成的CLSID关联起来。

2. 为COM Interop注册托管服务组件

注册组件可以用Visual Studio帮我们自动注册，也可以在命令行下手动输入命令。若要使用Visual Studio来帮我们注册组件，只需在项目属性页（鼠标右键项目名称，在下拉菜单中选择“Properties（属性）”）的Build标签页中把Register for COM Interop项打上勾，然后再build项目就可以了。如下图所示：

此外，我们也可以先build项目，然后通过命令行的方式注册组件。只需要使用regasm.exe在VS2008命令行下输入如下命令即可：

regasm assemblyname.dll /tlb /codebase

该命令会为我们注册组件，生成并注册对应的type library文件。其中assemblyname.dll是项目构建生成的程序集文件。

3. 创建非托管客户端

使用托管语言创建并注册了组建之后，我们就要使用非托管语言来尝试通过COM Interop调用组建中的方法了。首先，在Visual Studio 2008中创建一个Visual C++ Win32 Console Application，取名为MyNatvieClient，并将组建生成tlb文件拷贝至该项目的源代码目录中。然后在MyNativeClient.cpp中输入如下代码：

view plain copy to clipboard print ?

#include "stdafx.h"
#import "mscorlib.tlb" no_namespace
#import "MyManagedServer.tlb" no_namespace
int _tmain(int argc, _TCHAR* argv[])
{
::CoInitialize(NULL);
// Get CLSID for CoCreateInstance
const OLECHAR lpszProgID[] = OLESTR("MyManagedServer.ManagedFooClass");
CLSID clsid;
HRESULT hr = CLSIDFromProgID(lpszProgID, &clsid);
if(SUCCEEDED(hr))
{
printf("CLSIDFromProgID Succeeded \n");
IDispatch* ppv = 0;
HRESULT hr = CoCreateInstance(clsid, NULL, CLSCTX_ALL, IID_IDispatch, (void**)&ppv);
if(SUCCEEDED(hr))
{
printf("CoCreateInstance Succeeded \n");
// Get DispId for Invoke
DISPID dispid;
const LPOLESTR szMember = OLESTR("PrintFoo");
HRESULT hr = ppv->GetIDsOfNames(IID_NULL, (LPOLESTR*)&szMember,1,LOCALE_SYSTEM_DEFAULT,&dispid);
if(SUCCEEDED(hr))
{
printf("GetIDsOfNames Succeeded \n");
// There's no parameter to pass
DISPPARAMS dispParams = {0};
VARIANT vtResult;
UINT dwArgErr;
HRESULT hr = ppv->Invoke(dispid,IID_NULL,NULL,DISPATCH_METHOD,
&dispParams,&vtResult,NULL,&dwArgErr);
if(SUCCEEDED(hr))
{
printf("Invoke Succeeded \n");
}
}
ppv->Release();
}
}
return 0;
}

#include "stdafx.h"

#import "mscorlib.tlb" no_namespace
#import "MyManagedServer.tlb" no_namespace

int _tmain(int argc, _TCHAR* argv[])
{

	::CoInitialize(NULL);

	// Get CLSID for CoCreateInstance
	const OLECHAR lpszProgID[] = OLESTR("MyManagedServer.ManagedFooClass");
	CLSID clsid;	
	HRESULT hr = CLSIDFromProgID(lpszProgID, &clsid);
	if(SUCCEEDED(hr))
	{
		printf("CLSIDFromProgID Succeeded \n");
		IDispatch* ppv = 0;	
		HRESULT hr = CoCreateInstance(clsid, NULL, CLSCTX_ALL, IID_IDispatch, (void**)&ppv);

		if(SUCCEEDED(hr))
		{
			printf("CoCreateInstance Succeeded \n");

			// Get DispId for Invoke
			DISPID dispid;
			const LPOLESTR szMember = OLESTR("PrintFoo");
			HRESULT hr = ppv->GetIDsOfNames(IID_NULL, (LPOLESTR*)&szMember,1,LOCALE_SYSTEM_DEFAULT,&dispid);
			if(SUCCEEDED(hr))
			{
				printf("GetIDsOfNames Succeeded \n");

				// There&apos;s no parameter to pass
				DISPPARAMS dispParams = {0};
				VARIANT vtResult;
				UINT dwArgErr;

				HRESULT hr = ppv->Invoke(dispid,IID_NULL,NULL,DISPATCH_METHOD,&dispParams,&vtResult,NULL,&dwArgErr);
				if(SUCCEEDED(hr))
				{
					printf("Invoke Succeeded \n");
				}
			}

			ppv->Release();
		}
	}

	return 0;
}

该代码主要做了以下几件事情：

a. 调用CoInitialize进行初始化。

b. 调用CLSIDFromProgId获得对象的CLSID，因为接下来的函数将通过CLSID来创建实例。

c. 通过CoCreateInstance创建对象实例。这里创建的是一个IDispatch的对象实例。

d. 调用IDispatch::GetIDsOfNames以获得将要调用的方法的DispID，供接下来的函数使用。

e. 使用IDispatch::Invoke来调用方法。

在import type library的时候我们不仅import了组建的tlb文件，同时还import了mscorlib.tlb以避免生成的临时的tlh文件中一些类型找不到的情况。（有关此方面的问题可以参考我们团队开发人员张羿撰写的《#import从.NET DLL生成的tlb的神秘错误》）

编译通过后运行结果，可看到命令行中打印出如下信息：

CLSIDFromProgID Succeeded
CoCreateInstance Succeeded
GetIDsOfNames Succeeded
in MyManagedServer: CustomCOMClient.PrintFoo()
Invoke Succeeded

注：本文所示代码只作为实例使用。本文作者不对因代码使用不当而造成的问题负责。v