Freigeben über


Benutzerdefinierte WinNT-Benutzereigenschaften

Der WinNT-Anbieter stellt die folgenden benutzerdefinierten Eigenschaften für die User-Klasse zur Verfügung. Sie können über die methoden IADs.Get und IADs.Put aufgerufen werden. Weitere Informationen finden Sie in der USER_INFO_3-Struktur.

Eigentum Art Beschreibung
HomeDirDrive- Schnur Startverzeichnislaufwerk des Benutzers. Dies ist ein Zeiger auf eine Unicode-Zeichenfolge, die den Pfad des Startverzeichnisses angibt. Die Zeichenfolge kann null werden. Siehe Beispiel in diesem Thema.
ObjectSID- Oktettzeichenfolge Objekt-SID des Benutzers. Ein Beispiel zum Abrufen der Objekt-SID mithilfe des WinNT-Anbieters finden Sie unter Object SID (WinNT Provider)
Parameter Schnur Parameter des Benutzers. Verweist auf eine Unicode-Zeichenfolge, die für die Verwendung durch Anwendungen festgelegt ist. Bei dieser Zeichenfolge kann es sich um eine NULL-Zeichenfolge handeln, oder sie kann eine beliebige Anzahl von Zeichen vor dem endenden Nullzeichen aufweisen. Microsoft-Produkte verwenden dieses Mitglied zum Speichern von Benutzerkonfigurationsdaten. Diese Eigenschaft kann nur während der Installation von einer Anwendung geändert werden.
PasswordAge- Zeit Zeitdauer des verwendeten Kennworts. Diese Eigenschaft gibt die Anzahl der Sekunden an, die seit der letzten Änderung des Kennworts verstrichen sind.
PasswordExpired- Ganze Zahl Gibt an, wann das Kennwort abgelaufen ist. Wenn Sie "Get" verwenden, wird null zurückgegeben, wenn das Kennwort nicht abgelaufen ist oder wenn es abgelaufen ist. Siehe Beispiel in diesem Thema.
PrimaryGroupID- Ganze Zahl Die primäre Gruppen-ID des Benutzers, z. B. Domänenbenutzergruppen-ID. Siehe Beispiel in diesem Thema.
UserFlags- Ganze Zahl Benutzerkennzeichnung in ADS_USER_FLAG_ENUMdefiniert. Ein Beispiel für die Verwendung von UserFlags finden Sie unter Password Never Expires (WinNT Provider)

 

In diesem Beispiel wird gezeigt, wie das Startlaufwerkverzeichnis eines Benutzers festgelegt wird.

Dim usr As Object

Set usr = GetObject("WinNT://Fabrikam/jsmith,user") 
usr.HomeDirectory = "UserHomeDirHere"
usr.HomeDirDrive = "HomeDirDriveHere"
usr.SetInfo

In diesem Beispiel wird gezeigt, wie Sie passwordExpired verwenden, um zu erzwingen, dass ein Benutzer das Kennwort bei der nächsten Anmeldung ändert.

Dim usr As Object

Set usr = GetObject("WinNT://Fabrikam/jsmith,user")
usr.Put "PasswordExpired", CLng(1)
usr.SetInfo 

'--- Clear this flag so that the user does not have to change the password at next logon.

usr.Put "PasswordExpired", CLng(0)
usr.SetInfo

In diesem Beispiel wird gezeigt, wie die primäre Gruppe des Benutzers abgerufen wird.

Dim usr As Object
Dim grpPrimaryID As Object

Set usr = GetObject("WinNT://Fabrikam/jsmith,user") 
grpPrimaryID = usr.Get("PrimaryGroupID")