如何加密在 Visual Basic 6.0 中的字符串
@H_403_2@http://support.microsoft.com/kb/821762/zh-cn @H_403_2@ @H_403_2@本文介绍了 CryptographySample.exe 程序包中包含的代码。可从 Microsoft 下载中心下载:
Download the CryptographySample.exe package now. @H_403_2@
在 Visual Basic 6.0 中加密
@H_403_2@本部分介绍加密过程中的重要步骤。它还介绍了如何执行这些步骤使用的 vba 代码。CryptWrap DLL
@H_403_2@在"Code for encryption and for decryption"部分中下载的代码包括 CryptWrap DLL。CryptWrap DLL 是回绕 API 调用的包装。CryptWrap DLL 是 CryptWrap.vbp EncryptGroup 项目组中的项目中。加密过程要求 CryptWrap DLL。加密项目使用 CryptWrap DLL 调用该函数执行实际的加密的函数。
CryptoWrap DLL
@H_403_2@通过使用 ActiveX DLL 项目模板被编码 CryptoWrap DLL。CryptoWrap DLL 是 clsCryptoAPI.cls EncryptGroup 项目组中的文件中。CryptoWrap DLL 的代码包含以下内容:
- 声明的变量和常量 CryptoWrap DLL 使用。
- 从 Advapi32.dll 库文件的 Visual Basic 6.0 中 加密 API 函数的函数和子例程的声明。
- 声明属性、 函数,和子例程。
- 从调用程序分配给一个模块级变量在代码中的密码。
注意此密码用于派生密钥 CryptoEncrypt 函数用来加密字符串。