如何获取UMV平台中登陆的用户的部门名称，要的是部门名称，不

平民百姓　发表于：2009-07-05 23:11:19 　

复制

如何获取UMV平台中登陆的用户的部门名称，要的是部门名称，不是部门代码？

Top

华尔街风水师发表于：2009-07-06 07:27:54

我想问一下:部门你是建在登陆时就自带的,还是不自带,如果不自带的话,每个用户都隶属于某一个部门,我想那应该有一个表的,直接从那个表中读取即可;如果是登陆时就有的,那更简单,直接用代码把它提取出来.

初学者,供参考.

Top

李妮发表于：2009-07-06 08:46:06

sys_tblDepartment 在这张表里

Top

钱玉炜发表于：2009-07-06 13:34:27

先获得对应的部门编号，然后从sys_tblDepartment表中找到该编号对应的部门

Top

蒋海兵发表于：2009-07-06 16:28:00

可以参考我的帖子http://www.accessoft.com/bbs/showtopic.asp?ID=5165&BoardID=22 [5分]关于平台当中设定菜单权限的问题

Dim Yhm As String

    Dim Bm as Strin
    Dim AllowOpen As Long
    Yhm = Forms!usysfrmLogin!txtUserName
    Bm = DLookup("[username]", "sys_tbluser", "[usernumber]='" & Yhm & "'")

Top

蒋海兵发表于：2009-07-06 16:28:51

Dim AllowOpen As Long 这段代码可以删除，呵呵

Top

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

Access交流中心

[5分]如何获取UMV平台中登陆的用户的部门名称，要的是部门名称，不