获取CPU使用率脚本（vbs），另存为cpu.vbs：
On Error Resume Next
Set objProc = GetObject("winmgmts:\\.\root\cimv2:win32_processor='cpu0'")
Wscript.Echo "CPU 使用率: " & objProc.LoadPercentage & "%"获取内存使用率脚本（vbs），另存为ram.vbs：
strComputer = "."
set objWMI = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
set colOS = objWMI.InstancesOf("Win32_OperatingSystem")
for each objOS in colOS
strReturn = "内存总数: " & round(objOS.TotalVisibleMemorySize / 1024) & " MB" & vbCrLf &"内存可用数: " & round(objOS.FreePhysicalMemory / 1024) & " MB" & vbCrLf &"内存使用率 :" & Round(((objOS.TotalVisibleMemorySize-objOS.FreePhysicalMemory)/objOS.TotalVisibleMemorySize)*100) & "%"
Wscript.Echo strReturn
next获取磁盘使用率脚本（vbs），另存为hard.vbs：
Set fsoobj = CreateObject("Scripting.FileSystemObject")DriversInfo = GetDriversInfoDriversInfo = Replace(DriversInfo, "|", vbCrLf)sReturn ="硬盘信息：" & vbCrLf & DriversInfoWscript.Echo sReturn
Function GetDriversInfo()GetDriversInfo = ""Set drvObj = fsoobj.DrivesFor Each D In drvObjErr.ClearIf D.DriveLetter <> "A" ThenIf D.isReady ThenGetDriversInfo = GetDriversInfo & "分区:" & D.DriveLetter & vbCrLfGetDriversInfo = GetDriversInfo & "可用空间:" & cSize(D.FreeSpace) & vbCrLfGetDriversInfo = GetDriversInfo & "总大小:" & cSize( D.TotalSize) & vbCrLfGetDriversInfo = GetDriversInfo & "使用率 :" & (100*((D.TotalSize-D.FreeSpace)/D.TotalSize)) &"%" & vbCrLfGetDriversInfo = GetDriversInfo & "|"ElseEnd IfElseEnd IfNext
End FunctionFunction cSize(tSize)If tSize >= 1073741824 ThencSize = Int((tSize / 1073741824) * 1000) / 1000 & " GB"ElseIf tSize >= 1048576 ThencSize = Int((tSize / 1048576) * 1000) / 1000 & " MB"ElseIf tSize >= 1024 ThencSize = Int((tSize / 1024) * 1000) / 1000 & " KB"ElsecSize = tSize & "B"End IfEnd Function最后批处理执行以上脚本，另存为“获取CPU、内存和磁盘使用率.bat”
@echo off
echo "正在获取CPU、内存和磁盘使用率，请稍候..."
echo CPU信息：>info.txt
cscript //Nologo cpu.vbs >> info.txt
echo.>>info.txt
echo 内存信息：>>info.txt
cscript //Nologo ram.vbs >> info.txt
echo.>>info.txt
cscript //Nologo hard.vbs >> info.txt执行结果如下：
CPU信息：
CPU 使用率: 22%内存信息：
内存总数: 12132 MB
内存可用数: 7354 MB
内存使用率 :39%硬盘信息：
分区:C
可用空间:64.541 GB
总大小:102.443 GB
使用率 :36.9974772881646%分区:D
可用空间:134.282 GB
总大小:402.132 GB
使用率 :66.6073734064705%分区:E
可用空间:47.56 GB
总大小:300.003 GB
使用率 :84.1468686136043%分区:F
可用空间:48.774 GB
总大小:220.006 GB
使用率 :77.8305072014826%转自：http://www.fendou.info/vbs-get-cpu-harddisk-ram-rate/
：缓存)
)
