如何判断电脑系统是虚拟机还是物理机？（已修改）

清风徐来 · 2017-7-10 19:16:46

本帖最后由清风徐来于 2017-7-26 14:57 编辑

工具：二手主机一台，自制烂大街的鼠标一只，搓衣板牌键盘，易语言。
主要原理：利用易语言，取出Dos的结果，再来判断“Virutal”特殊关键字字符，若寻找到关键字字符“Virutal”的话就是虚拟机，反之没有关键字字符“Virutal”就是物理机。

#f464:

[Dos命令：Systeminfo]

#f472:

老规矩：回复下载！

游客，如果您要查看本帖隐藏内容请回复

至于其他的，就自己看源码咯！

如果您觉得本帖对您有帮助，记得给我加分哦，加分不扣自己的分！

[https://www.guhei.net/post/jb1288]

我一定要把币补回来！
下面是取Dos代码升级版：

.版本 2
.子程序 Take_the_Dos_Execution_Results, 文本型, , 这个子程序返回的，是Dos 的回执结果，Dos命令：Systeminfo | findstr /i "System Model"
.局部变量 SECURITY_ATTRIBUTES, SECURITY_ATTRIBUTES
.局部变量 STARTUPINFO, STARTUPINFO
.局部变量 PROCESS_INFORMATION, PROCESS_INFORMATION
.局部变量 hWrite, 整数型
.局部变量 hRead, 整数型
.局部变量 txt, 字节集
.局部变量 len, 整数型
.局部变量 EXIT, 整数型
.局部变量 retext, 文本型
SECURITY_ATTRIBUTES.nLength ＝ 12
SECURITY_ATTRIBUTES.lpSecurityDescriptor ＝ 0
SECURITY_ATTRIBUTES.bInheritHandle ＝ 1
CreatePipe (hRead, hWrite, SECURITY_ATTRIBUTES, 0)
STARTUPINFO.cb ＝ 68
STARTUPINFO.dwFlags ＝位或 (#STARTF_USESHOWWINDOW, #STARTF_USESTDHANDLES)
STARTUPINFO.wShowWindow ＝ #SW_HIDE
STARTUPINFO.hStdOutput ＝ hWrite
STARTUPINFO.hStdError ＝ hWrite
.如果 (取操作系统类别 () ≤ 2)
CreateProcess (0, “command.com /c Systeminfo”, 0, 0, 真, 0, 0, 0, STARTUPINFO, PROCESS_INFORMATION) ' 代码
.否则
CreateProcess (0, “cmd.exe /c Systeminfo”, 0, 0, 真, 0, 0, 0, STARTUPINFO, PROCESS_INFORMATION) ' 代码
.如果结束
CloseHandle (hWrite)
.判断循环首 (len ≠ -1)
PeekNamedPipe (hRead, 0, 0, 0, len, 0)
.如果 (len ≠ 0)
txt ＝取空白字节集 (1024)
ReadFile (hRead, txt, 1023, len, 0)
retext ＝ retext ＋取字节集数据 (txt, #文本型)
.否则
GetExitCodeProcess (PROCESS_INFORMATION.hProcess, EXIT)
.如果真 (EXIT ≠ #STILL_ACTIVE)
CloseHandle (hRead)
跳出循环 ()
.如果真结束
.如果结束
处理事件 ()
.判断循环尾 ()
返回 (retext)