以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  请教:获取所有用户名  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=23208)
--  作者：kevin
--  发布时间：2012/9/5 17:46:00
--  请教:获取所有用户名

If e.Col.Name = "用户名" Then
For Each us As UserInfo In Users
     e.Col.Combolist = us.Name  \'请帮忙修改这个地方的代码.获取项目内的所有用户名
Next
End If

 

最好能够同时显示用户名及用户所处的组.

 
--  作者：狐狸爸爸
--  发布时间：2012/9/5 17:59:00
--  
If e.Col.Name = "用户名" Then
    Dim s As String
    For Each us As UserInfo In Users
        s = s & "|" & us.Name 
    Next
    e.Col.Combolist = s
End If
--  作者：kevin
--  发布时间：2012/9/5 19:51:00
--  
If e.Col.Name = "用户组" Then
    Dim s As String
    For Each us As UserInfo In Users
        s = s & "|" & us.Group  \'我修改了这个地方后,去无法获得组名称,是为什么呢? 
    Next
    e.Col.Combolist = s
End If
--  作者：狐狸爸爸
--  发布时间：2012/9/5 19:55:00
--  
因为你本来就没有定义分组。
--  作者：kevin
--  发布时间：2012/9/5 20:07:00
--  
请问这是如何定义呢
--  作者：狐狸爸爸
--  发布时间：2012/9/5 20:09:00
--  

http://www.foxtable.com/help/topics/0607.htm