VBS/WSH/JS - [решено] Проверка существования и доступности сетевой папки

[white155]

Мой вариант создать файлик, если файлик не создался, то и ресурс недоступен, есть ли ещё какие способы?

[white155]

white155, так же, как и обычную папку:



Код:

Код: Выделить всё

Option Explicit
Dim strFolder
Dim objFSO
strFolder = "\\server\bla-bla-bla"
Set objFSO = WScript.CreateObject("Scripting.FileSystemObject")
If objFSO.FolderExists(strFolder) Then
    WScript.Echo "Folder [" & strFolder & "] found"
Else
    WScript.Echo "Folder [" & strFolder & "] not found"
End If
Set objFSO = Nothing
WScript.Quit 0