ASP调用.Net编写的动态库

最新推荐文章于 2020-12-29 12:09:34 发布

JOHNCOOLS

最新推荐文章于 2020-12-29 12:09:34 发布

阅读量1k

点赞数

分类专栏： Asp / Asp.net 学习专用文章标签： .net asp string byte 解密 interface

Asp / Asp.net 学习专用专栏收录该内容

456 篇文章

订阅专栏

本文介绍如何在.NET中创建一个包含加密和解密功能的COM组件，并将其注册为DLL。随后展示了如何在ASP中调用该组件进行数据加密与解密。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

1.在.net下新建一个类库，再添加一个类文件
2.定义一个接口，并给接口添加一个GUID
[Guid("47E62378-B300-43f6-BDB4-0DEAC60F8EB6")]
public interface IEncrypt
{
string MyEncoding(string ss);
string MyDecoding(string ss);
}
3.实现接口
[Guid("532FF790-079A-4e2b-AB1E-6DFC7E1DFD21")]
public class MyEnCrypt : IEncrypt
{
public MyEnCrypt()
{}

  //加密方法
  public string MyEncoding(string ss)
  {
   SymmetricAlgorithm symm = new RijndaelManaged();
   symm.GenerateKey();
   symm.GenerateIV();
   byte[] key=symm.Key;
   byte[] iv=symm.IV;

   byte[] bs=_getBytesFromUnicode(ss);
   byte[] be=_doDESEncoding(key,iv,bs);
   byte[] bmd5=(new MD5CryptoServiceProvider()).ComputeHash(bs);

   byte[] be2=_combinateBytes(bmd5,key,iv,be);
   return System.Convert.ToBase64String(be2);
  }

  //解密方法
  public string MyDecoding(string ss)
  {
   byte[] bs=System.Convert.FromBase64String(ss);
   byte[] bs2=_doDESDecoding(bs);
   if( bs2==null )
    return null;
   else
    return _getUnicodeFromBytes(bs2);
  }
}
4.编译生成动态链接库SXCryptPwd.dll，在.net命令提示下注册动态链接库 regasm /tlb SXCryptPwd.tlb SXCryptPwd.dll
这样就注册成了COM组件
5.在asp下的应用
<%
set obj = Server.CreateObject("MyEnCrypt")
dim str1
str1 = obj.MyEncoding("测试.Net组件") // 加密
response.write("strEnCript=" & str1 & "<br>")
dim str2
str2 = obj.MyDecoding(str1) // 解密
response.write("strDecrypt=" & str2 & "<br>")
%>