sarnath
Legacy Member
Via volgende code haal ik alle gebruikers uit de active directory op:
Nu zou ik graag van alle gebruikers willen zien of ze zijn ingelogd of niet (wrs bij de properties van AdObj ?).
Weet iemand hoe ik deze kan opvragen, k kan het niet terugvinden.
maw : attributen zoals in deze lijst http://www.computerperformance.co.uk/Logon/VBScript/VBScript_Windows_LDAP_properties.htm, maar dan voor login.
thx
Code:
Dim enTry3 As DirectoryEntry = New DirectoryEntry("LDAP://OU=x,DC=x,DC=x")
Dim Searcher As New DirectorySearcher(enTry3)
Dim AdObj As SearchResult
Searcher.SearchScope = SearchScope.Subtree
Searcher.Filter() = "(ObjectClass=user)"
For Each AdObj In Searcher.FindAll
ComboBox1.Items.Add(AdObj.Properties("CN").Item(0))
Next
Nu zou ik graag van alle gebruikers willen zien of ze zijn ingelogd of niet (wrs bij de properties van AdObj ?).
Weet iemand hoe ik deze kan opvragen, k kan het niet terugvinden.
maw : attributen zoals in deze lijst http://www.computerperformance.co.uk/Logon/VBScript/VBScript_Windows_LDAP_properties.htm, maar dan voor login.
thx
