Dim de As System.DirectoryServices.DirectoryEntry = GetDirectoryObject(ADPath, ADUser, ADPasssWord)
de.Invoke("SetPassword", New Object() {"123456789"})
de.CommitChanges()
AD域修改密码出错，其他属性都可以正常设置，帮忙看下。
.NET Framework 版本：4.0.30319.42000
Foxtable 版本：2022.8.18.1
错误所在事件：窗口,AD域test,Button9,Click
详细错误信息：
调用的目标发生了异常。
拒绝访问。 (异常来自 HRESULT:0x80070005 (E_ACCESSDENIED))