VB加密解密字符串
DimoDimstrasstringSeto=CreateObject("MyEncrypt.DES")str=o.Encrypt("加密的明文","8位数密匙(记住要用于解密)")str=o.Decrypt("解密的密文","8位数密匙(加密时的密匙)")
下载地址
用户评论