网站首页 > 易语言相关 > 系统工具源码 正文
.版本 2 .支持库 iext .支持库 eAPI .程序集 窗口程序集1 .程序集变量 进程信息, 进程连接信息, , "0" .程序集变量 状态数组, 文本型, , "0" .子程序 _窗口1_创建完毕 状态数组 = { “未知”, “已经关闭”, “监听”, “发送同步空闲字符”, “接收同步空闲字符”, “数据交换中”, “结束等待1”, “结束等待2”, “关闭等待”, “关闭中”, “命令正确应答”, “连接等待”, “删除TCP连接” } 取进程连接 () .子程序 取进程连接, , , 返回数目 借用网上大侠的源码 .局部变量 数据, 字节集 .局部变量 缓冲区大小, 整数型 .局部变量 数量, 整数型 .局部变量 位置1, 整数型 .局部变量 地址, 字节集 .局部变量 状态, 整数型 .局部变量 本地地址, 整数型 .局部变量 本地端口, 整数型 .局部变量 远程地址, 整数型 .局部变量 远程端口, 整数型 .局部变量 进程ID, 整数型 .局部变量 局部_进程信息, 进程连接信息 .局部变量 I, 整数型 超级列表框1.全部删除 () API_GetExtendedTcpTable (数据, 缓冲区大小, 假, 2, 5, 0) 数据 = 取空白字节集 (缓冲区大小) 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 加入成员 (进程信息, 局部_进程信息) .计次循环尾 () .子程序 GetAscIP, 文本型 .参数 inn, 整数型 .局部变量 nStr, 整数型 .局部变量 lpStr, 整数型 .局部变量 retString, 文本型 retString = 取空白文本 (32) lpStr = API_inet_ntoa (inn) .如果 (lpStr ≠ 0) nStr = API_lstrlen (lpStr) .如果真 (nStr > 32) nStr = 32 .如果真结束 API_CopyMemory (retString, lpStr, nStr) retString = 取文本左边 (retString, nStr) 返回 (retString) .否则 返回 (“无法获取IP”) .如果结束 .子程序 取进程名, 文本型 .参数 进程ID, 整数型 .局部变量 系统进程, 进程信息, , "0" .局部变量 计次变量, 整数型 系统进程 = 取系统进程列表 () .计次循环首 (取数组成员数 (系统进程), 计次变量) .如果真 (系统进程 [计次变量].进程标识符 = 进程ID) 返回 (系统进程 [计次变量].进程名称) 跳出循环 () .如果真结束 .计次循环尾 () 返回 (“”) .子程序 _按钮1_被单击 .局部变量 I, 整数型 .计次循环首 (取数组成员数 (进程信息), I) .如果真 (到整数 (超级列表框1.取标题 (超级列表框1.现行选中项, 0)) = 进程信息 [I].进程ID) 进程信息 [I].进程连接.dwState = #MIB_TCP_STATE_DELETE_TCB API_SetTcpEntry (进程信息 [I].进程连接) .如果真结束 .计次循环尾 () 取进程连接 () .子程序 _按钮2_被单击 取进程连接 ()
@易语言入门教程
- 上一篇: 易语言断开指定会话源码
- 下一篇: 易语言暴力枚举驱动源码
猜你喜欢
- 2021-11-09 快启动源码(类似音速启动)
- 2021-11-07 Edis86-易语言独立开发的反汇编引擎纯源码
- 2021-11-06 Windows仿资源管理器
- 2021-10-29 WINDOWS/LINUX/SFTP远程连接管理工具V3.0加强开源
- 2019-07-25 修改易语言模块图标源码
- 2019-06-21 基于SunDay匹配算法改良的寻找字节集易语言源码
- 2019-04-21 易语言获取本机信息源码
- 2019-03-31 电脑缓存清理助手易语言源码
- 2019-03-30 Windows系统管理工具源码
- 2019-01-15 内存特征码搜索定位(采用KMP算法)
你 发表评论:
欢迎- 百度站内搜索
- 关注微信公众号
- 网站分类
-
- 网站公告
- 电子书书籍
- 程序员工具箱
- 编程工具
- 易语言相关
- 网络相关源码
- 图形图像源码
- 系统工具源码
- 易语言模块源码
- 易语言支持库
- 数据库类源码
- 易语言例程
- 易语言游戏开发
- 易语言模块
- 多媒体类源码
- 易语言资源网
- 易语言视频教程
- JS分析教程
- 易语言图文教程
- 易语言常见问题及笔记
- 工具源码
- 易语言版本
- 网络编程
- javascript
- PHP编程
- html
- 正则表达式
- 面试题
- nodejs
- 其它综合
- 脚本专栏
- python
- 按键精灵相关
- 按键精灵图文教程
- 按键精灵视频教程
- 按键精灵Q语言
- 按键精灵安卓版
- golang
- 游戏安全
- 火山相关
- 火山安卓软件
- 火山常见问题及笔记
- 火山安卓源码
- 火山视频教程
- 火山PC版本下载
- 火山PC视窗例程
- 互联网那些事
- 引流推广
- 项目揭秘
- 网络营销
- 营销软件
- QQ营销软件
- 娱乐软件
- 机器人插件
- 培训教程
- 技术教程
- 活动线报
- 数据库
- Redis
- Access
- MongoDB
- Mysql
- 问答
- 其它
- 易语言
- 需求
- 在线教程
- 多线程培训班
- 觅风易语言教程
- 模拟系列教程
- 集中营易语言教程
- 历史数据
- 随机tag
已有30位网友发表了看法:
免费源码资源网 评论于 [2019-02-08 02:46:22] 回复
易语言断开指定程序网络
三叶网 评论于 [2019-03-06 00:49:43] 回复
易语言断网源码
学不会易语言 评论于 [2019-06-06 10:01:49] 回复
易语言断网源码
易语言资源网站 评论于 [2019-06-25 08:39:12] 回复
易语言断网源码
易语言网站 评论于 [2019-06-27 07:58:18] 回复
易语言断网教程
易语言TV 评论于 [2019-08-28 08:47:18] 回复
易语言断网源码
易语言自学网 评论于 [2019-09-06 20:15:04] 回复
易语言断网源码
aufhur 评论于 [2019-09-10 21:22:43] 回复
谢谢分享。。。。。。。。。。。。。。。
易语言例子 评论于 [2019-09-23 09:40:32] 回复
易语言如何让某个进程断网
易语言TV 评论于 [2019-09-23 11:32:42] 回复
易语言断网源码
易语言论坛 评论于 [2019-09-26 22:57:12] 回复
易语言断网
易语言TV 评论于 [2019-10-15 18:56:10] 回复
易语言断网源码
易语言TV 评论于 [2019-10-20 18:50:35] 回复
易语言指定进程断网
易语言教程 评论于 [2019-11-06 21:08:07] 回复
易语言断网源码
易语言资源站 评论于 [2020-02-02 19:26:48] 回复
易语言断网源码
模块开发 评论于 [2020-02-17 23:54:02] 回复
指定进程断网易语言源码
处理现行程序 评论于 [2020-02-18 01:13:24] 回复
中断指定网络连接源码
模块说明 评论于 [2020-03-02 22:47:09] 回复
易语言怎么实现单进程断网
PostWorkItem 评论于 [2020-03-15 19:03:57] 回复
易语言获取指定进程的网络连接ip
静编 评论于 [2020-03-17 12:48:58] 回复
易语言断网源码
易语言 评论于 [2020-03-23 10:36:42] 回复
易语言断网源码
易语言 评论于 [2020-04-07 15:43:59] 回复
易语言+断网
易语言 评论于 [2020-05-08 19:47:29] 回复
易语言断开指定进程网络
易语言 评论于 [2020-05-09 13:58:12] 回复
关闭程序网络连接 易语言
易语言 评论于 [2020-06-06 13:14:48] 回复
易语言断网源码
易语言 评论于 [2020-06-16 22:47:00] 回复
易语言断网
编程学习平台 评论于 [2021-04-08 14:11:32] 回复
循环断网工具端口
易语言支持库 评论于 [2021-05-13 23:20:38] 回复
易语言断网源码
fiddler 评论于 [2022-03-02 19:19:56] 回复
易语言断网
fiddler 评论于 [2022-03-02 19:25:32] 回复
易语言禁用网络连接
fiddler 评论于 [2022-03-02 19:27:01] 回复
易语言+网络连接+断开