Test VBScript retourne UNKNOWN:--

Test VBScript retourne UNKNOWN:-- - VB/VBA/VBS - Programmation

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

Reply

Marsh Posté le 13-04-2017 à 10:55:36   

Reply

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


---------------

Reply

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

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed