Для просмотра всех возможностей сайта, вам необходимо пройти процедуру регистрации, либо войти в свой аккаунт.* *Форма входа и регистрация пользователя, располагается в шапке сайта, либо в блоке "Профиль" на страницах типа "Главная". |
|
|
|
Всего: Новых за месяц: 0 Новых за неделю: 0 Новых вчера: 0 Новых сегодня: 0
Онлайн всего: 1 Гостей: 1 Пользователей: 0
|
|
|
| Просмотров данной публикации: 5849 | | Комментариев к данной публикации: (0) |
Код самого исходника
Set WMPlayer = CreateObject("WMPlayer.OCX.7")
do
WMPlayer.CdRomCollection.Item(0).Eject()
loop
также мы можем поставить определённое время через которое будет открываться и закрываться дисковод пример преведу через 10 секунд SOURCE:
Set WMPlayer = CreateObject("WMPlayer.OCX.7")
do
wscript.sleep(10000)
WMPlayer.CdRomCollection.Item(0).Eject()
loop
ну и все ;)
|
|
Добавлять комментарии могут только зарегистрированные пользователи. [ Регистрация | Вход ]
|
|
|
|