进程网络连接管理器源码可任意断网

数据 ＝ 取空白字节集 (缓冲区大小)
API_GetExtendedTcpTable (数据, 缓冲区大小, 假, 2, 5, 0)
数量 ＝ 取字节集数据 (取字节集左边 (数据, 4), 3, )
位置1 ＝ 4
清除数组 (进程信息)
.如果真 (数量 ＝ 0)
返回 ()
.如果真结束
.计次循环首 (数量, I)
状态 ＝ 取字节集数据 (取字节集中间 (数据, 位置1 ＋ 1, 4), 3, )
地址 ＝ 取字节集中间 (数据, 位置1 ＋ 5, 4)
本地端口 ＝ 取字节集数据 (取字节集中间 (数据, 位置1 ＋ 9, 4), 3, )
远程端口 ＝ 取字节集数据 (取字节集中间 (数据, 位置1 ＋ 17, 4), 3, )
进程ID ＝ 取字节集数据 (取字节集中间 (数据, 位置1 ＋ 21, 4), 3, )
本地地址 ＝ 取字节集数据 (取字节集中间 (地址, 1, 4), #整数型, )
地址 ＝ 取字节集中间 (数据, 位置1 ＋ 13, 4)
远程地址 ＝ 取字节集数据 (取字节集中间 (地址, 1, 4), #整数型, )
局部_进程信息.进程ID ＝ 进程ID
局部_进程信息.进程连接.dwState ＝ 状态
局部_进程信息.进程连接.dwLocalAddr ＝ 本地地址
局部_进程信息.进程连接.dwLocalPort ＝ 本地端口
局部_进程信息.进程连接.dwRemoteAddr ＝ 远程地址
局部_进程信息.进程连接.dwRemotePort ＝ 远程端口
超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (I － 1, 0, 到文本 (进程ID))
超级列表框1.置标题 (I － 1, 1, 取进程名 (进程ID))
超级列表框1.置标题 (I － 1, 2, GetAscIP (本地地址))
超级列表框1.置标题 (I － 1, 3, 到文本 (API_ntohs (本地端口)))
超级列表框1.置标题 (I － 1, 4, GetAscIP (远程地址))
超级列表框1.置标题 (I － 1, 5, 到文本 (API_ntohs (远程端口)))
超级列表框1.置标题 (I － 1, 6, 状态数组 [状态 ＋ 1])
位置1 ＝ 位置1 ＋ 24
加入成员 (进程信息, 局部_进程信息)
.计次循环尾 ()