本帖最后由 中为信息 于 2017-7-20 22:32 编辑
AES加密具有非常好的安全性,很多地方都用得到.
这里给易友们贡献一个DLL直接调用实现AES字符串加密解密.
使用起来非常简单.
代码说明如下
DLL命令定义表
.版本 2
.DLL命令 AES加密, 整数型, "ZWJD.dll", "ZWJD_AES_EncryptStr", 公开
.参数 密钥, 文本型, 传址
.参数 向量, 文本型, 传址
.参数 待加密内容, 文本型, 传址
.参数 加密后内容, 文本型, 传址
.DLL命令 AES解密, 整数型, "ZWJD.dll", "ZWJD_AES_DecryptStr", 公开
.参数 密钥, 文本型, 传址
.参数 向量, 文本型, 传址
.参数 待解密内容, 文本型, 传址
.参数 解密后内容, 文本型, 传址
调用代码
.版本 2
.程序集 窗口程序集1
.程序集变量 待加密内容, 文本型
.程序集变量 加密结果, 文本型
.程序集变量 解密结果, 文本型
.子程序 _AES加密解密_被单击
待加密内容 = “你好,我是等待加密的内容,如果你最后看到我就对了!”
加密结果 = 取空白文本 (4096)
AES加密 (“0123456789123456”, “0123456789123456”, 待加密内容, 加密结果)
解密结果 = 取空白文本 (4096)
AES解密 (“0123456789123456”, “0123456789123456”, 加密结果, 解密结果)
信息框 (“原文:” + 待加密内容 + #换行符 + “密文:” + 加密结果 + #换行符 + “解密:” + 解密结果, 0, )
附件有源码
|