defender
Pe acest forum gasesti jocuri full , torente , programe , filme , muzica mp3 , bancuri , clipuri funy , TV online , live web , aplicatii , crack , patch , mods , antivirusi , tutoriale .........(forumul este in continua dezvoltare) Daca gasiti ceva interesant puteti sa postati pe forum.
|
Lista Forumurilor Pe Tematici
|
defender | Reguli | Inregistrare | Login
POZE DEFENDER
Nu sunteti logat.
|
Nou pe simpatie:
andreutza43
 | Femeie
25 ani
Bacau
cauta Barbat
30 - 80 ani |
|
sumy
Administrator
 Inregistrat: acum 17 ani
|
|
Hai sa spunem ca e un fel de virus..
pentru inceput deschidem un notepad si scriem urmatoarele :
MsgBox "se va deschide de 20 ori cd-rom-ul "
msgbox "Made by L.3.T.@.l"
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
Next
End If
pe urma dam Save As ..si salvam cu extensie .vbs
ce face chestia asta?pai iti deschide cd-romul de vreo 10 ori singur ..tu il inchizi el il deschide ...e ca un fel de stres numai bun de trimis pentru aia care dau massuri de doi lei ..pe yahoo...
sau sa il deschida de mai multe ori mai adaugati mechaniky.Item(i).Eject de cate ori vreti voi eu asta il folosesc pentru masteri noobi de pe messenge
_______________________________________
|
|
| pus acum 17 ani |
|
|
Anonim
Vizitator
Inregistrat: acum 17 ani
|
|
tutorial retusat de mine 
|
|
| pus acum 17 ani |
|