个人制作比较简单的抓包软件

.如果真 (调用者信息.取进程名 () ＝ 全_进程路径)
文本数据 ＝ 网络数据.到文本 ()
.如果真 (网络数据.取长度 () ＝ 1 或 网络数据.取长度 () ＝ 32)
返回 ()
.如果真结束
插入位置 ＝ 超级列表框.插入表项 (, , , , , )
超级列表框.置标题 (插入位置, 0, “发送”)
超级列表框.置标题 (插入位置, 1, 到文本 (套接字句柄))
超级列表框.置标题 (插入位置, 2, _取时间 ())
超级列表框.置标题 (插入位置, 3, 到文本 (网络数据.取长度 ()))
.判断开始 (取文本左边 (文本数据, 3) ＝ “GET”)
文本 ＝ “GET”
.判断 (取文本左边 (文本数据, 4) ＝ “POST”)
文本 ＝ “POST”
.默认

.判断结束
超级列表框.置标题 (插入位置, 4, 文本)
超级列表框.置标题 (插入位置, 5, 文本数据)