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

set DOM = GetObject(" win nt://aDomain ")

设置usr = dom。创建("用户"，" jsmith ")

usr。SetInfo

set grp = GetObject(" win nt://aDomain/group ")

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

注意

1.将域更改为计算机名。

2.Win2k自带ADSI，所以不需要安装Active Directory