Привожу заготовку скрипта, проверяющего наличие файла. В качестве пути можно использовать как локальный путь вида диск:\\папка\файл, так и 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
Комментариев нет:
Отправить комментарий