通过zabbix实现对Windowx监控,如WinXP、Win2003、Vista、Win8、Win7……
2 篇帖子 分页: 1 / 1
帖子xiaobu » 2014年 5月 7日 15:39 星期三
有些时候我们可能需要监控特定文件夹下是否有文件pending超过一段时间,这种时候zabbix自带的功能就无能为力了,这里共享一个我用的vbscript 脚本. 有两个参数,第一个是所监控的文件夹名,第二个是规定文件超过多少秒数。

代码: 全选
' vbs script to monitor file timestamp in a folder
'
On Error Resume Next

Dim objFSO, objFolder, colFiles, objFile, objStartFolder
Dim CurrentTime, TimeDiff, BodyText, FailCounter,TimeThreshold
Set objFSO = CreateObject("Scripting.FileSystemObject")
CurrentTime = Now()

' Path to monitor
objStartFolder = Wscript.Arguments.Item(0)
TimeThreshold = Int(Wscript.Arguments.Item(1))

If WScript.Arguments.Count = 0 Then
    WScript.Echo "Missing Parameters."
Else
   Set objFolder = objFSO.GetFolder(objStartFolder)
   Set colFiles = objFolder.Files
   FailCounter = 0
   For Each objFile in colFiles
      TimeDiff = DateDiff("s", objFile.DateLastModified, CurrentTime)
      If TimeDiff > TimeThreshold Then
            'The ReadAll method reads the entire file into the variable BodyText
            BodyText = BodyText & Chr(13) & Chr(10) & objStartFolder & "\" & objFile.Name & " - no pudate over(mins):" & Round(TimeDiff/60,2)
            FailCounter = FailCounter + 1
      End If
   Next

   If FailCounter > 0 Then
      WScript.Echo BodyText
    Else
        WScript.Echo "NoPending"
   End IF
End If
帖子oulin_hl » 2014年 5月 11日 10:55 星期天
很好的idear,谢谢共享!
代码: 全选
ZABBIX中文论坛
欢迎热爱zabbix的网友们,在此我们可以一起探讨、交流、沟通zabbix的所有操作与问题!
2 篇帖子 分页: 1 / 1

登录

在线用户

正在浏览此版面的用户:没有注册用户 和 1 位游客