VB创建、修改、删除WIN2K用户

领测软件测试网

　　 
　　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

文章来源于领测软件测试网 https://www.ltesting.net/