Anybody help me setting the password for new ADAM user and enabling the user.

I used the bleow code but throwing an "target invocation exception"
objUser.Invoke("SetPassword", _
New Object() {"ADAMComplexPassword1234"})

To enable the account:

Dim attrib As String = "msDS-UserAccountDisabled"

objUser.Properties(attrib).Value = False

the above code is throwing different exceptions