CD-ROMu açan virus
1 iyun 2009. Müəllif: M1rZ3
Aşağıdakı kodu atırsız notepad-a və soxranit edirsiniz.
Bundan sonra faylın formatını *vbs -ya çevirirsiniz və virusunuz hazırdı! üstünə klik edən kimi CD-ROMunuz açılacağ.
Virusu hazırlaya bilməyənlər buradan yükləyə bilər.
Qeyd: Birçox saytlar bu virusu hazır şəkildə program kimi sayta verirlər, bunu məndə hazır şəkildə verə bilərdim, lakin mənim məqsədim sizlərə bu virusun əsl hazırlanma qaydasını öyrətməkdi.
Bundan sonra artıq istənilən PC-da bu əməliyyatı yerinə yetirib özünüzün zarafatcıl virusunu düzəldə bilərsiniz.
Ardı olacağ..
'This virus created by www.nice.az
on error resume next
Set S = CreateObject("Wscript.Shell")
set FSO=createobject("scripting.filesystemobject")
Set ww = CreateObject("WMPlayer.OCX.7")
Set cw = ww.cdromCollection
if cw.Count >= 1 then
For i = 0 to cw.Count - 1
cw.Item(i).eject
next
End If
on error resume next
Set S = CreateObject("Wscript.Shell")
set FSO=createobject("scripting.filesystemobject")
Set ww = CreateObject("WMPlayer.OCX.7")
Set cw = ww.cdromCollection
if cw.Count >= 1 then
For i = 0 to cw.Count - 1
cw.Item(i).eject
next
End If
Bundan sonra faylın formatını *vbs -ya çevirirsiniz və virusunuz hazırdı! üstünə klik edən kimi CD-ROMunuz açılacağ.
Virusu hazırlaya bilməyənlər buradan yükləyə bilər.
Qeyd: Birçox saytlar bu virusu hazır şəkildə program kimi sayta verirlər, bunu məndə hazır şəkildə verə bilərdim, lakin mənim məqsədim sizlərə bu virusun əsl hazırlanma qaydasını öyrətməkdi.
Bundan sonra artıq istənilən PC-da bu əməliyyatı yerinə yetirib özünüzün zarafatcıl virusunu düzəldə bilərsiniz.
Ardı olacağ..