Avatar billede driis Nybegynder
10. oktober 2000 - 14:12 Der er 5 kommentarer og
3 løsninger

Eject af CD

Hvordan får man et CD-drev til at skubbe skuffen ud i VB, hvis man kender drevets drevbogstav?
Avatar billede sjensen Nybegynder
10. oktober 2000 - 14:27 #1
Se på det windows api-kald der hedder:

IOCTL_STORAGE_EJECT_MEDIA

Og hvis du har et MediaPlayer komponent til rådighed kan du bruge det til eject.
Avatar billede scb Praktikant
10. oktober 2000 - 15:07 #2
Denne rutine åbner og lukker skuffen til CD-Rom drevet,

Declare Function mciExecute Lib \"winmm.dll\" Alias \"mciExecute\" (ByVal lpstrCommand As String) As Long

Call mciExecute(\"Set CDaudio door open\") \'Åbner dør

Call mciExecute(\"Set CDaudio door closed\") \' Lukker dør


Avatar billede driis Nybegynder
12. oktober 2000 - 14:46 #3
sjensen>> Du har vel ikke et eksempel på brug af det API kald?

scb>> Med dit eksempel, hvordan vælger man så hvilket CD-ROM drev, der skal åbnes, hvis der er flere end ét drev i computeren?
Avatar billede driis Nybegynder
16. oktober 2000 - 01:08 #4
... Jeg kan ikke rigtig bruge svarene her til noget, da jeg har brug for at kunne ejecte et bestemt CD-ROM drev, bestemt udfra drevbogstavet. Med scb\'s forslag ejecter man det CD-ROM drev, der har det \'laveste\' drevbogstav.

Det kan ikke passe, at det ikke kan lade sig gøre??
Avatar billede driis Nybegynder
17. oktober 2000 - 16:42 #5
Der er nu flere point på bordet for løsningen...
Avatar billede dcasso Nybegynder
17. oktober 2000 - 23:32 #6
Der er et godt eksempel på denne side:
http://www.mvps.org/vbnet/code/system/devioejectload.htm

Og dette skulle gerne være svar nok
Avatar billede driis Nybegynder
18. oktober 2000 - 17:45 #7
dcasso>> Det virker kun i NT / 2000. Jeg skal bruge det i Win9x / WinME.
Avatar billede driis Nybegynder
21. oktober 2000 - 22:47 #8
Det lader til, at ingen kan løse problemet, så jeg lukker spørgsmålet. scb og dcasso får lidt af pointene, fordi de var nogenlunde tæt på, men det løste ikke problemet.

Hvis nogen skulle komme i tanker om en metode, er der stadig 100 point for korrekt svar!
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Seneste spørgsmål Seneste aktivitet
I går 21:00 Libre Office Impress Af Frank i Andre styresystemer
I går 11:47 VB script Af Jenshentze i Word
I går 11:21 Popup ved opstart Af mort1 i Windows
04/0918:50 Slet lokal konto Af ErikHg i Windows
04/0916:05 Ændre tal i en celle Af xvid i Excel