VBcoders Guest



Don't have an account yet? Register
 


Forgot Password?



Open & Close CD-ROM

by omidles (4 Submissions)
Category: Miscellaneous
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Thu 17th November 2005
Date Added: Mon 8th February 2021
Rating: (1 Votes)

Open & Close CD-ROM

API Declarations


"mciSendStringA" (ByVal lpstrCommand As String, ByVal _
lpstrReturnString As String, ByVal uReturnLength As Long, _
ByVal hwndCallback As Long) As Long

Rate Open & Close CD-ROM



retvalue = mciSendString("set CDAudio door open", _
returnstring, 127, 0)
End Sub

Private Sub cmdClose_Click()
retvalue = mciSendString("set CDAudio door closed", _
returnstring, 127, 0)
End Sub
 

Download this snippet    Add to My Saved Code

Open & Close CD-ROM Comments

No comments have been posted about Open & Close CD-ROM. Why not be the first to post a comment about Open & Close CD-ROM.

Post your comment

Subject:
Message:
0/1000 characters