- - PR -
パスワード有効期間の設定方法
1
投稿者 | 投稿内容 |
---|---|
|
投稿日時: 2008-04-12 17:13
現在、VB.NET(Visual Studio2005)で
Windowアプリケーションの開発を行っています。 セキュリティーポリシー内にあるパスワード有効期間取得は 下記のサイトにより解決したのですが、 http://pwp1.atcms.jp/mokurin/index.php?ADSI%2F%A5%D1%A5%B9%A5%EF%A1%BC%A5%C9 パスワード有効期間の設定方法がわかりません。 ご存知の方がいましたら教えて頂けないでしょうか?。 宜しくお願いします。 |
|
投稿日時: 2008-04-14 21:10
自己解決しました。
Dim oDomain As ActiveDs.IADsDomain ------------------------------------------------- パスワード有効期間取得 oDomain = GetObject("WinNT://" & ドメイン名) PwdDays = oDomain.MaxPasswordAge / 86400 ------------------------------------------------- パスワード有効期間設定 oDomain = GetObject("WinNT://" & ドメイン名) oDomain.MaxPasswordAge = CInt(strNewTerm) * 86400 oDomain.SetInfo() ------------------------------------------------- |
1