[タスク表示]
登録されているタスク(AT コマンドで作成されたもの)を表示します。
定義されているのに、値を返してくれないプロパティもありますね?
コメントにしている部分は、どういう条件で値を返してくれるのか分かりませんでした。
【ソースコード】
[tips0202.vbs]
Option Explicit
On Error Resume Next
Dim strServerName
Dim objWMIService
Dim objSchTasks
Dim objTask
strServerName = "localhost"
Set objWMIService = GetObject("winmgmts:" & _
"{impersonationLevel=impersonate}!\\" & _
strServerName & "\root\cimv2")
Set objSchTasks = _
objWMIService.ExecQuery("select * from Win32_ScheduledJob")
For Each objTask In objSchTasks
WScript.Echo "実行コマンド:" & objTask.Command
WScript.Echo "設定日:" & objTask.DaysOfMonth
WScript.Echo "設定週:" & objTask.DaysOfWeek
WScript.Echo "対話許可:" & objTask.InteractWithDesktop
WScript.Echo "ジョブ番号:" & objTask.JobID
WScript.Echo "状態:" & objTask.JobStatus
WScript.Echo "定期実行:" & objTask.RunRepeatedly
WScript.Echo "開始時刻:" & objTask.StartTime
WScript.Echo ""
Next
Set objSchTasks = Nothing
Set objWMIService = Nothing
【実行結果】
C:\> cscript //NoLogo tips0202.vbs
実行コマンド:C:\Temp\Test.bat
設定日:
設定週:96
対話許可:True
ジョブ番号:1
状態:Success
定期実行:True
開始時刻:********103000.000000+540