[Xymon] Folder Size

[Neil Simmonds]

Here’s a vbScript you could use, the example would flag red if C:\Data was > 300Mb in size

testName = "Folder"
outputfilename = Replace(testName,".","")
strFilePath="C:\Program Files\BBWin\tmp"
strProcessColour = "green"
Set fso= CreateObject("Scripting.FileSystemObject")

Set f = fso.OpenTextFile(strFilePath & "\" & outputfilename , 8 , True)

dim FSO, objFolder,datafolder, foldername

foldername = "c:\Data"

If fso.FolderExists(foldername ) Then
Set objFolder= FSO.GetFolder(foldername )  'getting folder size objFolder.Size\par
ShowFolderDetails objFolder
    
Sub ShowFolderDetails(oF)
datafolder  = oF.Size / 1048576
    If (datafolder > 300) Then
        strProcessColour = "red"
        f.Write strProcessColour & " " & Date & " " & Time & vbCrLf & vbCrLf
        f.Write "Folder Name       : " & foldername & vbCrLf
        f.Write "Folder Size (Mb)  : " & datafolder & vbCrLf
        f.Write "Folder size exceeeds 300Mb"
    Else
        strProcessColour = "green"
        f.Write strProcessColour & " " & Date & " " & Time & vbCrLf & vbCrLf
        f.Write "Folder Name       : " & foldername & vbCrLf
        f.Write "Folder Size (Mb)  : " & datafolder & vbCrLf
        f.Write "Folder Size OK" 
    End If
End Sub    
End If

f.Close


From: Xymon [mailto:xymon-bounces at xymon.com] On Behalf Of Ray Reuter
Sent: 14 May 2013 12:26
To: Martin Flemming
Cc: xymon at xymon.com
Subject: Re: [Xymon] Folder Size

The host in question is a windows server. I should have mentioned that in the initial thread, I did read previously where it could be done with ease in the non-windows world but have found nothing for windows. It has a cifs share presented to it and we are trying to avoid having that particular folder grow beyond 3GB.

On Mon, May 13, 2013 at 2:42 PM, Martin Flemming <martin.flemming at desy.de><mailto:martin.flemming at desy.de>> wrote:
On Mon, 13 May 2013, Ray Reuter wrote:
Does anyone know of a way to monitor the size of a folder? I am not a programmer so I figured I would reach out to you and see who might have done this already or knows of
someone who has been successful.

Hi !


Something like in

analysis.cfg

HOST=server1
DIR %^/var/log/.* size<2000000 TRACK

and in client-local.cfg

[server1]
dir:`find /var/log -maxdepth 1 -type d`

cheers,
        martin

_______________________________________________
Xymon mailing list
Xymon at xymon.com<mailto:Xymon at xymon.com>
http://lists.xymon.com/mailman/listinfo/xymon

Name & Registered Office: EXPRESS GIFTS LIMITED, 2 GREGORY ST, HYDE, CHESHIRE, ENGLAND, SK14 4TH, Company No. 00718151.
Express Gifts Limited is authorised and regulated by the Financial Services Authority
--------------
NOTE:  This email and any information contained within or attached in a separate file is confidential and intended solely for the 
Individual to whom it is addressed. The information or data included is solely for the purpose indicated or previously agreed. Any 
information or data included with this e-mail remains the property of Findel PLC and the recipient will refrain from utilising the 
information for any purpose other than that indicated and upon request will destroy the information and remove it from their records.  
Any views or opinions presented are solely those of the author and do not necessarily represent those of Findel PLC. If you are not 
the intended recipient, be advised that you have received this email in error and that any use, dissemination, forwarding, printing, 
or copying of this email is strictly prohibited. No warranties or assurances are made in relation to the safety and content of this 
e-mail and any attachments.  No liability is accepted for any consequences arising from it. Findel Plc reserves the right to monitor 
all e-mail communications through its internal and external networks. If you have received this email in error please notify our IT 
helpdesk on +44(0) 1254 303030
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.xymon.com/pipermail/xymon/attachments/20130514/405fa51f/attachment.html>