Foxtable(狐表)用户栏目专家坐堂 → [求助]自定义登录窗口


  共有2425人关注过本帖树形打印复制链接

主题:[求助]自定义登录窗口

帅哥哟,离线,有人找我吗?
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107135 积分:544918 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/8/22 20:25:00 [显示全部帖子]

自己设计的登录窗口,不能使用内置的用户变量user,要使用自己定义的变量

四、在全局代码中定义两个变量:

Public _UserName As String
Public
 _UserGroup As String


 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107135 积分:544918 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/8/22 21:02:00 [显示全部帖子]

不需要删掉,不要使用内置的用户变量user即可

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107135 积分:544918 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/8/22 21:32:00 [显示全部帖子]

不管是登录前,还是登录后,基本上就整个项目都不要使用内置的用户变量user。

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107135 积分:544918 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/8/23 20:08:00 [显示全部帖子]

Dim Val1 As String = e.Form.Controls("PassWord").Value
msgbox(Val1) '原密码是否正确?
Dim PassWord As String = E ncryptText(Val1,"a23","op#") '加密
msgbox(PassWord) '加密后和保存早数据库的数据是否一致

登录的时候是怎么验证密码的?同样方法调试一下输入的密码和加密后的字符是否一致

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107135 积分:544918 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/8/23 21:17:00 [显示全部帖子]

那还是您的逻辑有问题,取密码到窗口控件的时候没有解密

 回到顶部