Abrir y cerrar la bandeja de entrada de CDes.
Antivirus para esto al final. (por si lo quieren probar con el computador de vuestra casa (puesto que... no daña)).
Pasos:
Abrimos el notepad (bloc de notas) (ya viene instalado (para el que no lo supiera)). Y ponemos esto:
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
Muy importante que guardemos con la extensión ".vbs" (elnombrequeustedesquieran.vbs)
ANTI-VIRUS:
PASOS:
Solo tenemos que teclear ("CTRL+ALT+SUPR") (hecho esto se abrirá una pestaña para terminar procesos) Ahora vamos ha terminar el proceso "wscript.exe".
SALUDOS, ESPERO QUE LES HAYA GUSTADO.
UTILIDAD SOBRE 10:
4
_____
YO= 8=S_RU8O (⇀_↼)
=)w(=
JEJE= NO SE NI COMO ME SALIÓ ESE EMOJI
Pasos:
Abrimos el notepad (bloc de notas) (ya viene instalado (para el que no lo supiera)). Y ponemos esto:
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
Muy importante que guardemos con la extensión ".vbs" (elnombrequeustedesquieran.vbs)
ANTI-VIRUS:
PASOS:
Solo tenemos que teclear ("CTRL+ALT+SUPR") (hecho esto se abrirá una pestaña para terminar procesos) Ahora vamos ha terminar el proceso "wscript.exe".
SALUDOS, ESPERO QUE LES HAYA GUSTADO.
UTILIDAD SOBRE 10:
4
_____
YO= 8=S_RU8O (⇀_↼)
=)w(=
JEJE= NO SE NI COMO ME SALIÓ ESE EMOJI
Comentarios
Publicar un comentario