1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 strComputer = "." set objWMI = GetObject("winmgmts:\\" & strComputer & "\root\cimv2") set colOS = objWMI.InstancesOf("Win32_OperatingSystem") Set shell = CreateObject("WScript.Shell") Do for each objOS in colOS strReturn = Round(((objOS.TotalVisibleMemorySize-objOS.FreePhysicalMemory)/objOS.TotalVisibleMemorySize)*100) if(strReturn > 90) Then shell.run("shutdown.exe -r -t 0") end if wscript.sleep 1000*1 //这个地方是每隔1秒检测内存使用率,如果要每小时就改成1000*3600 next Loop 把这段代码保存成vbs格式的文件,并添加开机自动启动,可以用组策略, 开始→运行→输入gpedit.msc。 用户配置→管理模板→系统→登录,在右边有个“在用户登录时运行这些程序”,选中刚才保存的vbs文件