TePP0PucT
Newbie | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Здравствуйте.
Нужна помощь в создании скрипта.
Требуется скрипт который проверяет папку на наличие нового файла и этот новый файл отправлял на печать(пдф принтер, если это важно), после чего этот файл должен быть вырезан и перемещен в другую папку (также вариант просто с удалением будет неплох, но если есть возможноть лучше в вырезанием).
Дело в том что я скрипты никогда не писал, а на работе внезапно озадачили.
У меня есть вот такое тело скрипта для проверки папки на наличие файла, но так как я не имею опыта в написании скриптов-для меня нарисовалась проблема в дополнении этого тела нужными мне функциями - цикличная проверка каждые 2 минуты, отправка на печать, удаление/перемещение файла. Скрипт нужен vbs с этим видом я хоть как-то уже знаком.
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 |
Всего записей: 7 | Зарегистр. 26-10-2012 | Отправлено: 07:59 26-10-2012 | Исправлено: TePP0PucT, 08:03 26-10-2012 |
|
