ADS set password method invoke throws error

Question

0.00/5 (No votes)

See more:

Hi,
I am tying to set password for user in active directory using VB.NET. The Active Directory is in another server. I am getting error as Inner Exception: "{"Access is denied. (Exception from HRESULT: 0x80070005 (E_ACCESSDENIED))"}". If u know please help me on it. Thank you.

objUser.Invoke("SetPassword", strNewPassword) this line only throwing an error.

objDe = New DirectoryEntry(Pathweb)

cobjDS = New DirectorySearcher(objDe)

VB

cobjDS.Filter = "(&" + str_USER + "(" + str_SEARCH + UserId + "))"

            Dim objSearchResult As SearchResult = cobjDS.FindOne()

            Dim objUser As DirectoryEntry = objSearchResult.GetDirectoryEntry()
            objUser.Invoke("SetPassword", strNewPassword)

I am able to do it in C#. But it required ADS server Admin username and password. Is there any way to do in VB.Net.
The C# code is.

C#

PrincipalContext PrincipalContext = new PrincipalContext(ContextType.Domain, ADSServerIP, userpath, ContextOptions.Negotiate, ADSadminuser, ADSadminPSW);
UserPrincipal User = UserPrincipal.FindByIdentity(PrincipalContext, userid);
User.SetPassword(newpassword);

Posted 5-Dec-13 2:18am

ssyuvaraja

Updated 5-Dec-13 19:57pm

v2

Add a Solution

2 solutions

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Madhu Nair · Answer 1 · 2013-12-05T18:03:00

Solution 1

You need to be member of administrator group in Domain to be able to change the password of users. If you do have the login details of Administrator of the domain, try log in to your system using the administrator credentials and run the application again. Access Denied error should go now

Posted 5-Dec-13 18:03pm

Madhu Nair

Comments

ssyuvaraja 6-Dec-13 1:34am

Hi, Thank you. I am login as administrator only. Still getting same error.

ssyuvaraja 6-Dec-13 1:53am

I am able to set password using C#. But by giving ADS server admin user name and password. Is there any way to do it in VB.net.
PrincipalContext PrincipalContext = new PrincipalContext(ContextType.Domain, ADSServerIP, userpath, ContextOptions.Negotiate, ADSadminuser, ADSadminPSW);
UserPrincipal User = UserPrincipal.FindByIdentity(PrincipalContext, userid);
User.SetPassword(newpassword);

ssyuvaraja · Answer 2 · 2013-12-10T23:01:00

Hi,
I changed the password using Old password. I am not used the Set password this time. I used the change password. It worked. in C#.

C#

PrincipalContext PrincipalContext = new PrincipalContext(ContextType.Domain, ConfigurationManager.AppSettings["ADSServerIP"].ToString(), usertype);
            UserPrincipal User = UserPrincipal.FindByIdentity(PrincipalContext, userid);
            User.ChangePassword(strOldPassword, newpassword);