分享一个查看网吧硬件并记录VBS源码

wx_Peter_H4ibI

这个代码可以查看网吧硬件并记录下来的说。
保存的路径在

tempfilter=("\\192.168.3.248\客户机硬件$\"& computername &".txt")

里面，注意自己修改成自己的实际保存路径。
这里使用的是共享路径，记得这个文件夹一定要可以读写。
这个VBS使用方法：
放客户机开机启动里运行。

Set wmi=GetObject("winmgmts:\\")

strComputer = "."
Set objWMIService = Getobject("winmgmts:\\" & strComputer & "\root\cimv2")

'用一个文本来记录硬件信息
Set WshNetwork = WScript.Createobject("WScript.Network")
computername=WshNetwork.ComputerName

'文本信息写入路径
set fso=createobject("scripting.filesystemobject")
tempfilter=("\\192.168.3.248\客户机硬件$\"& computername &".txt")
set tempfile=fso.createtextfile(tempfilter)

'主板
Set board=wmi.instancesof("win32_baseboard")
for each item in board
board2="主板: " & item.Product  
Next
tempfile.writeline(board2)

'CPU
set cpu =objwmiservice.execQuery("select * from win32_processor")
for each item in cpu
cpu2= "CPU : " & item.Name
next
tempfile.writeline(cpu2)

'内存
Set colItems = objWMIService.ExecQuery("Select * from Win32_PhysicalMemory",,48)
For Each objItem in colItems
a=objitem.capacity/1048576
temp=temp+objitem.capacity
n=n+1
Next
memory=temp/1048576
if n=1 then
memory2= "内存: " & n & "条" &a&"M"
else
memory2= "内存: " & n & "条" &a&"M"&" 总计"&memory&"M"
end if
tempfile.writeline(memory2)

'显卡
Set display=wmi.instancesof("Win32_videocontroller")
msg=msg&"显示系统："+Chr(13)
For Each     video In display
msg=msg&video.deviceid&chr(13)&vbTab&video.name&Chr(13)
Next
video2=msg&Chr(13)&"---"+Chr(13)
tempfile.writeline(video2)

'硬盘
set disk =objwmiservice.execQuery("select * from win32_diskdrive")
for each item in disk
disk2= disk2 & item.model &" "
disk1= "硬盘: "
next
tempfile.write(disk1)
tempfile.writeline(disk2)

'网卡
set network =objwmiservice.execQuery("SELECT * FROM Win32_NetworkAdapterConfiguration WHERE IPEnabled = True")
for each item in network
lan="网卡: " & item.description
next
tempfile.writeline(lan)

systeminfo2="时间: " & now
tempfile.writeline(systeminfo2)

momo

666
怎么换了个号

wx_Peter_H4ibI

momo 发表于 2020-10-13 07:12
666
怎么换了个号

微信登录的阿 不能绑定原有号阿....

momo

引用wx_Peter_H4ibI于1 分钟前发表的：
微信登录的阿 不能绑定原有号阿....

小程序跟网页版和APP是独立的。微信登陆分为网页版登陆和小程序版登陆。