Перейти из форума на сайт.

Новости • Файловые архивы
Поиск • Активные темы • Топ лист
Правила • Кто в on-line?
Вход • Забыли пароль? • Первый раз на этом сайте? • Регистрация
Компьютерный форум Ru.Board » Компьютеры » В помощь системному администратору » Автозапуск скрипта при вставке диска

Модерирует : lynx, Crash_Master, dg, emx, ShriEkeR

 Версия для печати • Подписаться • Добавить в закладки

Открыть новую тему     Написать ответ в эту тему

TigerHeart004

Newbie		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Итак, условие задачи:
Есть сервер. Без монитора, клавы и мышки, но с DVD-приводом.
Задача:
Необходимо, чтобы каждый раз, как только кто-нибудь вставит диск в привод, запускался определённый скрипт.
 
Зачем это нужно (если кому-то интересно).
Клиенты приносят материалы на CD/DVD дисках. Я их сбрасываю на свой комп, и затем копирую по сети на сервер, где с ними уже работают сотрудники.
Задолбали уже с этими дисками. Хочу просто вставлять диск прямо на сервере, и чтобы содержимое диска тут же автоматически копировалось в нужную папку.
Скрипт уже написал, но как его прикрутить к событию вставки диска в привод (или хотя бы к закрытию лотка) - ума не приложу. ((
Всего записей: 9 | Зарегистр. 19-05-2017 | Отправлено: 12:47 10-01-2019 | Исправлено: TigerHeart004, 12:54 10-01-2019
DenSyo

Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
на vbs

Код:
Dim todo: todo = true   'если true - вставленный до запуска скрипта диск в приводе будет обработан, если false - проигнорирован  
Dim fso, drv
Set fso = CreateObject("Scripting.FileSystemObject")
Set drv = fso.GetDrive("F:\")  'ваш cd-диск
 
Do
  If drv.IsReady Then
    If todo Then  
      MsgBox "new CD in"  'ваш код копирования
      todo = false
    End If
  Else
    todo = true
  End If
  WScript.Sleep 1000  'следует подобрать эмпирически под свои нужды
Loop

Всего записей: 218 | Зарегистр. 19-01-2008 | Отправлено: 13:20 10-01-2019 | Исправлено: DenSyo, 10:48 11-01-2019
TigerHeart004

Newbie		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Бесконечный цикл, непрерывно работающий, занимающий память и процессорное время ???
Не самое лучшее решение, как мне кажется. (( Или я ошибаюсь ?
Но, если по-другому вообще никак, то спасибо и за это. ))
А факт закрытия лотка привода, случаем, не вызывает какого-либо события ? Можно было бы создать задачу в Планировщике задач "по событию".
Всего записей: 9 | Зарегистр. 19-05-2017 | Отправлено: 09:36 11-01-2019
DenSyo

Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
большая часть событий в системе пораждается подобным образом, сидят резиденты и постоянно что-то мониторят. вы пробовали запускать скрипт, что бы оценить масштабы убытков производительности? чутка поправил вчерашнюю версию, небольшая пауза нужна конечно. а вот пытаться привязаться на событие закрытия лотка плохая идея - между закрытием и готовности диска к чтению проходит очень много времени и скрипт дополнительно нагрузит привод обращениями.
Всего записей: 218 | Зарегистр. 19-01-2008 | Отправлено: 10:33 11-01-2019
TigerHeart004

Newbie		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Вот теперь всё понятно. Спасибо за разъяснение. ))
На счёт паузы - как раз только хотел написать об этом. ))
Кстати, раз уж решение получилось на vbs, то можно будет ещё и открытие лотка с диском прикрутить после копирования. )))
Всего записей: 9 | Зарегистр. 19-05-2017 | Отправлено: 11:19 11-01-2019
DenSyo

Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
а можно еще в журнал событие внести - скопирован диск или как, чтоб все по фэншую было)
решение кстати одинаково подойдет для любых переносных дисков.
Всего записей: 218 | Зарегистр. 19-01-2008 | Отправлено: 11:57 11-01-2019
Открыть новую тему     Написать ответ в эту тему

Компьютерный форум Ru.Board » Компьютеры » В помощь системному администратору » Автозапуск скрипта при вставке диска


Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.B0ard
© Ru.B0ard 2000-2024

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru