Hallo Leute,
ich habe ein Problem mit Active Directory. Ich möchte
ein VBscript Code schreiben, um mein Benutzerkonto in meiner OU auslesen, ob es gesperrt ist oder nicht.
Da ich neu in VBScript bin, brauche ich eure Hilfe.
Und außerdem habe ich ein VBScript Code (Benutzerkonto sperren) im Internet gefunden.
Const ADS_UF_ACCOUNTDISABLE = 2
Set objUser = GetObject_(„LDAP://10.17.171.20/OU=Alongkorn K,OU=BFI12,DC=bitwerk,DC=ks“)
intUAC = objUser.Get(„userAccountControl“)
objUser.Put „userAccountControl“, intUAC OR ADS_UF_ACCOUNTDISABLE
objUser.SetInfo
Ich habe bisschen umgeändert:
Const ADS_UF_ACCOUNTDISABLE = 2
strPfad = „LDAP://10.17.171.20/OU=Alongkorn K,OU=BFI12,DC=bitwerk,DC=ks“
strAdmin = „cn=Administrator,cn=Users,dc=bitwerk,dc=ks“
Set objUser = GetObject(„LDAP:“)
intUAC = objUser.Get(„userAccountControl“)
objUser.Put „userAccountControl“, intUAC OR ADS_UF_ACCOUNTDISABLE
objUser.SetInfo
Aber der läuft nicht. Ich weiß auch nicht, wo das Fehler liegt.
Könnt ihr vielleicht mein VBScript prüfen, wo das Fehler liegen könnte?
Danke im Voraus!