ネットワーク先PCのログイン情報の取得方法について

質問

コンピュータに疎い人が多い職場で、仕方なくPC管理をやらされています。

休前日やオフィスの停電前などに共用PCの電源を一斉にシャットダウンする方法で、効率的な方法がないか調べています。

【前提】
・対象PCは全てWinXP Pro、自身のドメインユーザーが管理者権限あり
・自分以外の誰かが使用している可能性がある
・素姓の定かではないフリーソフトは使用できない

【現対応】
自作のVBSにて、共用PC全てに対して、

1. Pingを打ち、電源のOn/Off状況を確認する。
例) 一部のみ抜粋
SetAddress = "Select * From Win32_PingStatus Where Address = '" & HOST_NAME(i) & "'"
Set PingSet = objWMIService.ExecQuery (SetAddress)

2. 電源On（オンライン）なら、「shutdown -s -t 0 -f -m \\pc_name」コマンドで
シャットダウンする

という処理を行っています。

【ここから更にやりたいこと】
今のままだと、誰かが使用中かどうかを無視して、強制シャットダウンになってしまっています。
ログイン状態であれば、なにもせず、ログオフ状態の場合のみシャットダウンをかけたいです。

ただし、前提にも書きましたが、会社内の制約で出処のわからないソフトを無暗に使えないため
以下のツールの何れかで対応ができることが嬉しいです。

ツール例） バッチファイル、VBScript、Windows Power Shell、Office VBA

ネットで調べたところ、PowerShellでログイン状況を取得はできるようなのですが、過去に一度ページを見つけたのですがどこか見失ってしまってます・・。

何か良い方法はありますでしょうか？

回答No.1

OMEGAT · ベストアンサー

環境にもよるかもしれませんが、以下のWSHで可能かもしれません。

strComputer = "コンピュータ名"
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * From Win32_ComputerSystem")
For Each objItem in colItems
Wscript.Echo objItem.UserName
Next

[こちらに詳しく説明されているようです]
Hey, Scripting Guy!
http://207.46.16.252/ja-jp/magazine/2007.08.heyscriptingguy.aspx

お礼

早速のご回答ありがとうございます。

自宅環境で、ローカルホストに対して、実行したところ、自分のユーザー名を取得することができました。

これで目的の動作ができるかどうかは、会社が始まってから、
・ログオフ状態で実行したときの取得値の調査
・他PCに対して実行できるか
をドメイン参加環境で試してみたいと思います。

Ping処理も自分で中身が理解できたわけではないのですが、同じような用法で取得できそうで非常に嬉しいです。

どうもありがとうございます！！