Wie man den Namen der eigenen Active Directory Domäne ermittelt

Beim Scripten in Active Directory Umgebungen benötigt man oft den Namen der eigenen Domäne, also der Domäne, in der der Benutzer angemeldet ist, der das Script gerade ausführt - sei es in Form eines LDAP-Pfadnamens, eines (alten) NetBIOS-Namens oder in Form eines voll qualifizierten DNS-Namens.

Der LDAP Pfadname (=Distinguished Name) der eigenen Domäne

Dieses Script findet den LDAP Pfad (=Distinguished Name) der eigenen Domäne:

Set rootDSE = GetObject("LDAP://rootDSE") domainDN = rootDSE.Get("defaultNamingContext") WScript.Echo domainDN

Download Script

Der NetBIOS-Name der eigenen Domäne

Dieses Script findet den NetBIOS-Namen der eigenen Domäne, hierbei werden ausschließlich LDAP-Abfragen verwendet:

Set rootDSE = GetObject("LDAP://rootDSE") domainDN = rootDSE.Get("defaultNamingContext") configDN = rootDSE.Get("configurationNamingContext") Set partitions = GetObject("LDAP://cn=partitions," & configDN) For Each nameSpace In partitions If (nameSpace.nCName = domainDN) Then Exit For Next domainNETBios = nameSpace.nETBIOSName WScript.Echo domainNETBios

Download Script

Die gerade gezeigte Version ist offensichtlich ziemlich kompliziert und steht hier nur zu Demonstrationszwecken. Kürzer geht es mit dem ADSystemInfo COM Objekt:

Set aio = CreateObject("ADSystemInfo") domainNETBios = aio.DomainShortName WScript.Echo domainNETBios

Download Script

Ebenfalls möglich ist die Verwendung des WinNTSystemInfo COM Objects. Ob man dieses oder ADSystemInfo verwendet, hängt davon ab, welche Informationen man noch anderweitig benötigt, die von diesen COM Objekten geliefert werden.

Set wio = CreateObject("WinNTSystemInfo") domainNameNeBIOS = wio.DomainName WScript.Echo domainNETBios

Download Script

The DNS Name der eigenen Domäne

Dieses Script findet den vollqualifizierten DNS-Namen der eigenen Domäne. Wir benutzen hier wieder das ADSystemInfo COM Objekt:

Set aio = CreateObject("ADSystemInfo") domainDNS = aio.DomainDNSName WScript.Echo domainDNS

Download Script

< zurück zu SelfADSI Startseite