Привожу заготовку скрипта, проверяющего наличие файла. В качестве пути можно использовать как локальный путь вида диск:\\папка\файл, так и UNC-путь вида \\хост\ресурс\папка\файл.
Option Explicit
On Error Resume Next
'Объявляем переменные
Dim objFSO, strFlagFile
'Создаём объект файловой системы
Set objFSO = CreateObject("Scripting.FileSystemObject")
'Задаём путь к файлу-флагу
strFlagFile = "путь_к_файлу\flag.file"
'Проверка наличия файла
If objFSO.FileExists(strFlagFile) Then
WScript.Echo "File Exist!"
Else
WScript.Echo "File Not Exist!"
End If
WScript.Quit 0
Комментариев нет:
Отправить комментарий