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

主题：Example 3: Creating a Group
发信人: netcore()
整理人: qcrsoft(2002-05-14 01:50:33), 站内信件
<%

strDomain="MACHINENAME"
strGroup="Unidentified"

Set oDomain = GetObject("WinNT://" & strDomain)

Set oGroup = oDomain.Create ("group", strGroup)

oGroup.SetInfo

Set oDomain=Nothing
Set oGroup=Nothing

%>

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