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

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

Модерирует : KLASS, IFkO

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

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

dg

Moderator-папарацци
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
насколько я знаю, windows может выдвинуть лоток привода cd-rom только получив команду "извлечь" из контекстного меню диска в "проводнике" или "моём компьютере". многие программы делают это своими силами, например, nero по ctrl+e или cdcheck после проверки диска. я знаю, что есть специально оубченные проги, которые сидят в трее и только и умеют, что извлекать компакт. а нет ли способа реализовать это средствами самой ос? как, например, на маках - с клавиатуры?..

Всего записей: 2852 | Зарегистр. 30-05-2002 | Отправлено: 02:01 09-01-2004
retro



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

Цитата:
на маках - с клавиатуры?..
Kлава какая-нибудь "типа" интернет-мультимедиа (у меня, например, KeyMaestro) делает это, причем можно выбрать, какой из них (если 2 и более).

Цитата:
способа реализовать это средствами самой ос?  
Не знаю. Как-то такой задачи не было...

Всего записей: 1746 | Зарегистр. 22-06-2002 | Отправлено: 11:00 10-01-2004
dg

Moderator-папарацци
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
retro
Цитата:
Kлава какая-нибудь "типа"  интернет-мультимедиа (у меня, например, KeyMaestro) делает это, причем можно выбрать, какой из них (если 2 и более).  
интересный способ (ни разу не слышал о таком), но мне не подходит. во-первых, у меня ноут - то есть дополнительных кноп нету и не предвидится (как-то глупо ради одной удобной, но не критичной фичи всюду таскать за собой внешнюю клаву, лол). а во-вторых - ос windows server 2003, а здесь не работают спец.проги даже от простенькой мышки genius netscroll optical (управление кнопками), так что и фичи клавы тоже, наверное, пахать не будут.
 
в общем нужно 100% программное решение, а не на грани с аппаратным.
спасибо за ответ.
 
кстати, есть у меня довольно понтовая клава от того же genuis-а, забыл как называется. там есть и инет-кнопки, и управление проигрывателем, и даже скролл и запуск ворда с экселем, и ещё куча всего. но вот извлечение лотка сидивода нету. хотя если бы знал - купил бы себе такую.

Всего записей: 2852 | Зарегистр. 30-05-2002 | Отправлено: 11:10 10-01-2004
Demetrio

uid=0
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
dg
не совсем то, что ты хочешь, но всё-таки:
 

Цитата:
EJECT v2.02 - Eject the CDROM tray

My mini-tower computer sits on the floor beneath my desk in a spot not easily reachable. It's a pain to reach down and press the button to load and unload CD's. This utility let's me open and close the CD tray from a command line. And it supports multiple CDROM drives (including changers) and ZIP drives.  
Now includes source code!

 
http://www.cmdtools.com/files/eject.zip
размер 8 Кб

Всего записей: 9967 | Зарегистр. 29-05-2002 | Отправлено: 11:29 10-01-2004 | Исправлено: Demetrio, 11:30 10-01-2004
dadu



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
dg
cd_eject.vbs
Это в цикле.. все лотки, какие есть откроет.

Код:
 
Set oWMP = CreateObject("WMPlayer.OCX.7" )
Set colCDROMs = oWMP.cdromCollection
 
if colCDROMs.Count >= 1 then
      For i = 0 to colCDROMs.Count - 1
              colCDROMs.Item(i).Eject
      Next ' cdrom
End If
 

 
А это для одного:
 

Код:
 
Set oWMP = CreateObject("WMPlayer.OCX.7" )
oWMP.cdromCollection.Item(i).Eject
 

 
Сделать на скрипт ярлык или ярлыки (oWMP.cdromCollection.Item(i+1).Eject - для второго CD). Ярлыки в LanchBar и сменить значок ярлыка на более приличный.

Всего записей: 1222 | Зарегистр. 13-11-2002 | Отправлено: 14:08 10-01-2004 | Исправлено: dadu, 15:06 10-01-2004
MetroidZ



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Можно сделать два консольных приложения (Delphi WinAPI).
1е открывает
 
    mciSendString('Set cdaudio door closed wait', nil, 0, handle);  
 
2е закрывает
 
    mciSendString('Set cdaudio door open wait', nil, 0, handle);
   
Включить MMSystem в список используемых модулей (uses).
 
Видел их готовыми на сайте с плагинами к TotalCommander.
А на их ярлыки можно застолбить любую комбинацию клавиш.

Всего записей: 1795 | Зарегистр. 12-07-2003 | Отправлено: 21:36 12-01-2004
dg

Moderator-папарацци
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
dadu
Цитата:
cd_eject.vbs  
во - то, что надо. спасибо.
 
MetroidZ
спасибо, тоже неплохой метод, но скрипты мне нравятся больше. не дружу я как-то с дельфями и вообще с компилируемым программингом.
 
Добавлено
dadu
а обратно задвинуть скриптом можно?..

Всего записей: 2852 | Зарегистр. 30-05-2002 | Отправлено: 05:18 13-01-2004
AITL

Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
dadu
А как WScript.exe из памяти выгружать после выполения?

Всего записей: 1587 | Зарегистр. 11-10-2002 | Отправлено: 11:57 13-01-2004
oia



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
скачай прожку cdslow там ты можеш настроить ноткеи на смену скорости чтения сидюка выдвинуть или закрыть лоток  

Всего записей: 977 | Зарегистр. 03-10-2002 | Отправлено: 05:28 18-01-2004
dadu



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
AITL
Да остается висеть в памяти...  в чем трабла не понял  
 
Приношу пардоны.
 
к сожелению моих знаний не хватает... может кто поможет разобраться.
 
Еще варианты http://home.att.net/~wshvbs/
 
есть действительно хороший, в том числе с закрыванием лотка.

Всего записей: 1222 | Зарегистр. 13-11-2002 | Отправлено: 13:22 18-01-2004
Solenaja



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
мне CDSLow не подходит - глючить начало недавно
Разве никаких стандартных методов извлечения лотка нет, странно даже как то

----------
Могу помочь, но только своими знаниями и ...

Всего записей: 4246 | Зарегистр. 02-09-2001 | Отправлено: 20:31 15-06-2004
farAce



Advanced Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
dg
Есть прога CDEject, 9кб, при использовании в памяти не остается, а команда еще проще, чем у проги EJECT, тем более, что она одномоментно может работать только с одним сидюком: cdeject d (выдвинуть диск "d"), cdeject -d (закрыть), cdeject d -e (выдвинуть "d", закрыть "e"), поддерживает и другие команды. Удобно через Run. Много прог с таким же названием, если нужно скину.

----------
-=далекОснова=-

Всего записей: 795 | Зарегистр. 17-04-2002 | Отправлено: 21:36 15-06-2004 | Исправлено: farAce, 21:37 15-06-2004
KADABRA



Великий покусатель
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Solenaja
Можно так: _http://kadabra.land.ru/cdopen.html
(Если ИЕ)

----------
Это не подпись.

Всего записей: 1718 | Зарегистр. 14-07-2003 | Отправлено: 20:56 17-06-2004
dg

Moderator-папарацци
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Модифицированный скрипт от dadu
Код:
CreateObject("WMPlayer.OCX.7").cdromCollection.Item(i+Wscript.arguments.Item(0)).Eject
Wscript.CreateObject("Wscript.Shell").Run "taskkill /im wscript.exe /f"
  • сокращён на строку благодаря устранению переменной
  • принимает номер выдвигаемого привода в качестве параметра (для извлечения первого привода — eject.vbs 0, второго — eject.vbs 1 и так далее)
  • Завершает за собой процесс wscript.exe (наверное, это совсем некорректно, но работает)
     
    farAce
    Цитата:
    Есть прога CDEject
    Спасибо, таких программ — туча. Но условием задачи было обойтись встроенными средствами ОС.
     
    По-прежнему заинтересован в скрипте для задвигания лотка обратно.

  • Всего записей: 2852 | Зарегистр. 30-05-2002 | Отправлено: 19:23 19-06-2004 | Исправлено: dg, 09:52 21-06-2004
    bigsmaleman



    Junior Member
    Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    dg
     
    Есть вариант кривой времянки
     

    Цитата:
    Set oWMP = CreateObject("WMPlayer.OCX.7" )  
    Set colCDROMs = oWMP.cdromCollection  
     
    if colCDROMs.Count >= 1 then  
          For i = 0 to colCDROMs.Count - 1  
                  colCDROMs.Item(i).Eject  
          Next ' cdrom  
    End If

     
    Если прокопировать последнии 5 строк ещё раз, то лоток откроется и закроется
     
    Так что временно можешь использовать 1 для открытия, а 2 для закрытия

    Всего записей: 179 | Зарегистр. 21-12-2003 | Отправлено: 21:44 22-06-2004
    CemKey



    Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    А нельзя ли доработать эти скрипты, чтоб кликнул и определенный привод открылся, кликнул второй раз закрылся. Только определенный, а не все разом. Всякие програмки и т. д. меня не интересуют, только данные скрипты. И вообще, где по ним инфу найти, а то гуглил и всякая чушь находилась.

    Всего записей: 290 | Зарегистр. 03-04-2006 | Отправлено: 18:47 18-05-2009
    FAleksei

    Newbie
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Для отображения в контекстном меню команды "закрыть лоток" можно просто установить программу Virtual Clone Drive в котнекстном меню автоматом прописывается команда "извлечь" и "закрыть лоток"

    Всего записей: 1 | Зарегистр. 18-03-2011 | Отправлено: 17:17 18-03-2011
    IvnKnz

    Newbie
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    [spam_detected]

    Всего записей: 3 | Зарегистр. 30-07-2013 | Отправлено: 13:15 30-07-2013 | Исправлено: vu1tur, 10:30 27-08-2013
    bredonosec



    Platinum Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    самореклама? Тем более, оффтопом не в том разделе? ))

    Всего записей: 16257 | Зарегистр. 13-02-2003 | Отправлено: 14:36 30-07-2013
    Открыть новую тему     Написать ответ в эту тему

    Компьютерный форум Ru.Board » Операционные системы » Microsoft Windows » windows - извлечение лотка cd-rom (вынуть компакт-диск)


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

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

    BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

    Рейтинг.ru