Getting Active Directory error '80070005' access denied error

I’m trying to update a user account on active directory(Ldap server) using classic ASP code. I get an error saying

Active Directory error '80070005'
Access Denied

But the user account that I’m using in the code to update the AD has both Read/Write permissions. Below is the piece of code. Even I am able to retrieve data using the users account but while writing in the Active Directory I face the issue.

If Not adoRS.EOF Then 
Set objUser = GetObject(adoRS.Fields(0).Value) 
objUser.Put "TMSpersonnelStatus", "N" 
objUser.SetInfo                                         // code fails here, while updating the field 
End If