Hi guys i got following error while i am running my program
here is the code scratch where i got an exception :
Try
Dim de As New DirectoryEntry( "LDAP://xxx/dc=xxx,dc=com", "aaa", "secret")
Dim MyAttributes As PropertyCollect ion
Dim MyAttributeName As String
Dim myValue As String
Dim MyAttributeValu es As PropertyValueCo llection
MyAttributes = de.Properties
For Each MyAttributeName In MyAttributes.Pr opertyNames
MyAttributeValu es = MyAttributes(My AttributeName)
Console.WriteLi ne("------------------------------")
For Each myValue In MyAttributeValu es
Console.WriteLi ne(CType(MyAttr ibuteName, String) & " : " & CType(myValue, String))
Next
Next
Catch ex As Exception
Console.WriteLi ne("ex: " + ex.Message)
End Try
Where is the wrong section ?
please help me guys
any help would be totally appreciated ....
here is the code scratch where i got an exception :
Try
Dim de As New DirectoryEntry( "LDAP://xxx/dc=xxx,dc=com", "aaa", "secret")
Dim MyAttributes As PropertyCollect ion
Dim MyAttributeName As String
Dim myValue As String
Dim MyAttributeValu es As PropertyValueCo llection
MyAttributes = de.Properties
For Each MyAttributeName In MyAttributes.Pr opertyNames
MyAttributeValu es = MyAttributes(My AttributeName)
Console.WriteLi ne("------------------------------")
For Each myValue In MyAttributeValu es
Console.WriteLi ne(CType(MyAttr ibuteName, String) & " : " & CType(myValue, String))
Next
Next
Catch ex As Exception
Console.WriteLi ne("ex: " + ex.Message)
End Try
Where is the wrong section ?
please help me guys
any help would be totally appreciated ....
Comment