检测虚拟机模块源码

wallet · 发表于 2021-6-3 16:53:59

mcxiaoquan 发表于 2021-6-3 01:47
看不懂，那个http链接是什么，我访问让我下载东西，那个是干嘛的，另外，这个网页源码有吗，我怕挂了。 ...

Function IsVMHost()
Dim wmiObjSet, obj
Set wmiObjSet = GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf("Win32_Processor")
For Each obj In wmiObjSet
IsVMHost = obj.L3CacheSize = 0
Next
End Function

复制代码

这就是 HTTP 内容，HTTP 是方便检测是否联网，

流浪的三毛 · 发表于 2021-6-3 01:47:37

看不懂，那个http链接是什么，我访问让我下载东西，那个是干嘛的，另外，这个网页源码有吗，我怕挂了。

wallet · 发表于 2021-6-1 05:17:25

a13149057125 发表于 2021-5-30 15:21
谢谢了我测试了一下可以放蓝奏云微云和百d云等网盘里面就是需要解析直链才能读取 ...

用网盘太慢烦了，还不如就用我提供的

124149449 · 发表于 2021-5-31 01:04:47

感谢你的支持，精易有你更精彩

124149449 · 发表于 2021-5-31 01:01:42

大神，请收下我的膝盖

a13149057125 · 发表于 2021-5-30 15:21:46

wallet 发表于 2021-5-29 16:28
没有可以设置常量或者就用我的，我的很稳定 TX云1年刚买的

谢谢了我测试了一下可以放蓝奏云微云和百d云等网盘里面就是需要解析直链才能读取

wallet · 发表于 2021-5-30 15:06:23

不许人间见白头发表于 2021-5-27 13:08
真的能用？》》》》》》》》》》》》》》

那是必须的。

wallet · 发表于 2021-5-29 16:28:21

a13149057125 发表于 2021-5-29 08:56
没有服务器就很尴尬了

没有可以设置常量或者就用我的，我的很稳定 TX云1年刚买的

a13149057125 · 发表于 2021-5-29 08:56:54

wallet 发表于 2021-5-29 01:33
恩，你也可以将脚本放你自己的服务器改URL 就可以，

没有服务器就很尴尬了

wallet · 发表于 2021-5-29 01:33:42

a13149057125 发表于 2021-5-28 12:49
那个地址是你的服务器吗？

恩，你也可以将脚本放你自己的服务器改URL 就可以，

		自动登录	找回密码
密码			注册

[易源码分享] 检测虚拟机模块源码