提前说明，我这个是自己开发的，用的是cchttp模块，然后只分享核心代码，成品这里就不提供了，一般小网站都能轻松干崩溃，所以具有一定的危险性我就不分享完整了，就分享一下思路和核心代码。
核心代码：【仅供学习，不分享成品，仅分享模块调用方法】
============================================================
.版本 2
.支持库 EThread
.支持库 e2ee
.支持库 spec
.程序集变量 m_ui许可, 整数型
.程序集变量 m_测试队列, 测试, , "0"
.程序集变量 m_总测次数, 整数型
.程序集变量 m_已测次数, 整数型
.程序集变量 m_并发数, 整数型
.程序集变量 m_成功标识, 文本型
.程序集变量 m_请求地址, 文本型
.程序集变量 m_当前正在执行数, 整数型
.程序集变量 m_当前成功总, 整数型
.程序集变量 m_当前失败总, 整数型
.子程序 _按钮1_被单击
.局部变量 i, 整数型
m_并发数 ＝ 到整数 (编辑框_并发.内容)
m_请求地址 ＝ 组合框1.内容
m_成功标识 ＝ 编辑框_成功标识.内容
m_总测次数 ＝ 到整数 (编辑框_总时长.内容)
m_已测次数 ＝ 0
m_当前成功总 ＝ 0
m_当前失败总 ＝ 0
m_当前正在执行数 ＝ 0
进度条1.最大位置 ＝ m_总测次数
重定义数组 (m_测试队列, 假, m_并发数)
.计次循环首 (m_并发数, i)
m_测试队列 [i].许可 ＝ 创建进入许可证 ()
.计次循环尾 ()
时钟1.时钟周期 ＝ 500
时钟2.时钟周期 ＝ 500
.子程序 测试线程
.参数 i, 整数型
.局部变量 web, 网站客户端
.局部变量 res, 文本型
进入许可区 (m_测试队列 [i].许可)
m_测试队列 [i].状态 ＝ “请求中”
m_当前正在执行数 ＝ m_当前正在执行数 ＋ 1
web.置超时时间 (1000, 1000)
m_当前正在执行数 ＝ m_当前正在执行数 － 1
.如果 (web.执行GET (组合框1.内容, res, 真, ))
调试输出 (res)
.如果 (编辑框_成功标识.内容 ≠ “”)
.如果 (寻找文本 (res, 编辑框_成功标识.内容, , 假) ＝ -1)
m_测试队列 [i].失败 ＝ m_测试队列 [i].失败 ＋ 1
m_当前失败总 ＝ m_当前失败总 ＋ 1
m_测试队列 [i].状态 ＝ “失败”
.否则
m_测试队列 [i].成功 ＝ m_测试队列 [i].成功 ＋ 1
m_当前成功总 ＝ m_当前成功总 ＋ 1
m_测试队列 [i].状态 ＝ “成功”
.如果结束
.否则
m_测试队列 [i].成功 ＝ m_测试队列 [i].成功 ＋ 1
m_当前成功总 ＝ m_当前成功总 ＋ 1
m_测试队列 [i].状态 ＝ “成功”
.如果结束
.否则
m_测试队列 [i].失败 ＝ m_测试队列 [i].失败 ＋ 1
m_当前失败总 ＝ m_当前失败总 ＋ 1
m_测试队列 [i].状态 ＝ “失败”
.如果结束
退出许可区 (m_测试队列 [i].许可)
.子程序 __启动窗口_创建完毕
' m_ui许可 ＝ 创建进入许可证 ()
.判断开始 (客户1.连接 (“127.0.0.1”, 1995) ＝ 真)
_按钮1_被单击 ()
.默认
.判断结束
.子程序 _时钟1_周期事件
.局部变量 i, 整数型
时钟1.时钟周期 ＝ 0
.计次循环首 (m_并发数, i)
线程_启动 (&测试线程, i, )
.计次循环尾 ()
m_已测次数 ＝ m_已测次数 ＋ 1
.如果 (m_已测次数 ＞ m_总测次数)
_按钮2_被单击 ()
.否则
时钟1.时钟周期 ＝ 1000
.如果结束
.子程序 _按钮2_被单击
.局部变量 i, 整数型
时钟1.时钟周期 ＝ 0
.计次循环首 (取数组成员数 (m_测试队列), i)
删除进入许可证 (m_测试队列 [i].许可)
.计次循环尾 ()
时钟2.时钟周期 ＝ 0
.子程序 _时钟2_周期事件
.局部变量 i, 整数型
.局部变量 o, 整数型
.局部变量 历史总, 整数型, 静态
.局部变量 历史成功, 整数型, 静态
.局部变量 历史失败, 整数型, 静态
进入许可区 (m_ui许可)
标题 ＝ “当前任务数：” ＋ 到文本 (m_当前正在执行数) ＋ “ 当前成功：” ＋ 到文本 (m_当前成功总) ＋ “ 当前失败：” ＋ 到文本 (m_当前失败总) ＋ “ 已经执行：” ＋ 到文本 (m_已测次数) ＋ “/” ＋ 到文本 (m_总测次数)
' 超级列表框1.禁止重画 ()
' 超级列表框1.全部删除 ()
.' 计次循环首 (m_并发数, i)
' o ＝ 超级列表框1.插入表项 (, , , , , )
' 超级列表框1.置标题 (o, 0, 到文本 (i))
' 超级列表框1.置标题 (o, 1, m_测试队列 [i].状态)
' 超级列表框1.置标题 (o, 2, 到文本 (m_测试队列 [i].失败 ＋ m_测试队列 [i].成功))
' 超级列表框1.置标题 (o, 3, 到文本 (m_测试队列 [i].成功))
' 超级列表框1.置标题 (o, 4, 到文本 (m_测试队列 [i].失败))
' ' 超级列表框1.置标题 (o, 5, m_测试队列 [i].接收内容)
.' 计次循环尾 ()
' 超级列表框1.允许重画 ()
画板1.画笔颜色 ＝ #蓝色
画板1.画直线 (求横 (m_已测次数), 求纵 (历史总), 求横 (m_已测次数 ＋ 1), 求纵 (m_当前成功总 ＋ m_当前失败总))
画板1.画笔颜色 ＝ #红色
画板1.画直线 (求横 (m_已测次数), 求纵 (历史失败), 求横 (m_已测次数 ＋ 1), 求纵 (m_当前失败总))
画板1.画笔颜色 ＝ #墨绿
画板1.画直线 (求横 (m_已测次数), 求纵 (历史成功), 求横 (m_已测次数 ＋ 1), 求纵 (m_当前成功总))
进度条1.位置 ＝ m_已测次数
历史总 ＝ m_当前成功总 ＋ m_当前失败总
历史成功 ＝ m_当前成功总
历史失败 ＝ m_当前失败总
退出许可区 (m_ui许可)
.子程序 求纵, 整数型
.参数 数值, 整数型
.局部变量 t, 小数型
t ＝ 画板1.高度 ÷ m_并发数 ÷ m_总测次数
返回 (画板1.高度 － 数值 × t)
.子程序 求横, 整数型
.参数 数值, 整数型
.局部变量 t, 小数型
t ＝ 画板1.宽度 ÷ m_总测次数
返回 (数值 × t)
.子程序 _按钮3_被单击
程序_重启 ()
.子程序 _客户1_数据到达
.局部变量 文本, 文本型
文本 ＝ 到文本 (客户1.取回数据 ())
.判断开始 (文本 ＝ “ok”)
结束 ()
.默认
.判断结束
==================================================
到此这篇服务器压力测试平台官网（服务器压力测试平台ddos cc）的文章就介绍到这了,更多相关内容请继续浏览下面的相关推荐文章，希望大家都能在编程的领域有一番成就！版权声明：
本文来自互联网用户投稿，该文观点仅代表作者本人，不代表本站立场。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。
如若内容造成侵权、违法违规、事实不符，请将相关资料发送至xkadmin@xkablog.com进行投诉反馈，一经查实，立即处理！
转载请注明出处，原文链接：https://www.xkablog.com/jszy-zcph/18183.html