| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]自定义用户管理 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=146856) |
| -- 作者：lgj716330 -- 发布时间：2020/3/4 11:32:00 -- [求助]自定义用户管理 设置了自定义用户管理后，登录时还是会先跳出系统自带的登录窗口，想设置默认用户，但菜单中的用户管理一点就死，怎么解决 |
| -- 作者：有点蓝 -- 发布时间：2020/3/4 11:59:00 -- 菜单中的用户管理是不是设置了外部数据源管理用户？然后用户表被删除了。这个问题好像新版本已经解决了，更新到最新版本的foxtable试试 |
| -- 作者：lgj716330 -- 发布时间：2020/3/4 12:04:00 -- 好象是这么一回事 免费更新到期了，要更新是不是得重新买一个
|
| -- 作者：有点蓝 -- 发布时间：2020/3/4 12:08:00 -- 重新在数据库里添加之前使用的同样结构同样名称的用户表试试 |
| -- 作者：lgj716330 -- 发布时间：2020/3/4 18:09:00 -- 密码加密问题 更改用户_AfterLoad中代码： If dt.DataRows.Count = 1 Then e.Form.Controls("PassWord").Value = MD5Encrypt（dt.DataRows(0)("PassWord")） Else 更改用户_Button1_Click： Dim PassWord As String = MD5Encrypt（e.Form.Controls("PassWord").Value） cmd.CommandText = cmd.CommandText & "\', [Password] = \'" & MD5Encrypt(Password) & "\' Where [Name]= \'" & OldUserName & "\'" 用户登录_Button确定_Click： If e.Form.Controls("PassWord").Value = MD5Encrypt(dr1("Password")) Then 增加用户_Button1_Click： Dim PassWord As String = MD5Encrypt（e.Form.Controls("PassWord").Value） cmd.CommandText = cmd.CommandText & UserName & "\',\'" & UserGroup & "\',\'" & MD5Encrypt(Password) & "\')" 登录的时候提示密码错误，要如何调整？
|
| -- 作者：程兴刚 -- 发布时间：2020/3/4 18:34:00 -- If e.Form.Controls("PassWord").Value = MD5Encrypt(dr1("Password")) Then 个人觉得：这个是否应该考虑一下， MD5Encrypt加密的数据永远应该存放在数据库中，窗口的是明码，加密后和后台比较，让窗口控件的值永远和后台不一样，虽然空间可以设置掩码，眼睛是看不见，但不知道又没有通过外挂程序读取控件值的方法，如果，密码是不是很容易就破解了，我个人比较看好FoxTable的EncryptText加密，通过动态密码，结果也动态改变，这样的对比更安全，MD5Encrypt虽然加密后不可解，任何人用MD5Encrypt对同样的明码加密后结果是一致的，如果有人能搞出监听控件值的外挂，加密和不加密基本就是一样的！ 也许我这是杞人忧天，留着大家探讨！
|
| -- 作者：lgj716330 -- 发布时间：2020/3/4 19:16:00 -- 改成了EncryptText，解决了 [此贴子已经被作者于2020/3/4 19:24:37编辑过]
|