set objUsersCont = GetObject("LDAP://cn=users,dc=rallencorp,dc=com")
set objUser = objUsersCont.Create("user", "CN=jnowak")
objUser.Put "sAMAccountName", "jnowak" ' w przypadku systemu Windows 2000 obowizkowy atrybut
objUser.SetInfo
