C# 编写COM

最新推荐文章于 2025-07-19 12:57:17 发布

原创最新推荐文章于 2025-07-19 12:57:17 发布 · 944 阅读

0 ·

本内容遵循CC 4.0 BY-SA版权协议

标签

#c# #dataset #stream #byte #exception

DoNet 专栏收录该内容

3 篇文章

订阅专栏

本文介绍了一个使用C#编写的COM组件示例，该组件提供数据序列化及压缩功能，并实现了必要的COM可见性和安全性接口。文章还提供了如何在客户端通过ActiveX调用这些功能的方法。

一. 项目属性

1.程序集信息：使COM可见

2.为COM互操作注册

二. Code

using System; using System.Text; using System.Data; using System.IO; using System.Xml; using System.IO.Compression; using System.Collections.Generic; using System.Runtime.InteropServices; using System.Runtime.Serialization.Formatters.Binary; namespace VintechLib { [ComVisible(true),InterfaceType(ComInterfaceType.InterfaceIsIDispatch)] public interface IDataFormat { [DispId(1)] byte[] DataSerialization(DataSet ds); [DispId(2)] DataSet ByteToDataSet(byte[] buffer); [DispId(3)] string Test(); } [Guid("DCBE6561-5EC2-3B62-B664-AA1B7C33836C")] [ClassInterface(ClassInterfaceType.None), ComVisible(true)] public class DataFormat : IDataFormat, IObjectSafety { public DataFormat() { } public string Stata { get { return " I'm OK "; } } /// <summary> /// 序列化 /// </summary> /// <param name="ds"></param> /// <returns></returns> public byte[] DataSerialization(DataSet ds) { MemoryStream stream = null; byte[] result = null; try { using (stream = new MemoryStream()) { //DataSet 远程传输类型 ds.RemotingFormat = SerializationFormat.Binary; BinaryFormatter format = new BinaryFormatter(); //序列化数据 format.Serialize(stream, ds); byte[] buffer = stream.ToArray(); stream.Close(); result = Compress(buffer); return result; } } catch (Exception ex) { throw ex; } finally { if (stream != null) stream.Close(); } } /// <summary> /// 压缩数据 /// </summary> /// <param name="data"></param> /// <returns></returns> private byte[] Compress(byte[] data) { MemoryStream stream = null; Stream zipStream = null; byte[] result = null; try { using (stream = new MemoryStream()) { //压缩数据 using ( zipStream = new GZipStream(stream, CompressionMode.Compress, true)) { zipStream.Write(data, 0, data.Length); zipStream.Close(); int count = (int)stream.Length; result = new byte[count]; stream.Position = 0; stream.Read(result, 0, count); stream.Close(); return result; } } } catch (Exception ex) { throw ex; } finally { if (stream != null) stream.Close(); if (zipStream != null) zipStream.Close(); } } /// <summary> /// 二进制流转DataSet /// </summary> /// <param name="buffer"></param> /// <returns></returns> public DataSet ByteToDataSet(byte[] buffer) { DataSet ds = null; MemoryStream stream = null; byte[] temp = null; try { using (stream = new MemoryStream(buffer)) { using (Stream zipStream = new GZipStream(stream, CompressionMode.Decompress)) { int count = (int)buffer.Length; temp = Decompress(zipStream, count); } } BinaryFormatter ser = new BinaryFormatter(); ds = ser.Deserialize(new MemoryStream(temp)) as DataSet; } catch (Exception ex) { throw ex; } finally { } return ds; } /// <summary> /// 解压缩 /// </summary> /// <param name="stream"></param> /// <param name="dataBlock"></param> /// <returns></returns> private byte[] Decompress(Stream stream, int dataBlock) { byte[] data = null; int totalBytesRead = 0; try { while (true) { Array.Resize(ref data, totalBytesRead + dataBlock + 1); int bytesRead = stream.Read(data, totalBytesRead, dataBlock); if (bytesRead == 0) break; totalBytesRead += bytesRead; } Array.Resize(ref data, totalBytesRead); return data; } catch (Exception ex) { throw ex; } } public string Test() { return "Hi World! "; } public void GetInterfacceSafyOptions(int riid, out int pdwSupportedOptions, out int pdwEnabledOptions) { pdwSupportedOptions = 1; pdwEnabledOptions = 2; } public void SetInterfaceSafetyOptions(int riid, int dwOptionsSetMask, int dwEnabledOptions) { } } /// <summary> /// ActiveX必須提供的接口，GUID不能改變 /// </summary> [Guid("CB5BDC81-93C1-11CF-8F20-00805F2CD064"), InterfaceType(ComInterfaceType.InterfaceIsIUnknown)] public interface IObjectSafety { void GetInterfacceSafyOptions(System.Int32 riid, out System.Int32 pdwSupportedOptions, out System.Int32 pdwEnabledOptions); void SetInterfaceSafetyOptions(System.Int32 riid, System.Int32 dwOptionsSetMask, System.Int32 dwEnabledOptions); } }

三.测试

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http://www.w3.org/1999/xhtml"> <head> <meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /> <title>Test</title> <script type="text/vbscript"> dim o,str set o = CreateObject("VintechLib.DataFormat") str = o.Test() msgbox(str) '测试通过 </script> <script type="text/javascript" > var o, str; o = new ActiveXObject("VintechLib.DataFormat") str = o.Test(); alert(str); //测试通过 </script> </head> <body> None </body> </html>

四. 总结

1. Com/ActiveX 原来就是这么简单，C#写的COM 缺点是客户端必须有 .net Framework 若是是VB6.0 或者 VC6写的话就不存在这个问题了.

2. 特别注意调用时是命名空间.类名

3. 特定的接口，自定义接口不能少