关闭电脑上所有进程的80端口怎么写

luoduo

关闭电脑上所有进程的80端口怎么写 用易语言怎么写

fire9

  

变量名	类 型	静态	数组	备 注
命令行	文本型
结果	文本型
进程ID	文本型
进程列表	文本型

' 获取所有占用80端口的进程ID
命令行 ＝ “cmd.exe /c netstat -ano | findstr :80”
结果 ＝ 取运行输出 (命令行, 真)
' 处理获取的结果
如果 (结果 ＝ “”)
信息框 (“未找到占用80端口的进程。”)
返回 ()
结束如果
进程列表 ＝ 分割文本 (结果, #换行符 )
计次循环首 (取数组成员数 (进程列表), 进程ID, 整数型)
.局部变量 每行, 文本型
.局部变量 PID, 文本型
每行 ＝ 进程列表 [进程ID]
如果 (取文本左边 (每行, 5) ＝ “TCP”)
PID ＝ 分割文本 (每行, #空格 )[5]
' 终止进程
命令行 ＝ “taskkill /F /PID ” ＋ PID
结果 ＝ 取运行输出 (命令行, 真)
信息框 (“终止进程ID：” ＋ PID ＋ #换行符 ＋ 结果)
结束如果
计次循环尾 ()
信息框 (“所有占用80端口的进程已终止。”)

i支持库列表	支持库注释
shell.ex	(未知支持库)

.版本 2<br /> .支持库 shell.ex<br /> <br /> .局部变量 命令行, 文本型<br /> .局部变量 结果, 文本型<br /> .局部变量 进程ID, 文本型<br /> .局部变量 进程列表, 文本型<br /> <br /> ' 获取所有占用80端口的进程ID<br /> 命令行 ＝ “cmd.exe /c netstat -ano | findstr :80”<br /> 结果 ＝ 取运行输出 (命令行, 真)<br /> <br /> ' 处理获取的结果<br /> 如果 (结果 ＝ “”)<br />     信息框 (“未找到占用80端口的进程。”)<br />     返回 ()<br /> 结束如果<br /> <br /> 进程列表 ＝ 分割文本 (结果, #换行符)<br /> .计次循环首 (取数组成员数 (进程列表), 进程ID, 整数型)<br />     .局部变量 每行, 文本型<br />     .局部变量 PID, 文本型<br />     每行 ＝ 进程列表 [进程ID]<br />     如果 (取文本左边 (每行, 5) ＝ “TCP”)<br />         PID ＝ 分割文本 (每行, #空格)[5]<br />         ' 终止进程<br />         命令行 ＝ “taskkill /F /PID ” ＋ PID<br />         结果 ＝ 取运行输出 (命令行, 真)<br />         信息框 (“终止进程ID：” ＋ PID ＋ #换行符 ＋ 结果)<br />     结束如果<br /> .计次循环尾 ()<br /> <br /> 信息框 (“所有占用80端口的进程已终止。”)

luoduo

fire9 发表于 2024-5-10 19:09
[e=2].版本 2
.支持库 shell.ex

不是关闭进程  是关闭80端口  让进程链接不了80

luoduo

fire9 发表于 2024-5-10 19:09
[e=2].版本 2
.支持库 shell.ex

可以写嘛  就是关闭80端口  不是关闭进程

b0y

- -关闭80端口 就是关闭占用80端口的进程

luoduo

b0y 发表于 2024-5-10 21:09
- -关闭80端口 就是关闭占用80端口的进程

我的想法是让进程不能链接80端口  老鱼的那个hp网截可以实现  让进程不能链接80端口  进程还不关闭