Foxtable(狐表)用户栏目专家坐堂 → [求助]


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

主题:[求助]

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


加好友 发短信
等级:幼狐 帖子:61 积分:456 威望:0 精华:0 注册:2020/4/12 19:43:00
[求助]  发帖心情 Post By:2020/5/25 11:12:00 [只看该作者]

全局代码添加:
Public _UserName As String
Public _UserGroup As String
登录窗口添加:
    _UserName = UserName
    _UserGroup = dr("用户组")

其他页面引用_UserName 值为空,是什么原因?

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110569 积分:562735 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/5/25 11:13:00 [只看该作者]

其他页面是在登录窗口打开前引用_UserName 值,还是登录之后引用?

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


加好友 发短信
等级:幼狐 帖子:61 积分:456 威望:0 精华:0 注册:2020/4/12 19:43:00
  发帖心情 Post By:2020/5/25 11:16:00 [只看该作者]

登录之后

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110569 积分:562735 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/5/25 11:18:00 [只看该作者]

登录窗口确定按钮完整代码发上来看看

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


加好友 发短信
等级:幼狐 帖子:61 积分:456 威望:0 精华:0 注册:2020/4/12 19:43:00
  发帖心情 Post By:2020/5/25 17:15:00 [只看该作者]

登录页面,确定按钮
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:登录页面确定按钮.txt

[此贴子已经被作者于2020/5/25 17:19:15编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110569 积分:562735 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/5/25 17:34:00 [只看该作者]

其他页面引用_UserName的地方的完整代码也发上来看看,在什么事件引用的?

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


加好友 发短信
等级:幼狐 帖子:61 积分:456 威望:0 精华:0 注册:2020/4/12 19:43:00
  发帖心情 Post By:2020/5/25 17:52:00 [只看该作者]

保存按钮 click 事件
Dim aa As String
aa = "修改 "& gdlx &" 为:"& gdnr &" ,备注为:"& gdbz &""

If gdlx <> "选择跟踪项目" And gdnr <> ""
    dr1(gdlx2) = gdnr
    Tables("采购跟单_Table1").Save

    Dim dr4 As Row = Tables("采购跟单_Table4").AddNew()
    dr4("采购单号") = dr1("orderno")
    dr4("跟单内容") = aa
    dr4("操作人") = _UserName
    dr4("操作时间") = Date.Now()
    DataTables("采购跟单_Table4").Save
    MessageBox.Show("保存成功")
Else
    MessageBox.Show("请填写跟单内容")
End If

 回到顶部
帅哥,在线噢!
有点蓝
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110569 积分:562735 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/5/25 20:10:00 [只看该作者]

那不应该有问题,除非有其它代码重新改了_UserName的值。输出所有代码搜索检查还有哪用到_UserName的

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


加好友 发短信
等级:幼狐 帖子:61 积分:456 威望:0 精华:0 注册:2020/4/12 19:43:00
  发帖心情 Post By:2020/5/26 10:08:00 [只看该作者]

非常诡异,昨天晚上用户名突然跳出来了,今天早晨有变成空白了

 回到顶部
帅哥,在线噢!
有点蓝
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110569 积分:562735 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/5/26 10:14:00 [只看该作者]

关闭退出项目,删除项目所在的文件夹里的bin目录,然后重启项目试试。

请上传实例测试

 回到顶部
总数 17 1 2 下一页