I am using the following code, but remember, I am new to the COM portion of KIX 2001...

code:

---

 
$DomainObj = GetObject("LDAP://domain")		        ;Connect to domain
IF NOT $DomainObj = 0					;Confirm connection
	$UserObj = $DomainObj.Create("user", "jdoe")	;Create a new user
	IF NOT $UserObj = 0				;Confirm new user
		$UserObj.CN = "John Doe"		;Write all information to user
		$UserObj.SamAccountName = "Jdoe"
		$UserObj.UPN = "Jdoe@sd38.ca"
		$UserObj.Password = "Temporary"
		$UserObj.givenName = "John"
		$UserObj.sn = "Doe"
		$UserObj.SetInfo			;Save changes to account
	ELSE
		? @ERROR
		?
		? @SERROR
	ENDIF
ELSE
	? @ERROR
	?
	? @SERROR
ENDIF

---

The results of this code, seem to be good. There are no errors, and the code runs through to completion. The user, however, does not appear in the Active Directory. All references, that I can find, say that a user in 2000 only requires a Common Name (CN) and a Sam Account Name to be created.

Help Please...

--Jonathan

[ 01 March 2002: Message edited by: Jonathan ]

code:

---

 
$MyOU = getobject("LDAP://OU=TestJK,DC=area,DC=company,DC=com")

IF NOT $MyOU = 0					;check the connection

	$UserObj = $MyOU.Create("user", "TestJK")	;create the new account
	IF NOT $UserObj = 0				;check whether the account has created
		$UserObj.CN = "TestJK"			
		$UserObj.SamAccountName = "TestJK"
		$UserObj.UPN = "TestJK@gmaare.migros.com"
		$UserObj.Password = "TestJK"
		$UserObj.SetInfo			;save the changes
		? @ERROR
		? @SERROR
		? $UserObj.CN
	ELSE
		? @ERROR
		? @SERROR
	ENDIF
		
ELSE
	? @ERROR
	? @SERROR

ENDIF 

---

code:

---

 
Previous Code...

	$UserObj = $MyOU.Create("user", "CN=TestJK")	;create the new account
	IF NOT $UserObj = 0				;check whether the account has created
		? "Object created"
		$UserObj.SamAccountName = "TestJK"
		$UserObj.UPN = "TestJK@gmaare.migros.com"
		$UserObj.Password = "TestJK"
		$UserObj.SetInfo			;save the changes
		? @ERROR
		? @SERROR
		? $UserObj.CN
	ELSE
		? @ERROR
		? @SERROR
	ENDIF
...
 

---