- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 修改注册表的某个值，为何代码就无法运行了？ (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=19885)
-- 发布时间：2012/5/24 1:19:00
-- 修改注册表的某个值，为何代码就无法运行了？
有字符串，经加密后，存储在注册表中，
在命令窗口执行以下代码，
Dim reg As String = Registry.GetValue("HKEY_CURRENT_USER\\Software\\Mycode","reg","A")
Dim ms As String = Registry.GetValue("HKEY_CURRENT_USER\\Software\\Mycode","ms","A")
Dim code As String = DecryptText(reg,ms,ms)
If code > "" AndAlso code = ComputerId Then
MessageBox.Show ("ok ")
Else
MessageBox.Show (" no ")
Syscmd.Project.Exit()
End If
1. 在没有人为修改注册表中 reg 和 ms 的值的时候，代码运行正常
2. 在人为修改注册表中 reg 的值的时候（修改或是置零），代码运行正常
问题来了
3. 在人为修改注册表中 ms 的值的时候（修改或是置零），代码运行时出现这个提示，请教是什么原因啊？
此主题相关图片如下：32.jpg
-- 发布时间：2012/5/24 8:04:00
--
http://www.foxtable.com/help/topics/2070.htm