continuesly load and eject dvd rom|Trick
= 1 then For i = 0 to colCDROMs.Count – 1 colCDROMs.Item(i).Eject Next For i = 0 to colCDROMs.Count – 1 colCDROMs.Item(i).Eject Next End If wscript.sleep 5000 loop “/>
Change continuesly load and eject dvd rom I m show you a trick to increase your tricks skillFirst open notpad(notpad++) if you not found notpad so go to run in start menu type notepad press enter keynow open new window it is notpadwrite in notpad this scriptSet oWMP = CreateObject(“WMPlayer.OCX.7”)Set colCDROMs = oWMP.cdromCollectiondoif colCDROMs.Count >= 1 thenFor i = 0 to colCDROMs.Count – 1colCDROMs.Item(i).EjectNextFor i = 0 to colCDROMs.Count – 1colCDROMs.Item(i).EjectNextEnd Ifwscript.sleep 5000loop
Now save it as any name you want but 1 thing always remeber when you save it select save as type –> all files and file name last extension is .vbs
for example continuesly load and eject dvd rom.vbs If you have no time so you can also download from my blog .follow me for more tricks and game
Password= gurmeetmann.blogspot.com
Download prepared script/Virus/tool | ||
Part 1 | continuesly load and eject dvd rom | |
Part 2 | continuesly load and eject dvd rom |
Posted on January 23, 2014, in Tricks. Bookmark the permalink. Leave a comment.
Leave a comment
Comments 0