Häufig stellt sich die Frage, ob man existierende NT-User für eine bestehende Anwendung
ohne viel Zeitaufwand ( z.B. manuell ) , in eine Datenbank importieren / anzeigen kann.
Die Antwort liefert ADSI !

Beim der Entwicklung sollte man aber darauf achten, dass u.U. mehrere 
Domain-Controller (DC) in der Netzwekumgebung existieren können !

Die Domäne(n) erhält man aus dem Namespace "WinNT", der uns
als Container die Informationen liefert.

Set oDom = GetObject("WinNT:")

Aus dem Container-Objekt oDom kann man nun die User (und Groups) mit
einer For-Each-Schleife ermitteln.

Das untere Beispiel liefert die Benutzer einer oder mehrerer Domäne(n):

<h1> Domänen / Benutzer </h1> <%  Dim oUser   Set oDom = GetObject("WinNT:")  'Create Container-Object for reading Domains      For Each oChildDom In oDom      Set oUser = GetObject("WinNT://" & oChildDom.Name) 'Create Container-Object for reading User    oUser.Filter = Array("User")    'Set filter to get User only     For Each oChildUser In oUser      Response.Write  oChildUser.Class & " from " & oChildDom.Name & ": " & oChildUser.Name & "<br>"'& oChildUser.Fullname & "<br>"           Next    Set oUser = Nothing   Next    %>