亲宝软件园·资讯

展开

易语言检测端口占用 易语言检测端口是否被占用的代码

易语言源码教程 人气:0

检测端口是否被占用的代码

.版本 2
.程序集 窗口程序集_启动窗口
.子程序 检测端口, 整数型, , 如果被占用返回进程PID
.参数 端口, 整数型, 可空
.参数 信息, 文本型, 参考 可空
.局部变量 I, 整数型
.局部变量 PID, 整数型
写到文件 (“Get.bat”, 到字节集 (“netstat -aon|findstr ” + #引号 + 到文本 (端口) + #引号 + “ >>Bin”))
.如果真 (运行 (“Get.bat”, 真, 1))
  删除文件 (“Get.bat”)
  信息 = 到文本 (读入文件 (“Bin”))
  删除文件 (“Bin”)
  .如果真 (寻找文本 (信息, “:” + 到文本 (端口), , 假) ≠ -1)
    I = 倒找文本 (信息, “ ”, , 假)
    PID = 到整数 (取文本右边 (信息, 取文本长度 (信息) - I))
  .如果真结束
.如果真结束
返回 (PID)
.子程序 _检测按钮_被单击
.局部变量 PID, 整数型
PID = 检测端口 (到整数 (端口编辑框.内容))
.判断开始 (PID ≠ 0)
  信息框 (“当前端口已被使用,进程PID为 ” + 到文本 (PID), 0, “提示”)
.默认
  信息框 (“当前端口未使用”, 0, “提示”)
.判断结束

运行结果:

总结

以上就是这篇文章的全部内容了,希望本文的内容对大家的学习或者工作具有一定的参考学习价值,谢谢大家对的支持。如果你想了解更多相关内容请查看下面相关链接

加载全部内容

相关教程
猜你喜欢
用户评论