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")] publicinterface IMyClass { void Initialize(); void Dispose(); int Add(int x, int y); } [ComVisible(true)] [Guid("EA2F140A-108F-47ae-BBD5-83EEE646CC0D")] [ProgId("MyLib.MyClass")] publicclass MyClass : IMyClass { publicvoid Initialize() { //nothing todo } publicvoid Dispose() { //nothing todo } publicint 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>