Unten füge ich mal den Quelltext des Scripts ein, wenn ich einen lokalen Pfad, anstelle eines UNC-Pfads verwende, gibt PRTG den gewünschten Wert zurück. Sobald ich einen UNC Pfad benutze, wird immer in Else gesprungen. Am Script selbst liegt es nicht, da es sich ausführen lässt und immer (sowohl lokal als auch per UNC) den richtigen Wert zurück liefert. Muss ich noch etwas anderes beachten, damit das funktioniert?

Dim Path, Name, Ending, FullPath
Path = "\\Server\Freigabename\Ordnerpfad"
Name = "Dateiname.Ende"

Dim YesterdayReverse, TodayForPath, YesterdayForPath, DayOfYesterday

TodayForPath = Date
YesterdayForPath = DateAdd("d", -1, TodayForPath)
YesterdayCleaned = Replace(YesterdayForPath," ","")
SplitOfYesterday = Split(YesterdayCleaned,".",3)

YesterdayReverse = SplitOfYesterday(2) & SplitOfYesterday(1) & SplitOfYesterday(0)

Dim SplitOfName 

SplitOfName = Split(Name,".",2)

FullPath = Path & "\" & SplitOfName(0) & YesterdayReverse & "." & SplitOfName(1)	

Set Fso = CreateObject("Scripting.FileSystemObject")

WScript.Echo FullPath

If Fso.FileExists(FullPath) Then
	WScript.Echo "0:OK"
	WScript.Quit("0")
Else
	WScript.Echo "1:Systemfehler"
	WScript.Quit("2")
End If

Article Comments

Eventuell ein Berechtigungsproblem? PRTG läuft normalerweise mit dem Konto SYSTEM, eventuell fehlen hier Berechtigungen, auf Netzwerkpfade zuzugreifen.


Jan, 2015 - Permalink

auf dem selben Konto kann ich wie bereits oben geschrieben aber das Script manuell ausführen und bekomme den richtigen Wert zurück, kann demnach nicht daran liegen.


Jan, 2015 - Permalink

Sehr geehrter Anwender

Vielen Dank für den Einsatz von PRTG. Haben Sie für den Custom-Sensor die Windows-Credentials eingegeben mit denen Sie das Skript auf der Konsole testen?


Jan, 2015 - Permalink

Danke für den Hinweis, dadurch habe ich den Fehler gefunden. Beim Gerät waren die richtigen Credentials nämlich nicht mehr eingetragen. Der eingetragene Benutzer war neuerdings kein Admin mehr.


Jan, 2015 - Permalink