WinNT 自定義用戶屬性
WinNT 提供者提供 User 類別的下列自定義屬性。 它們可透過 IADs.Get 和 IADs.Put 方法來存取。 如需詳細資訊，請參閱 USER_INFO_3 結構。
| 屬性 | 類型 | 描述 |
|---|---|---|
| HomeDirDrive | String | 使用者的主目錄磁碟驅動器。 這是 Unicode 字串的指標，指定主目錄的路徑。 字串可以是 Null。 請參閱本主題中的範例。 |
| ObjectSID | 八進位字串 | 用戶的物件 SID。 如需如何使用 WinNT 提供者擷取物件 SID 的範例，請參閱 物件 SID （WinNT 提供者） |
| 參數 | String | 用戶的參數。 指向保留供應用程式使用的 Unicode 字串。 此字串可以是 Null 字串，或者它可以在終止 Null 字元之前具有任意數目的字元。 Microsoft 產品會使用此成員來儲存使用者設定數據。 這個屬性只能在安裝期間由應用程式修改。 |
| PasswordAge | Time | 使用中密碼的時間持續時間。 這個屬性表示自上次變更密碼之後經過的秒數。 |
| PasswordExpired | 整數 | 告知密碼何時過期。 當您使用 Get 時，它會傳回零是密碼尚未過期，如果密碼已過期，則傳回非零。 請參閱本主題中的範例。 |
| PrimaryGroupID | 整數 | 使用者的主要群組標識碼，例如網域使用者群組標識符。 請參閱本主題中的範例。 |
| UserFlags | 整數 | ADS_USER_FLAG_ENUM中定義的用戶旗標。 如需如何使用 UserFlags 的範例，請參閱 密碼永不過期 （WinNT 提供者） |
此範例示範如何設定使用者的主磁碟驅動器目錄。
Dim usr As Object
Set usr = GetObject("WinNT://Fabrikam/jsmith,user")
usr.HomeDirectory = "UserHomeDirHere"
usr.HomeDirDrive = "HomeDirDriveHere"
usr.SetInfo
此範例示範如何使用 PasswordExpired 強制使用者在下次登入時變更密碼。
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
此範例示範如何取得使用者的主要群組。
Dim usr As Object
Dim grpPrimaryID As Object
Set usr = GetObject("WinNT://Fabrikam/jsmith,user")
grpPrimaryID = usr.Get("PrimaryGroupID")