http://www.microsoft.com/japan/technet/scriptcenter/resources/qanda/oct04/hey1015.mspx
Set objUser = GetObject("LDAP://cn=KenMyer,ou=Finance,dc=fabrikam,dc=com")
objUser.SetPassword("i5A2sj*!")
http://www.microsoft.com/japan/technet/scriptcenter/resources/qanda/oct04/hey1015.mspx
Set objUser = GetObject("LDAP://cn=KenMyer,ou=Finance,dc=fabrikam,dc=com")
objUser.SetPassword("i5A2sj*!")