精华区 [关闭][返回]
当前位置：网易精华区>>讨论区精华>>编程开发>>● ASP>>组件应用>>ADSI & 目录服务>>Example 6: Iterating through Users

主题：Example 6: Iterating through Users
发信人: netcore()
整理人: qcrsoft(2002-05-14 01:50:33), 站内信件


<%

strDomain="MACHINENAME"
strGroup="Unidentified"

Set Group = GetObject("WinNT://" & strDomain & "/" & strGroup)

For Each Member in Group.Members

If (Member.Class="User") Then

' Here is where you would do
' something with the user

End If
Next

%>

--
※ 来源:．月光软件站 http://www.moon-soft.com．[FROM: 202.96.156.100]
[关闭][返回]