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->
Setusr=dom.Create("user","jsmith")
usr.SetInfo
Setgrp=GetObject("WinNT://aDomain/group")
grp.Add("WinNT://aDomain/jsmith")
注意
1.aDomain改为机器名
2.Win2k自带ADSI,并不需要安装ActiveDirectory->
- 上一篇:拒绝录入错误日期的编程方法
 - 下一篇:用VB开发与机器环境无关的程序
 
精彩图集
    
    精彩文章
    



