vbs脚本监视IIS的服务运行状态(若服务停止，自动启动服务)

vbs脚本监视IIS的服务运行状态(若服务停止，自动启动服务)

作者：网上收集点击：读取中... 次

引用代码：strComputer = "."
Set objWMIService = GetObject _
  ("winmgmts:{authenticationLevel=pktPrivacy}\\" _
    & strComputer & "\root\microsoftiisv2")

While (True)
Set colItems = objWMIService.ExecQuery("Select * From IIsWebServer Where Name = 'W3SVC/1'")
    For Each objItem in colItems
    WScript.Echo objItem.ServerState & " " & Now & " "
        If objItem.ServerState = 4 Then
    WScript.Echo "! 网站服务停止尝试启动..."
          objItem.Start()
    WScript.Echo "! 网站服务已被成功启动..."
        End If
    Next
    WScript.Sleep 10000
Wend

10秒检测一次默认网站，若服务停止，自动启动服务。

收藏此文章　　　　　打印更新　　　　　编辑此文章　　　　『关闭窗口』


	家园个人文集		http://www.5x54.com