by VisualScope (20 Submissions)
Category: Miscellaneous
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Tue 27th June 2000
Date Added: Mon 8th February 2021
Rating: (1 Votes)
Open/Closes the CD-ROM Drive Tray! Great Code For Tricks, Jokes, And Music Players!!!!
Dim lngReturn As Long
Dim strReturn As Long
lngReturn = mciSendString("set CDAudio door open", strReturn, 127, 0)
'use this to close the cd-rom
Dim lngReturn As Long
Dim strReturn As Long
lngReturn = mciSendString("set CDAudio door closed", strReturn, 127, 0)
No comments have been posted about Open/Closes the CD-ROM Drive Tray! Great Code For Tricks, Jokes, And Music Players!!!!. Why not be the first to post a comment about Open/Closes the CD-ROM Drive Tray! Great Code For Tricks, Jokes, And Music Players!!!!.