资源介绍:
源码利用易语言网络通讯支持库检测本机端口是否被占用。
.版本 2
.支持库 sock
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
标题 = “检测本机端口是否被占用”
.子程序 端口是否被占用, 逻辑型, , 真=被占用
.参数 端口号, 整数型
.局部变量 WebServer, 网络服务器
.如果 (WebServer.启动 (端口号))
WebServer.停止 ()
返回 (假)
.否则
返回 (真)
.如果结束
.子程序 _按钮_Check_被单击
.如果 (端口是否被占用 (到整数 (编辑框_Port.内容)))
信息框 (编辑框_Port.内容 + “ 占用=真”, 0, )
.否则
信息框 (编辑框_Port.内容 + “ 占用=假”, 0, )