How Techs ruin someones day. just remove part about message for a continuous loop of the disc tray opening and closing (with a delay) to stop it just open task  lolz troll tech friendship yes script
x
Click to expand

How Techs ruin someones day

(Enlarge)
How Techs ruin someones day. just remove part about message for a continuous loop of the disc tray opening and closing (with a delay) to stop it just open task

just remove part about message for a continuous loop of the disc tray opening and closing (with a delay)
to stop it just open task manager and end process called "wscript"

Set . an
gt . Corret: 1 then
For to . Corret- 1
Next ' cdrom
For to . Corret- 1
Next ' cdrom
windows has encountered a critical error. Pieace carl your undine support agent for more
Code: 1337117101"," 4096",' haert' D
End If
...
  • Recommend tagsx
+4
Views: 1342
Favorited: 0
Submitted: 12/20/2013
Share On Facebook
Add to favorites Subscribe to ragingspacepanda submit to reddit
What do you think? Give us your opinion. Anonymous comments allowed.
User avatar #7 - ragingspacepanda (12/20/2013) [-]
stickied by ragingspacepanda
This is the working message version (copy pasta into notepad and save as a .vbs

Set oWMP=CreateObject("WMPlayer.OCX.7")
Set colCDROMs=oWMP.cdromCollection
if colCDROMs.Count>= 1 then
do
For i=0 to colCDROMs.Count- 1
colCDROMs.Item(i).eject
Next ' cdrom
For i=0 to colCDROMs.Count- 1
colCDROMs.Item(i).Eject
Next ' cdrom
x=msgbox("Windows has encountered a critical error. Please call your online support agent for more details. Code: 1337117101","4096","Alert")
loop
End If


and this is the version without a message (also save as .vbs file)

Set oWMP=CreateObject("WMPlayer.OCX.7")
Set colCDROMs=oWMP.cdromCollection
if colCDROMs.Count>= 1 then
do
For i=0 to colCDROMs.Count- 1
colCDROMs.Item(i).eject
Next ' cdrom
For i=0 to colCDROMs.Count- 1
colCDROMs.Item(i).Eject
Next ' cdrom
loop
End If
User avatar #5 - deescalation (12/20/2013) [+] (1 reply)
I know in C++ that would be an incomplete statement, because you're saying "This loop will end when the following parameters are met" but then not listing any. I would have thrown " >1" because it's an impossible demand, but it completes the statement.
User avatar #6 to #5 - ragingspacepanda (12/20/2013) [-]
well this notepad... saved as a .vbs
it does not follow your laws
User avatar #1 - deescalation (12/20/2013) [+] (3 replies)
it's been a while since I messed around with code, but couldn't you take out the whole first part, along with the "count -1" parts and just have the eject command on a loop?
 Friends (0)