VB創建、修改、刪除WIN2K用戶

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->