This script from the TechNet script centre will create 1000 new users.

Set objRootDSE = GetObject("LDAP://rootDSE";)
Set objContainer = GetObject("LDAP://cn=Users,"; & _
    objRootDSE.Get("defaultNamingContext"))

For i = 1 To 1000
    Set objLeaf = objContainer.Create("User", "cn=UserNo" & i)
    objLeaf.Put "sAMAccountName", "UserNo" & i
    objLeaf.SetInfo
Next

WScript.Echo "1000 Users created."

-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Mike Hogenauer
Sent: 15 January 2004 07:09
To: [EMAIL PROTECTED]
Subject: [ActiveDir] LDIFDE and Perl...


I need to import 1500 user accounts into a test environment, I would like to
use LDIFDE.
First is there an easy way to batch or create dummy accounts for a test
environment without having to type each one, and second can any of this be
done with Perl?

I will also be consulting the Cookbook!

Thanks in advance.

Mike


List info   : http://www.activedir.org/mail_list.htm
List FAQ    : http://www.activedir.org/list_faq.htm
List archive: http://www.mail-archive.com/activedir%40mail.activedir.org/

List info   : http://www.activedir.org/mail_list.htm
List FAQ    : http://www.activedir.org/list_faq.htm
List archive: http://www.mail-archive.com/activedir%40mail.activedir.org/

Reply via email to