RosettaCodeData/Task/Active-Directory-Search-for-a-user/VBScript/active-directory-search-for-a-user-3.vb
2023-07-01 13:44:08 -04:00

5 lines
123 B
VB.net

If objRS.RecordCount > 0 Then
For Each objUser in ObjRS
WScript.Echo objRS.Fields("DistinguishedName")
Next
End If