Opens and Closes The CD-Rom. Great For Making A Good Joke!!!!!!!

by VisualScope (20 Submissions)
Category: Miscellaneous
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Sun 28^th May 2000
Date Added: Mon 8^th February 2021
Rating: (1 Votes)

Rate Opens and Closes The CD-Rom. Great For Making A Good Joke!!!!!!!



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)

Download this snippet Add to My Saved Code

Opens and Closes The CD-Rom. Great For Making A Good Joke!!!!!!! Comments

No comments have been posted about Opens and Closes The CD-Rom. Great For Making A Good Joke!!!!!!!. Why not be the first to post a comment about Opens and Closes The CD-Rom. Great For Making A Good Joke!!!!!!!.

Opens and Closes The CD-Rom. Great For Making A Good Joke!!!!!!!

Opens and Closes The CD-Rom. Great For Making A Good Joke!!!!!!! Comments

Post your comment

Difficulty