Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: Cd-Rom Добавлено: 23.11.02 22:07  

Автор вопроса:  Matrix | Web-сайт: delta-net.narod.ru

Как заставить CD-Rom програмно заглотить/выплюнуть диск?

Ответить

  Ответы Всего ответов: 5  

Номер ответа: 1
Автор ответа:
 Mister U



ICQ: 809526 

Вопросов: 49
Ответов: 63
 Web-сайт: stihi.h12.ru
 Профиль | | #1
Добавлено: 23.11.02 22:15

На этом сайте в разделе "Библиотека кодов" есть один код на эту тему. Вот ссылка прямо на него:

http://vbnet.ru/faq/showtopic.asp?id=223

Ответить

Номер ответа: 2
Автор ответа:
 Matrix



Вопросов: 34
Ответов: 62
 Web-сайт: delta-net.narod.ru
 Профиль | | #2
Добавлено: 24.11.02 13:01

Да, пример есть. Но у меня он не работает (у меня XP и 2 CD-Roma)

Ответить

Номер ответа: 3
Автор ответа:
 Виталиум



Вопросов: 9
Ответов: 10
 Web-сайт: www.infosoft.tk
 Профиль | | #3
Добавлено: 27.11.02 09:32

Да ни фига и под XP и под все шо хош идет.

Вот так надо:

Declare Function mciSendString Lib "winmm.dll" _

Alias "mciSendStringA" (ByVal lpstrCommand As String, _

ByVal lpstrReturnString As String, ByVal uReturnLength As Long, _

ByVal hwndCallback As Long) As Long

mciSendString "Set cdaudio door open wait", 0, 0, 0

mciSendString "Set cdaudio door closed wait", 0, 0, 0

Ответить

Номер ответа: 4
Автор ответа:
 Matrix



Вопросов: 34
Ответов: 62
 Web-сайт: delta-net.narod.ru
 Профиль | | #4
Добавлено: 01.12.02 18:48
Ну НЕ работает! Заколебался уже....

Ответить

Номер ответа: 5
Автор ответа:
 Rebel



Вопросов: 32
Ответов: 50
 Web-сайт: rebel.bos.ru
 Профиль | | #5
Добавлено: 05.12.02 03:06

кстати, в "mciSendString "Set cdaudio door open wait", 0, 0, 0" приписывать "wait" совсем не обязательно - работает и без него (Проверялось на Win2k и .NET RC1)

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам