例如我们可以在BeforeOpenProject事件中 设置下面的代码:
If UKey.Start() Then
If UKey.Encrypt1("abc") <> "2F7EFE3A0632AE5C" Then
MessageBox.Show("请插上XX公司提供的UKey!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
e.Cancel = True
End If
Else
MessageBox.Show("启动UKey失败!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
e.Cancel = True
End If
这样用户只有插上你提供的UKey,才能打开你开发的程序。
疑问
这样,别人只需对上述代码爆破,Ukey就无效了啊,VB的代码最容易被破解
要是没有其他的代码防止 绕过Ukey,Ukey的安全性 真的难以保障啊