[倾情奉献]：精美登录界面+程序注册功能(已更新)！

stx1980710 · 发表于 2007-2-23 16:55

QUOTE:

以下是引用hhzjxss在2007-2-23 16:41:49的发言：

登录三次关闭的代码你能在你原来的那个EXCEL的界面里面做一下吗？

关于密码输入三次的问题：和下面的类似

Application.ScreenUpdating = False
Static n As Integer
    If Me.TextBox1.Text = Spassword(Me.ComboBox1) Then
     MsgBox Me.ComboBox1 & " ，欢迎你试用本系统！如有问" _
     & vbCrLf & Chr(10) & "题，请与stx1980710@126.com联系！", vbInformation, "系统提示"
       UserName = Me.ComboBox1
       Application.DisplayStatusBar = True
       Application.StatusBar = Space(30) & "今天是 " & Format(Date, "YYYY年M月D日") & Space(10) & "当前操作员:" & Me.ComboBox1.Value
        Unload Login
        Unload frmFace
        Application.Visible = True
    Else
        n = n + 1
      If n > 3 Then
        MsgBox "密码错误,你无权使用本系统!", vbExclamation, "系统提示"
        Unload Login
        Unload frmFace
        ThisWorkbook.Close savechanges:=False
      Else
        MsgBox "密码错误,请重新输入，但不能超过三次！", vbExclamation, "系统提示"
         Me.TextBox1.Value = ""
         Me.TextBox1.SetFocus

      End If
End If
Application.ScreenUpdating = True

hhzjxss · 发表于 2007-2-23 16:56

QUOTE:

以下是引用stx1980710在2007-2-23 16:52:24的发言：

DLL文件，用VB也不能打开，

这个DLL文件，是为了保护代码的安全，而在VB中被编译成DLL的文件！

一般不会被轻易破解的！

难道不可以进行反编译吗？我是想学习一下VBA,其它的还没有学过!

stx1980710 · 发表于 2007-2-23 17:01

QUOTE:

以下是引用hhzjxss在2007-2-23 16:56:47的发言：

难道不可以进行反编译吗？我是想学习一下VBA,其它的还没有学过!

如果有兴趣的话，可以学一下！关于封装为DLL文件，论坛上有很多例子，可以搜索一下“封装”！

对于这个例子，只要会用就可以了：

stx.dll文件中的类模块共有三个子过程，其中：LoginSys子过程调用登录界面；

RegSys子过程调用注册窗体；UserSys子过程调用用户设置窗体。

simaja · 发表于 2007-2-25 09:33

对楼主在这方面的造诣佩服的五体投地。我的水平仅以用户的身份测试，感觉博大精深。后台的测试......不敢造次呀

liangnu1995 · 发表于 2007-2-25 10:05

楼主的注册登录程序很好,不知能否提供dll文件的源码?以便学习应用.

shengshizi · 发表于 2007-2-25 22:37

楼主大哥这个程序是不错，问题是本身你这个程序就带着“取得注册码”按钮，我想借用到我的程序上都不行啊！~

应该有个单独的算注册码的程序吧，另外算法可以自己简单设定一下吧。。。

希望楼主大哥可以考虑我这个建议

stx1980710 · 发表于 2007-2-26 08:01

QUOTE:

以下是引用shengshizi在2007-2-25 22:37:53的发言：

楼主大哥这个程序是不错，问题是本身你这个程序就带着“取得注册码”按钮，我想借用到我的程序上都不行啊！~

应该有个单独的算注册码的程序吧，另外算法可以自己简单设定一下吧。。。

希望楼主大哥可以考虑我这个建议

多谢指导，我会根据你的建议进行修改的！

stx1980710 · 发表于 2007-2-26 09:23

根据shengshizi朋友的建议进行了修改，把取得注册码的功能和注册的功能进行了分离，这样便于灵活控制文件的注册！

如图：四个文件中，第一个文件为存放用户数据的ACCCESS文件；第二个文件为：EXCEL文件；第三个文件为：取得注册码功能的RegCode.exe可执行程序；第四个文件为：封装了VB代码的DLL文件。

RegCode.exe程序中输入用户的机器码，然后取得注册码：

然后在EXCEL文件中输入上一程序产生的注册码，进行注册，才可以运行

[此贴子已经被作者于2007-2-26 9:44:47编辑过]

stx1980710 · 发表于 2007-2-26 09:28

另外，修改了用户进行设置时，管理员（Admin）的密码显示为星号；如图

[此贴子已经被作者于2007-2-26 9:32:15编辑过]

stx1980710 · 发表于 2007-2-26 09:52

49楼和50楼，增加的修改后的两项功能，在一楼的附件中并没有更新！

真对不起！因为我发现大家对这个问题并不怎么感兴趣，很少有朋友对测试的结果进行反馈，所以不打算再对附件进行更新！

如果对这个问题感兴趣，需要修改后的这两项功能的话，请发信息给我或留下你的E-Mail，我会发一份过去的！

[此贴子已经被作者于2007-2-26 9:53:47编辑过]

		自动登录	找回密码
密码			免费注册