以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 已知:用户“经理”并非“密码记录表”中,上次最后一次上锁的用户“小颜”, (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=134853) |
||||
-- 作者:fengwenliuyan -- 发布时间:2019/5/10 15:08:00 -- 已知:用户“经理”并非“密码记录表”中,上次最后一次上锁的用户“小颜”, 项目属性的MainTableChanging事件代码为: If e.NewTableName = "询价表2018后" Then Dim fdr = DataTables("密码记录表").find("用户名 =\'" & User.Name & "\'", "加密日期 desc") Dim pwd As String = GetConfigValue(user.name & "密码", "") If pwd <> fdr("密码") Then MainTable = Tables("仓管表") forms("解密窗口").show End If End If 已知:用户“经理”并非“密码记录表”中,上次最后一次上锁的用户“小颜”, 求: 现以用户“经理”,进入项目后,首次点击“询价表2018后”的表时,需要输入密码“000”, 接下来,直至项目关闭,都无需再次输入密码,直接进入并打开表“询价表2018后”, 中途,需要临时锁住表“询价表2018后”,则需要点击上方的“快速访问栏”中的“密码锁”,
[此贴子已经被作者于2019/5/10 15:54:26编辑过]
|
||||
-- 作者:fengwenliuyan -- 发布时间:2019/5/10 15:51:00 -- 求帮助 |
||||
-- 作者:有点甜 -- 发布时间:2019/5/10 15:53:00 --
|
||||
-- 作者:fengwenliuyan -- 发布时间:2019/5/10 16:39:00 -- 谢谢老师 |