ActiveDirectoryからlastLogon情報を引き出すには?


INVENT  2006-07-28 23:20:41  No: 132505

はじめましてこんにちは。
Windows2000 ServerのActiveDirectoryから
ユーザーのlastLogon情報を引き出したいと思っています。

以下のScriptを実行すると

****************************************************************************
Set objUser = GetObject("LDAP://cn=taro yamada,OU=hoge,dc=jp,dc=hoge,dc=com")
Set objLastLogon = objUser.Get("lastLogon")

intLastLogonTime = objLastLogon.HighPart * (2^32) + objLastLogon.LowPart
intLastLogonTime = intLastLogonTime / (60 * 10000000)
intLastLogonTime = intLastLogonTime / 1440

Wscript.Echo "Last logon time: " & intLastLogonTime + #1/1/1601#
****************************************************************************

時間は表示される事はされるのですが
Net user "User Name" /domainで表示される時間と
Scriptを実行した際に表示される時間が合いません。
計算式が間違えているのでしょうか?

自分はScriptの知識がない為、このような質問なのですが
更に欲を言えばScriptを実行した際に、GetObjectのCN,OU,DCを
手動で入力できるようにScriptを組めればと思います。 

Script自体はMSのサイトを参考にしています。
http://www.microsoft.com/japan/technet/scriptcenter/topics/win2003/lastlogon.mspx 

Net Userで参照すればいいのですが、
ある日ログオン日時が表示されなくなった為、
Scriptを組もうと考えています。

どうぞ宜しく御願いいたします。


※返信する前に利用規約をご確認ください。

※Google reCAPTCHA認証からCloudflare Turnstile認証へ変更しました。






  このエントリーをはてなブックマークに追加