Test VBScript retourne UNKNOWN:-- - VB/VBA/VBS - Programmation
Marsh Posté le 16-04-2017 à 20:34:11
Salut,
Oui il faut 3 arguments à ce script, en 1 le répertoire en 2 le seul de warning et en 3 le seuil critique, si tu as pas besoin des 2 derniers arguments tu changes comme ça:
Dim strfolder
Dim intwarning
Dim intcritic
Dim wsh
Dim intvelkost
Dim intjednotka
Dim Perf_Data
'##########################################################'
Set objFSO = CreateObject("Scripting.FileSystemObject" )
Set wsh = CreateObject("WScript.Shell" )
'##########################################################'
If Wscript.Arguments.Count = 1 Then
strfolder = Wscript.Arguments(0)
Set objFolder = objFSO.GetFolder(strfolder)
intjednotka = 1048576 '1MB->bytes'
intvelkost = objFolder.Size/intjednotka
Perf_Data = "|'FolderSize'=" & round (objFolder.Size / 1048576,1) & "MB;"
Wscript.Echo "OK:" & round (objFolder.Size /1048576,1) & " MB" & Perf_Data
Wscript.Quit(0)
end if
Marsh Posté le 18-04-2017 à 11:59:22
Merci de ta réponse aldo13000 mais finalement j'ai trouver la solution à mon problème
Marsh Posté le 13-04-2017 à 10:55:36
Bonjour,
J'ai un nagios 4.1 installé sous centos 6.8 et sur la machine distante j'ai nsclient 0.5 d'installé
je dois mettre en place une vérification de taille d'un dossier sur une machine windows 7, je veux utilisé le script vbs suivant
https://exchange.nagios.org/directo [...] bs/details
Du coup j'ai le télécharger et je le copier sur la machine windows où est installé le nsclient (C:\Program Files\NSClient++\scripts)
J'ai tester d'abord le script en local depuis l'invite de commandes
c:\Programm Files\NSClient++>scripts\check_folder_size.vbs
j'ai le résultat suivant : https://drive.google.com/file/d/0B3 [...] sp=sharing
et le "echo %ERRORLEVEL%" me retourne 0
Doit-je modifier le script pour ajouter l'emplacement du dossier à supervisé ? si oui comment ?
Je tient à préciser que je n'y connais pas grand chose en VBScript
Merci de votre aide