Board logo

标题: 30元求VBS大神实现win7服务检测! [打印本页]

作者: pinghoo    时间: 2016-8-31 09:37     标题: 30元求VBS大神实现win7服务检测!

要求VBS脚本实现每五分钟检测某项服务是否停止,如果被停止则启动服务,环境:Win7
尽量CPU占用率低些
交易方式:不限 微信支付宝手机充值都可以
联系方式:QQ 27505037
30元
作者: pcl_test    时间: 2016-8-31 12:39

  1. Set wmi = GetObject("winmgmts:\\.\root\cimv2")
  2. sname = "Print Spooler"  '指定服务名称
  3. Do while true
  4.     Set Items = wmi.ExecQuery("Select * From Win32_Service where DisplayName='"&sname&"'")
  5.     For Each Item In Items
  6.         If Item.State = "Stopped" Then Item.StartService()
  7.     Next
  8.     WSH.Sleep 1000*300
  9. Loop
复制代码

作者: pinghoo    时间: 2016-8-31 13:22

回复 2# pcl_test

谢谢版主大大,也同时收到另外一份投稿了,没事,怎么支付给你




欢迎光临 批处理之家 (http://www.bathome.net/) Powered by Discuz! 7.2