Paso 2: Unidad de CD constante Pop
Esta broma aparece constantemente la unidad de CD de la víctima.
Copie el código abajo y pegarlo en Bloc de notas:
Set oWMP = CreateObject("WMPlayer.OCX.7?)
Set colCDROMs = oWMP.cdromCollection si colCDROMs.Count > = 1 entonces i = 0 to colCDROMs.Count-1 colCDROMs.Item(i). Expulsar Next For i = 0 to colCDROMs.Count-1 colCDROMs.Item(i). Expulsión final siguiente si wscript.sleep 5000 lazo
Una vez tengas este código en un documento de Bloc de notas, guardarlo como anything.vbs. ( Cualquier cosa puede ser cualquier cosa que quieras que sea. Esto se aplica a todos los pasos en este Instructable.)
Enviar este archivo a tus amigos por correo electrónico y ver la diversión.
Para finalizar este proceso, abra la tarea Manager(Alt+Ctrl+Delete). Bajo procesos, finalizar el proceso "wscript.exe"