Yahoo Answers is shutting down on May 4th, 2021 (Eastern Time) and beginning April 20th, 2021 (Eastern Time) the Yahoo Answers website will be in read-only mode. There will be no changes to other Yahoo properties or services, or your Yahoo account. You can find more information about the Yahoo Answers shutdown and how to download your data on this help page.

Edit this VBS code and loop it please?

Found a lovely VBS code that makes the CD drive open and close (Classic office prank incoming). I just need it to loop. Can anyone mod it for me?

Cheers. Code is below.

Set oWMP = CreateObject("WMPlayer.OCX.7")

Set colCDROMs = oWMP.cdromCollection

if colCDROMs.Count = 1 then

for i = 0 to colCDROMS.Count - 1

colCDROMs.Item(i).Eject

colCDROMs.Item(i).Eject

Next ' cdrom

End if

1 Answer

Relevance
  • 9 years ago

    Is this an office prank? You can post this in ihatemycoworker.com. Sorry I don't know how to code. :D

Still have questions? Get your answers by asking now.