ActiveDirectory の履歴(No.15)

ソフトウェア開発 / Active Directory

Active Directory†

Microsoft 公式ページ
- Active Directory TechCenter
- Active Directory フォーラム

↑

ユーザープロパティ†

ツールユーザーオブジェクトのプロパティを表示する
GUI管理ツールから入力可能なプロパティ
ユーザーアカウントコントロール
複雑なパスワード下記の4種類のうち3種類以上を使用する。
- 小文字
- 大文字
- 数字
- 記号

↑

グループプロパティ†

GUI管理ツールから入力可能なプロパティ
- 全般/General

↑

未整理†

↑

現在ログオンしているユーザーの情報を取得する方法†

↑

方法１†

Dim systemInfo as Object = CreateObject("ADSystemInfo")
Dim path as String = "LDAP://" & systemInfo.UserName

Dim entry as DirectoryEntry = New DirectoryEntry(path)
Debug.Print(entry.Properties("sn").Value)
Debug.Print(entry.Properties("givenName").Value)
Debug.Print(entry.Properties("displayName").Value)
Debug.Print(entry.Properties("badPwdCount").Value)

↑

方法２†

Dim path as String = "LDAP://" & UserPrincipal.CUrrent.DistinguishedName

Dim entry as DirectoryEntry = New DirectoryEntry(path)
Debug.Print(entry.Properties("sn").Value)
Debug.Print(entry.Properties("givenName").Value)
Debug.Print(entry.Properties("displayName").Value)
Debug.Print(entry.Properties("badPwdCount").Value)

↑

方法３†

Debug.Print(UserPrincipal.CUrrent.Surname)
Debug.Print(UserPrincipal.CUrrent.GivenName)
Debug.Print(UserPrincipal.CUrrent.DisplayName)
Debug.Print(UserPrincipal.CUrrent.BadLogonCount)

↑

ユーザー名とパスワードが有効かどうかを検証する方法†

↑

方法１†

Dim context As PrincipalContext = New PrincipalContext(ContextType.Domain)
context.ValidateCredentials(userName, password)

Active Directory†

ユーザープロパティ†

グループプロパティ†

SID履歴†

SID履歴とは†

スクリプト†

未整理†

現在ログオンしているユーザーの情報を取得する方法†

方法１†

方法２†

方法３†

ユーザー名とパスワードが有効かどうかを検証する方法†

方法１†