Foxtable(狐表)用户栏目专家坐堂 → 显示当前登录用户???


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

主题:显示当前登录用户???

美女呀,离线,留言给我吧!
tina2012
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:286 积分:2462 威望:0 精华:0 注册:2013/9/23 16:09:00
显示当前登录用户???  发帖心情 Post By:2014/4/17 11:49:00 [只看该作者]

在窗口中增加一个按钮,用于显示当前登录用户, 我是自定义的登录窗口,用户名保存在_UserName中,以下代码不能显示,怎么回事??请帮忙
全局代码:
Public _UserName As String
Public _UserGroup As String
Public _UserId As String
Public _GroupId As String

按钮代码
MessageBox.Show("当前登录用户:" & _UserName)

点击之后,只显示“当前登录用户:”,用户名不能显示出来,怎么回事??

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2014/4/17 11:51:00 [只看该作者]

你登录的时候,并没有为 _UserName 赋值,所以此时 _UserName 是空的


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/4/17 11:51:00 [只看该作者]

 你需要在自定义登陆窗口那里给这些变量赋值才行。

 回到顶部
美女呀,离线,留言给我吧!
tina2012
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:286 积分:2462 威望:0 精华:0 注册:2013/9/23 16:09:00
  发帖心情 Post By:2014/4/17 11:54:00 [只看该作者]

If e.Form.Controls("PassWord").Value = dr("Password") Then
    _UserName = UserName
    _UserGroup = dr("Group")
    _UserId = dr("Id")
    e.Form.Close
Else
    Messagebox.show("密码错误!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
End If

登陆后已经赋值了啊,

以下代码能起作用,状态栏里能显示,为什么??

StatusBar.Message1= "当前用户:" & _UserName &  "  今天日期:"  & Date.Today

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/4/17 11:57:00 [只看该作者]

 

如果这句代码正常

 

StatusBar.Message1= "当前用户:" & _UserName &  "  今天日期:"  & Date.Today
 
那肯定是你在那个地方改变了 _UserName 的值了,看看你代码

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2014/4/17 11:57:00 [只看该作者]

你是不是在没赋值之前弹出了.或者之后又清空了? 具体请上个例子看看吧

 回到顶部