将以下复制到记事本然后另存为583GO.vbs
记得修改需要检测的进程名称583GO.com为你自己需要守护的进程。记得点下面的复制代码就可以了 手动复制不正确
监测的服务进程被关闭,要再次启动的时候程序的路径,填入路径记得要填对,比如583go.com的启动路径
启动路径如果包含有Program Files,填写需要这样来写
C:\Progra~1\583go\583go.exe。
Program Files要简写成Progra~1才可识别
- option Explicit
- dim wmi,proc,procs,proname,flag,WshShell,sCheck
- Do
- proname="583go.com" '需要监测的服务进程的名称,自行替换这里的记事本进程名
- set wmi=getobject("winmgmts:{impersonationlevel=impersonate}!\\.\root\cimv2")
- set procs=wmi.execquery("select * from win32_process")
- flag=true
- for each proc in procs
- if strcomp(proc.name,proname)=0 then
- flag=false
- exit for
- end if
- next
- set wmi=nothing
- if flag then
- Set WshShell = Wscript.CreateObject("Wscript.Shell")
- WshShell.Run ("C:\583go.com\583go.com") '监测的服务进程被关闭,要再次启动的时候程序的路径
- end if
- sCheck=5 '检测间隔时间,这里是5秒
- wscript.sleep sCheck*1000
- loop
复制代码
|