标题: VBS高手大人们请进啊
[打印本页]
作者: prison0803
时间: 2007-4-5 11:01
标题: VBS高手大人们请进啊
对于计算机加入工作组和域下面,
我想咨询下高手
VBS脚本可以实现添加用户到某个组么?
如果可以实现,可以帮忙调试下么?
感激万分
为有你们这些高手VBS大师而自豪~~~~~~
作者: ebfok
时间: 2007-4-15 01:18
Create User Account
Description
Creates a user account in Active Directory. This script only creates the account, it does not enable it.
Script Code
Set objOU = GetObject("LDAP://OU=management,dc=fabrikam,dc=com")
Set objUser = objOU.Create("User", "cn=MyerKen")
objUser.Put "sAMAccountName", "myerken"
objUser.SetInfo
Enable a User Account
Description
Enables a user account.
Script Code
Set objUser = GetObject _
("LDAP://cn=myerken,ou=management,dc=fabrikam,dc=com")
objUser.AccountDisabled = FALSE
objUser.SetInfo