WEB开发网
开发学院服务器虚拟化 [原创]如何检测是否运行在微软的虚拟机中(脚本程... 阅读

[原创]如何检测是否运行在微软的虚拟机中(脚本程序代码)

 2006-08-19 02:18:17 来源:WEB开发网   
核心提示:本站斑竹everin原创 如果有疑问可以来这里和everin交流http://www.xuniji.com/forum/view.asp?id=4590' 如何检测是否运行在微软的虚拟机环境的脚本程序代码'' 下面是微软推荐的检测是否运行在微软虚拟机中的代码' 有需要的人可以参考借鉴&#
本站斑竹everin原创

如果有疑问可以来这里和everin交流http://www.xuniji.com/forum/view.asp?id=4590

' 如何检测是否运行在微软的虚拟机环境的脚本程序代码
'
' 下面是微软推荐的检测是否运行在微软虚拟机中的代码
' 有需要的人可以参考借鉴
' 属于VBscript脚本语言编写
' ----------------------------------------------------------

Dim Manufacturer

strComputer = "."
Set objWMIService = GetObject("winmgmts:" _& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")

Set colItems = objWMIService.ExecQuery("Select * from Win32_BaseBoard")

For Each objItem in colItems
Manufacturer = objItem.Manufacturer
Next

if Manufacturer = "Microsoft Corporation" then
wscript.echo "In Microsoft virtual machine"
else
wscript.echo "Not in Microsoft virtual machine"
end if

Tags:原创 如何 检测

编辑录入:coldstar [复制链接] [打 印]
赞助商链接