C++Builder相談室 Part13
■ このスレッドは過去ログ倉庫に格納されています
0138デフォルトの名無しさん
05/03/03 17:20:37C++Builderでも使えるように置き換えたいのですが、全然うまくいきません。
置き換えるのは無理でしょうか?
'OSの情報
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_OperatingSystem")
For Each objItem in colItems
Wscript.Echo "BootDevice: " & objItem.BootDevice
Next
■ このスレッドは過去ログ倉庫に格納されています