RosettaCodeData/Task/Active-Directory-Search-for-a-user/VBScript/active-directory-search-for-a-user-3.vb

6 lines
123 B
VB.net
Raw Permalink Normal View History

2013-04-10 22:43:41 -07:00
If objRS.RecordCount > 0 Then
For Each objUser in ObjRS
WScript.Echo objRS.Fields("DistinguishedName")
Next
End If