hallo 

da ich kein Forum gefunden habe, frag ich halt hier....ich habe selbst ein troll Skript erstellt nur ist das Problem, das ich dass nicht herausfinde wo der Fehler ist :c

hat jemand Kenntnis in diesem Gebiet?

hier das skript

x =MsgBox("Faggot ich hab dich fett getrollt! hahhahahahaha",2,"But don't change anything elese!") 

x =MsgBox("nice Try Muhahahahaha Try again noob",4,"you cant change anything!Muhaha!") 

 If x = vbYes Then 

 Do 

 x = MsgBox ("try again",4,"hahahahahaha") 

 x = MsgBox ("noob try again ahaha",4,"hahahahahaha") 

 x = MsgBox ("try again you fgt XD!!",4,"hahahahahaha") 

 loop 

 If x = vbNo 

Then set shellobj = CreateObject("WScript.Shell") shellobj.run "cmd" wscript.sleep 100 shellobj.sendkeys "shutdown" wscript.sleep 20 Shellobj.sendkeys " /s" wscript.sleep 20 shellobj.sendkeys 

 End If<