网络收藏

这段代码是在你的精品收藏夹看到的,但是这样创建的用户可以加到组里吗?  
  dim   username,userpass    
   
  dim   odomain,ouser    
   
  username   =   "user1"    
   
  userpass   =   "user1"    
   
  set   odomain   =   getobject("winnt://white")    
   
  set   ouser   =   odomain.create   ("user",   username)    
   
  if   (err.number   =   0)   then    
   
  ouser.setinfo    
   
  ouser.setpassword   userpass    
   
  ouser.setinfo    
   
  else    
   
  wscript.echo   "创建用户"   &   username   &   "出错！"    
   
  end   if    
   
  set   ouser   =   nothing    
   
  set   odomain   =   nothing    
 

推荐阅读