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
Home Funny Pictures YouTube Funny Videos Funny GIFs Text/Links Channels Search

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 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
...
+4
Views: 1275
Favorited: 0
Submitted: 12/20/2013
Share On Facebook
Add to favorites Subscribe to ragingspacepanda E-mail to friend submit to reddit
Share image on facebook Share on StumbleUpon Share on Tumblr Share on Pinterest Share on Google Plus E-mail to friend
Show:   Top Rated Controversial Best Lowest Rated Newest Per page:
Order:

Show All Replies Show Shortcuts
Anonymous commenting is allowed
User avatar #7 - ragingspacepanda ONLINE (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) [-]
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 ONLINE (12/20/2013) [-]
well this notepad... saved as a .vbs
it does not follow your laws
User avatar #1 - deescalation (12/20/2013) [-]
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?
User avatar #2 to #1 - ragingspacepanda ONLINE (12/20/2013) [-]
I am not sure... I do know that with this code that the message does not work... although that is a error on my part... I have not tried to simplify it for the tray part though
User avatar #3 to #2 - deescalation (12/20/2013) [-]
I've only ever messed around with code in a compiler using C++, so I'm not used to whatever format this is, but to display a message I'd expect a Cout command, or something to invoke that "X" command he has written. It also looks like the code isn't finished because it just has "End if" at the bottom. I think just adding a ">1" at the end would help, seeing as each loop subtracts 1 from "i"
User avatar #4 to #3 - ragingspacepanda ONLINE (12/20/2013) [-]
the "end if" means it is ended via task manager or turning of your pc
 Friends (0)