mxm199
17-07-2014, 16:12
Здравствуйте товарищи. Подскажите пожалуйста, есть такой скрипт, проверяет доступен файл для записи или нет
On Error Resume Next
Set FSO = CreateObject("Scripting.FileSystemObject")
Set TextStream = FSO.OpenTextFile("c:\tmp\db.rar", 8)
If Err.Number <> 0 Then
WScript.Echo "Access denied"
WScript.Quit
End If
TextStream.Close
работает. Для вывода ответа в консоль запускаю через "cscript file.vbs". Но в консоль выводится не только ответ, но и микрософтсовский копирайт
Сервер сценариев Windows (Microsoft R) версия 5.8
c Корпорация Майкрософт (Microsoft Corp.), 1996-2001. Все права защищены.
Вопрос - как сделать, чтобы в консоль выходил только один ответ "Access denied" ?
Заранее спасибо
On Error Resume Next
Set FSO = CreateObject("Scripting.FileSystemObject")
Set TextStream = FSO.OpenTextFile("c:\tmp\db.rar", 8)
If Err.Number <> 0 Then
WScript.Echo "Access denied"
WScript.Quit
End If
TextStream.Close
работает. Для вывода ответа в консоль запускаю через "cscript file.vbs". Но в консоль выводится не только ответ, но и микрософтсовский копирайт
Сервер сценариев Windows (Microsoft R) версия 5.8
c Корпорация Майкрософт (Microsoft Corp.), 1996-2001. Все права защищены.
Вопрос - как сделать, чтобы в консоль выходил только один ответ "Access denied" ?
Заранее спасибо