易语言IP 端口扫描 报警器
.版本 2
.支持库 EThread
.子程序 _时钟1_周期事件
.如果真 (线程 = 0)
启动线程 (线程_1, , 线程)
.如果真结束
.子程序 线程_1
标签3.标题 = “正在检查...”
.如果 (客户1.连接 (“221.231.131.213”, 8484))
标签3.标题 = “开启”
.否则
标签3.标题 = “关闭”
.如果结束
标签4.标题 = “正在检查...”
.如果 (客户1.连接 (“218.30.74.142”, 8484))
标签4.标题 = “开启”
.否则
标签4.标题 = “关闭”
.如果结束
标签5.标题 = “正在检查...”
.如果 (客户1.连接 (“125.39.60.112”, 8484))
标签5.标题 = “开启”
.否则
标签5.标题 = “关闭”
.如果结束
标签6.标题 = “正在检查...”
.如果 (客户1.连接 (“125.39.90.126”, 8484))
标签6.标题 = “开启”
.否则
标签6.标题 = “关闭”
.如果结束
标签7.标题 = “正在检查...”
.如果 (客户1.连接 (“121.14.48.107”, 8484))
标签7.标题 = “开启”
.否则
标签7.标题 = “关闭”
.如果结束
强制结束线程 (线程)
线程 = 0
易语言检测本机是否能够扫描3389
这个能看懂了吧,0到65535端口直接可以查看是否开启
调用格式: 〈逻辑型〉 端口检测 (整数型 端口,[文本型 IP地址]) - 应用接口支持库-网络通信
英文名称:CheckPort
检测指定的端口是否开放。开放返回真;否则返回假。本命令为初级命令。
参数1的名称为“端口”,类型为“整数型(int)”。检测的端口。
参数2的名称为“IP地址”,类型为“文本型(text)”,可以被省略。置空则检测本机端口。
操作系统需求: Windows
易语言怎么连接扫描枪
先将数据线分别连接至条码扫描枪的数据线插口和电脑USB端口(其他接口扫描枪的连接方式稍有不同,具体可以参考用户手册)。按住触发键不放,照明灯被激活,出现红色照明区域及红色对焦线。
条形码作为一种及时、准确、可靠、经济的数据输入手段已被物流信息系统所采用。在工业发达的国家已经普及应用,已成为商品独有的世界通用的“身份证”。
欧美、日本等等国家已经普遍使用条形码技术,而且正在世界各地迅速推广普及,其应用领域还在不断扩大。由于采用了条码,消费者从心理上对商品质量产生了安全感,条码在识别伪劣产品、防假打假中也可起到重要作用。
因为条码技术具有先进、适用、容易掌握和见效快等特点,在信息(数据)采集中发挥优势无论在商品的入库、出库、上架还是和顾客结算的过程,都要面对如何将数据量巨大的商品(不论是整包包装还是拆封后单个零售)信息输入计算机中的问题。
如果在单个商品的包装上,印制上条码符号,利用条码阅读器,就可以高速、准确、及时地掌握商品的品种(货号)、数量、单价、生产厂家、出厂日期等信息。
关于易语言bat命令使用
所谓 端口扫描 其实就是用一个客户去连接IP-PORT,如果可以连接上,就返回真,否则返回假~
.版本 2
.程序集变量 IP, 文本型, , "0"
.程序集变量 cnt, 整数型
.子程序 _按钮1_被单击, , , 处理IP
IP = 分割文本 (编辑框1.内容, #换行符, )
cnt = 取数组下标 (IP, )
.子程序 _按钮2_被单击, , , 扫描
SCAN (6666)
.子程序 _按钮3_被单击, , , 扫描
SCAN (6668)
.子程序 SCAN
.参数 port, 整数型
.局部变量 tmp, 整数型
.计次循环首 (cnt, tmp)
.如果真 (客户1.连接 (IP [tmp], port))
编辑框2.加入文本 (IP [tmp], #换行符)
.如果真结束
处理事件 ()
.计次循环尾 ()
不需要BAT....麻烦~
0条大神的评论