用C shape编写COM组件

1、新建一个类库项目


2、将Class1.cs改为我们想要的名字

问是否同时给类改名，确定


3、修改Properties目录下面的AssemblyInfo.cs
ComVisible属性设置为True


4、项目菜单->MyLib属性
找到“生成”选项卡

往下看，找到“为 COM Interop 注册”勾上


5、继续往下，找到“签名”选项卡
勾上“为程序集签名”
在下面的下拉框里面选择“ <新建...>”


6、在弹出的对话框里面，输入MyLib。。或者随便取个名字
去掉使用密码保护文件的选项


7、开始编码，任何一个公开的类，必须有一个 I开通的接口定义

?

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前后的花括号

?

?

?

如果在win7下编译时提示无权访问注册表,以管理员身份打开vs

9、编译它
在命令提示符下面，进入Dll所在的目录
用 gacutil /i MyLib.dll 将这个DLL加入的全局缓存里
然后用 regasm MyLib.dll 注册这个dll


10、在VBScript里面试试。。。

<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>

原贴:http://www.cnblogs.com/Real_Dream/articles/1577938.html