G
Guest
hi all
i get a error when update user attributes
the error is "General access denied error "
the code is
Dim strAttrName As String = Me.TextBox1.Text
Dim strAttrValue As String = Me.TextBox2.Text
Dim objADObject As New
DirectoryEntry("LDAP://CN=ukosucu1,CN=Users,DC=proje,DC=com")
Dim strOldValue As String
Try
If objADObject.Properties(Me.TextBox1.Text).Count > 0 Then
'özelligin degerini okuma
-
objADObject.Properties("givenName")(0) ="new value"
Else
objADObject.Properties("givenName").Add("new value")
End If
objADObject.CommitChanges()
Catch objExp As Exception
'MsgBox("Error setting object: " & strADsPath)
MsgBox("Error: " + objExp.Message)
Return
End Try
can you help me?
i get a error when update user attributes
the error is "General access denied error "
the code is
Dim strAttrName As String = Me.TextBox1.Text
Dim strAttrValue As String = Me.TextBox2.Text
Dim objADObject As New
DirectoryEntry("LDAP://CN=ukosucu1,CN=Users,DC=proje,DC=com")
Dim strOldValue As String
Try
If objADObject.Properties(Me.TextBox1.Text).Count > 0 Then
'özelligin degerini okuma
-
objADObject.Properties("givenName")(0) ="new value"
Else
objADObject.Properties("givenName").Add("new value")
End If
objADObject.CommitChanges()
Catch objExp As Exception
'MsgBox("Error setting object: " & strADsPath)
MsgBox("Error: " + objExp.Message)
Return
End Try
can you help me?