none
Change an AD Password RRS feed

  • Question

  • Hello, 

    I created this function but it doesn't change anything in the AD 

     Public Function ChangeADPassword(user As String)
            Try
                Dim objUser = GetObject("LDAP://194.7.23.169/CN" + user + ",OU=Users,OU=Operations,OU=Orange,DC=qconsulting,DC=local")
                objUser.SetPassword("Test.1234")
                'objUser.CommitChanges()
            Catch ex As Exception
            End Try
            Return user
        End Function

    I don't see any errors on the console. 

    Can you please help me ?

    Thanks !

    Thursday, December 27, 2018 1:49 PM

All replies