求助大神，如何在登录，在其他窗体自动获取当前用户id，用户名，在此跪谢！

木头人　发表于：2014-11-19 08:11:54 　

求助大神，如何在登录，在其他窗体自动获取当前用户id，用户名，上传了一个实例，请求大家帮忙，在此跪谢！

风行发表于：2014-11-19 13:00:09

Private Sub Form_Load()
Me.用户名 = Forms!登录窗体!UserName
Me.用户id = DLookup("id", "userlist", "username='" & Forms!登录窗体!UserName & "'")
Me.部门id = DLookup("部门id", "userlist", "username='" & Forms!登录窗体!UserName & "'")
Me.部门 = DLookup("部门名称", "部门", "部门id=" & Me.部门id)
End Sub

点击下载此附件

Top

木头人发表于：2014-11-19 18:12:35

非常感谢风行网友给我的大力支持，谢谢您，好人一生平安！祝你身体健康！万事如意！

Top

总记录：2篇页次：1/1 9 1 :

Access交流中心

求助大神，如何在登录，在其他窗体自动获取当前用户id，用户名，在此跪谢！