VBA对本机物理地址进行MD5加密?有什么用?
自己编写的VBA,如果你觉得写得不错,功能你需要保护,就可以让别人注册才能使用,通过对物理地址加密然后注册验证,这是我的一个简单思路。
1、获取本机物理地址:
获取物理地址
2、自定义MD5函数:
Option Explicit
Private Const BITS_TO_A_BYTE = 8
Private Const BYTES_TO_A_WORD = 4
Private Const BITS_TO_A_WORD = 32
Private m_lOnBits(30)
Private m_l2Power(30)
Private Function LShift(lValue, iShiftBits)
If iShiftBits = 0 Then
LShift = lValue
Exit Function
ElseIf iShiftBits = 31 Then
If lValue And 1 Then
写入注册表
5、提示:
由于VBA保护效果太弱,别人很容易破解密码而删除注册部分的代码,故可以将你VBA中的功能代码以及上面加密注册代码封装在dll中,代码保护就强点,只是相比VBA而言,因为dll也能破解的,只是难度大点而已。如果代码真的写得好,可以开源,这是现代软件人的思想,鼓励开源。
,