Hacking Romania
Pentru A Avea Acces La Forum,Va Rugam Sa Va Inregistrati Pe sistem!

Hacking Romania

Este un proiect, pentru totzi cei care vor sa invezte, sa faca schimb de pregrame shareware freware open source.
 
AcasaInregistrareConectare
(-_-) | Pentru A Avea Acces La Forum,Va Rugam Sa Va Inregistrati Pe sistem! | (-_-)

Distribuiţi | 
 

 Deschide Cd-Romul de 20 de ori

In jos 
AutorMesaj
Admin
Admin
avatar

Rac Mesaje : 292
Puncte : 895
Reputatie : 0
Data de inscriere : 22/12/2010
Varsta : 30
Localizare : C:\WINDOWS\system32

MesajSubiect: Deschide Cd-Romul de 20 de ori    Mar Dec 28, 2010 1:25 pm

Hai sa spunem ca e un fel de virus,dar nu afecteaza Pc-ul!
Pentru inceput deschidem un "notepad" si scriem urmatoarele:


Cod:
[color=violet]MsgBox "se va deschide de 20 ori cd-rom-ul "
msgbox "Made by BenQl"
Set ovladani = CreateObject("WMPlayer.OCX.7" )
Set mechaniky = ovladani.cdromCollection
If mechaniky.Count Then
For i = 0 To mechaniky.Count - 1
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject[/color]

Pe urma dam Save As si salvam cu extensie .vbs





Sus In jos
http://hacking-romania.forumz.ro
 
Deschide Cd-Romul de 20 de ori
Sus 
Pagina 1 din 1
 Subiecte similare
-
» Instalator, electrician sau....multitask!!

Permisiunile acestui forum:Nu puteti raspunde la subiectele acestui forum
Hacking Romania :: `·.¸¸.·´´¯`··._.·Tools`·.¸¸.·´´¯`··._.· :: ..::..**»‡«*Batch»‡«**..::..-
Mergi direct la: