VBS in Delphi: Domäne auslesen mit RootDSE

[Piro]

Hi,

es ist bestimmt ganz einfach aber ich komm nicht drauf.

Folgenden VBS-Code würde ich gerne in Delphi verwenden.

Code:

Set objRootDSE = GetObject("LDAP://rootDSE")
set strDomainName = objRootDSE.Get("defaultNamingContext")
...

Ich komme einfach nicht weiter und weiß nicht wie ich es umsetzen soll. Derzeit schreibe ich es manuell. Wie z.B.: strDomainName := 'DC=xxx,DC=xxx,DC=xxx'.

Ich hoffe mir kann einer helfen und vielen Dank im voraus.

Gruss, Sven