C# 编写COM组件

1、新建一个类库项目 
 
2、将Class1.cs改为我们想要的名字 
 
问是否同时给类改名，确定 
 
3、修改Properties目录下面的AssemblyInfo.cs 
ComVisible属性设置为True 
 
4、项目菜单->MyLib属性 
找到“生成”选项卡 
 
往下看，找到“为 COM Interop 注册”勾上 
 
5、继续往下，找到“签名”选项卡 
  勾上“为程序集签名” 
  在下面的下拉框里面选择“ <新建...>” 
 
6、在弹出的对话框里面，输入MyLib。。或者随便取个名字 
  去掉使用密码保护文件的选项 
 
7、开始编码，任何一个公开的类，必须有一个 I开通的接口定义 

C# code

using System;
using System.Collections.Generic;
using System.Text;
using System.Runtime.InteropServices;

namespace MyLib
{
    [ComVisible(true)]
    [Guid("2CBD3D76-35F1-4f9d-9C1B-9DBFEE412F76")]
    public interface IMyClass
    {
        void Initialize();
        void Dispose();
        int Add(int x, int y);
    }
    [ComVisible(true)]
    [Guid("EA2F140A-108F-47ae-BBD5-83EEE646CC0D")]
    [ProgId("MyLib.MyClass")]
    public class MyClass : IMyClass
    {
        public void Initialize()
        {
            //nothing todo
        }
        public void Dispose()
        {
            //nothing todo
        }
        public int Add(int x, int y)
        {
            return x + y;
        }
    }
}

8、GUID属性里面的那个字符串，在“工具”菜单下面，“创建 GUID” 
  选择 Registry Format，然后复制 
    
  注意在[Guid("....... 这个里面要去掉GUID前后的花括号 
9、编译它 
在命令提示符下面，进入Dll所在的目录 
用 gacutil /i MyLib.dll 将这个DLL加入的全局缓存里 
然后用 regasm MyLib.dll 注册这个dll 
 
10、在VBScript里面试试。。。 

HTML code

<script language="VBScript">
Dim o : Set o=CreateObject("MyLib.MyClass")  
  o.Initialize
    MsgBox "1 + 2 = " & o.Add(1,2)
    o.Dispose
    Set o=Nothing
</script>