set OU=GetObject("LDAP://ou=London,dc=domain,dc=local")

set NewUser=ou.create("user","cn=Joe User3")

NewUser.Put "sAMAccountName", "Joe.User3"

NewUser.SetInfo()

NewUser.SetPassword("Password1")

NewUser.Put "UserAccountControl","544"

NewUser.SetInfo()