敬业的IT人 互联网 佚名 2008-4-18 10:57:04

Setdom=GetObject("WinNT://aDomain")

Setusr=dom.Create("user","jsmith")

usr.SetInfo

Setgrp=GetObject("WinNT://aDomain/group")

grp.Add("WinNT://aDomain/jsmith")


注意

1.aDomain改为机器名

2.Win2k自带ADSI，并不需要安装ActiveDirectory

最新文章

用DAO或ADO正确访问Access2000[04-18]

快捷键--找寻Function/Subroutine[04-18]

VB5.0中实现字体闪烁效果[04-18]

用VB尝试新的界面风格[04-18]

利用VB三维面板控件设计流动条[04-18]

用VB制作即时动态按钮[04-18]

相关文章