TCP连接操作模块

strhrth · 发表于 2013-1-13 11:27:05

顶~~ 必须顶需要这个

strhrth · 发表于 2013-2-20 10:36:32

多谢楼主.... 看看里面的东东

j23349 · 发表于 2013-3-20 11:13:41

小女孩都很卡哇伊！有个MM头发好长啊！

Etgame · 发表于 2013-5-12 12:04:37

小西 TCP连接操作模块

Etgame · 发表于 2013-5-12 12:10:34

.版本 2
.支持库 iext

.程序集窗口程序集1

.子程序 __启动窗口_创建完毕

_按钮1_被单击 ()

.子程序 _按钮1_被单击, , , 方法1
.局部变量 TCP, TCP信息目录, , , 注意方法1 与方法2 的变量数据类型不一样方法2的为简化版的
.局部变量连接数, 整数型
.局部变量 i, 整数型

.如果真 (TCP_取连接信息 (TCP) ＝ 0)  ' 成功返回为0
连接数＝ TCP.连接数
标题＝ “当前TCP连接数: ” ＋到文本 (连接数) ＋ “ 方法1”
超级列表框1.全部删除 ()
.计次循环首 (连接数, i)
      超级列表框1.插入表项 (i － 1, TCP_到IP (TCP.信息 [i].本机IP), , , , )
      超级列表框1.置标题 (i － 1, 1, TCP_到端口 (TCP.信息 [i].本机端口))
      超级列表框1.置标题 (i － 1, 2, TCP_到IP (TCP.信息 [i].远程IP))
      超级列表框1.置标题 (i － 1, 3, TCP_到端口 (TCP.信息 [i].远程端口))
      超级列表框1.置标题 (i － 1, 4, TCP_到状态 (TCP.信息 [i].状态))
.计次循环尾 ()

.如果真结束

.子程序 _按钮2_被单击, , , 方法2
.局部变量 TCP, TCP列表, , "0", 注意方法1 与方法2 的变量数据类型不一样方法2的为简化版的
.局部变量连接数, 整数型
.局部变量 i, 整数型

连接数＝ TCP_取连接信息2 (TCP)  ' 成功返回为连接数
标题＝ “当前TCP连接数: ” ＋到文本 (连接数) ＋ “ 方法2”
超级列表框1.全部删除 ()
.计次循环首 (连接数, i)
超级列表框1.插入表项 (i － 1, TCP [i].本机IP, , , , )
超级列表框1.置标题 (i － 1, 1, TCP [i].本机端口)
超级列表框1.置标题 (i － 1, 2, TCP [i].远程IP)
超级列表框1.置标题 (i － 1, 3, TCP [i].远程端口)
超级列表框1.置标题 (i － 1, 4, TCP [i].状态)
.计次循环尾 ()

.子程序 _按钮3_被单击
.局部变量数, 整数型

TCP_踢远程IP (编辑框1.内容)
_按钮1_被单击 ()

有模块居然不会用的人都有。。。。无语

lgf84453549 · 发表于 2013-6-14 23:54:19

好东西....

sundong · 发表于 2013-7-3 17:34:10

串口

wliang0521 · 发表于 2016-5-25 14:05:55

学习一下，谢谢分享

a5698304 · 发表于 2019-1-25 16:04:13

11111111111111111111

0312 · 发表于 2019-5-17 13:10:22

6666666666666666

		自动登录	找回密码
密码			注册

[易语言成品模块] TCP连接操作模块