Ta aí um script em VBS (Visual Basic Script) que roda em qualquer plataforma Windows.
O que ele faz é simples: Abre e fecha a gaveta do drive de CD/DVD em tempo alternado (cerca de 20 segundos)
É uma otima opção pra enxer o saco daquele seu amigo mala ou dizer que o seu PC ta possuído por forças do mal e fazer... tá, exagerei.
Segue o codigo:
É isso .-.
O que ele faz é simples: Abre e fecha a gaveta do drive de CD/DVD em tempo alternado (cerca de 20 segundos)
É uma otima opção pra enxer o saco daquele seu amigo mala ou dizer que o seu PC ta possuído por forças do mal e fazer... tá, exagerei.
Segue o codigo:
Código:
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
Comment