0
関数結果から文字列を返そうとしましたオブジェクトが必要ですエラー。 は、Windows 2003注上でこのコードを実行:W2K3に、Win32_OperatingSystem
は 我々はFor Each .../Exit Function
VBScriptランタイムエラー:オブジェクトが必要(Windows 2003)
Function GetLocalTime()
Dim wmi, itm
Set wmi = GetObject("winmgmts:root\cimv2")
For Each itm in wmi.ExecQuery("SELECT * FROM Win32_OperatingSystem")
' NEXT LINE THROWS 'Object required' error
GetLocalTime = itm.LocalDateTime
Exit Function
Next
End Function
Dim started : Set started = GetLocalTime
WScript.Echo "started " & started