主题：如何去除这个注册程序的BUG?

这儿 http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=95605有个软件注册程序，但在试用过程中，发现一个BUG：即超过试用次数后，提示注册时，直接“X"掉即可绕过注册程序。请问版主如何解决这个问题？

 

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:软件注册.foxdb

此主题相关图片如下：image 515.png

Foxtable帮助文件中的“另一种软件加密方式”也存在这样的注册漏洞。请版主给出解决思路或方案。

不要乱改帮助文档的代码啊

 

    ElseIf n > 5 AndAlso Ok = False Then
        Dim Result As DialogResult
        Result = MessageBox.Show("您使用的软件已经超过使用次数,需要注册才能使用,是否注册?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
        If Result = DialogResult.Yes Then
            Forms("注册").Open()
            Code = Registry.GetValue("HKEY_CURRENT_USER\Software\MyAPP","Register" & HardDiskID,"")
            If Code > "" AndAlso DecryptText(Code,"acbd","cad") = HardDiskID Then '如果注册码正确
                OK = True
            End If
        End If
        If ok = False Then
            Syscmd.Project.Exit()
        End If

完美解决！非常感谢！