检测系统是否为检查版本(Checked)

<<Windows internals 5th editon>> page 48.

strComputer="."
Set objWMIService = GetObject("winmgmts:"_
&"{impersonationLevel = impersonate}!\\"&strComputer &"\root\cimv2")
Set colOperatingSystem = objWMIService.ExecQuery _
("SELECT * FROM Win32_OperatingSystem")
For Each objOperatingSystem in colOperatingSystem
 Wscript.Echo "Caption: " & objOperatingSystem.Caption
 Wscript.Echo "Debug: " & objOperatingSystem.Debug
 Wscript.Echo "Version: " & objOperatingSystem.Version
Next
☆版权☆

* 网站名称:obaby@mars
* 网址:https://nai.dog/
* 个性:https://oba.by/
* 本文标题: 《检测系统是否为检查版本(Checked)》
* 本文链接:https://nai.dog/2010/04/1463
* 短链接:https://oba.by/?p=1463
* 转载文章请标明文章来源,原文标题以及原文链接。请遵从 《署名-非商业性使用-相同方式共享 2.5 中国大陆 (CC BY-NC-SA 2.5 CN) 》许可协议。


You may also like

发表回复

您的电子邮箱地址不会被公开。 必填项已用 * 标注