CD-rom softwarematig dichtdoen

[Neo_2000]

Ik zit met 't volgende probleem, ik kan m'n cd-rom wel via windows opendoen. Maar ik kan 'm niet via windows dichtdoen. Heeft windows hier één of andere parameter voor.
BTW. ik draai windows XP

[Klippy]

Kan wel. Heb zo'n knopje op toetsenbord om te openen en sluien, dus zit ingebbouwd. Maar kan 't in XP niet testen, primary CD is slot-in en kan alleen primary daarmee bedienen.

[Bierkameel]

Humz ik moest eerst ff denken of dat wel kan maar als de standaard windows cd speler het al kan dan zal er ook wel een proggie voor zijn

* Bierkameel zal eens ff zoeken...

[Neo_2000]

Ja, zo zat ik ookal te denken, want met de CD-speler lukt 't wel. Maar dat is een beetje omslachtig.

[Neo_2000]

^kick^

[Bigs]

Volgens mij is het gewoon het Eject-commando wat je stuurt.

[wibblemoo]

rechtermuisknop op je drive, en dan eject of uitwerpen of iets wat in de richting komt

[Neo_2000]

Op vrijdag 28 september 2001 17:08 schreef wibblemoo het volgende:
rechtermuisknop op je drive, en dan eject of uitwerpen of iets wat in de richting komt

Ja, dan doe je 'm open. Ik wil 'm graag softwarematig weer dicht doen.

[HermeS]

als ie open staat, dan nogmaals er opdrukken gaat ie dicht

[Verwijderd]

Hiermee kan dat.

[Nietzman]

Op vrijdag 28 september 2001 17:50 schreef meggelaar het volgende:
Hiermee kan dat.

die maaktum hier alleen maar open

[brammetje]

dat kan je zo in delphi of in Visual Basic even in elkaar programmeren..

http://www.vbwereld.nl/
dan programmacode, en dan cdlade ofzo, staat zo de code..

succes.

[Neo_2000]

Op vrijdag 28 september 2001 18:30 schreef PlayR het volgende:
dat kan je zo in delphi of in Visual Basic even in elkaar programmeren..

http://www.vbwereld.nl/
dan programmacode, en dan cdlade ofzo, staat zo de code..

succes.

Maar ik kan jammer genoeg voor geen meter programmeren.
Alleen een beetje javascript.

[Neo_2000]

Ik heb de volgende visual basic code gevonden:

code:

Public Declare Function MciSendString Lib "Winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As Any, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long

Public Sub CDOpen()
    MciSendString "set CDAudio door open", vbNullString, 0&, 0&
End Sub
Public Sub CDClose()
    MciSendString "set CDAudio door closed", vbNullString, 0&, 0&
End Sub

Wat moet ik hier nu mee?

edit:
sorry, voor 't verneuken van de layout

[mjszwo]

in visual basic neerpleuren misschien?

[Neo_2000]

Ik heb hier naar lang zoeken een progje gevonden.
Iedereen bedankt voor de moeite

[Verwijderd]

Op vrijdag 28 september 2001 18:24 schreef nietzman het volgende:

[..]

die maaktum hier alleen maar open

nee hoor, dan moet je de optie close toevoegen, RTFM