VB创建、修改、删除WIN2K用户
www.nanhushi.com 佚名 不详
Set dom = GetObject("WinNT://aDomain")
Set usr = dom.Create("user","jsmith")
usr.SetInfo
Set grp = GetObject("WinNT://aDomain/group")
grp.Add ("WinNT://aDomain/jsmith")
注意
1.aDomain改为机器名
2.Win2k自带ADSI,并不需要安装Active Directory