FTP留言板源码多客户留言并获取内容

用的时钟做的刷新,效率低的掉渣。
应用接口支持库因为部分人没有静态库.所以采用的模块.
多客户端留言同时刷新获取.数据报原理。

.如果真 (FTP_是否已连接 () ＝ 假)
FTP_连接FTP服务器 (“FTP地址”, “FTP帐号”, “FTPMM”, 21)
.如果真结束
.如果真 (FTP_文件下载 (“wwwroot/txt/text.ini”, “c:\text.ini”) ＝ 假)
编辑框_留言板.加入文本 (“获取留言失败,请检测您的网络连接！” ＋ #换行符)
返回 ()
.如果真结束
local_配置名数组 ＝ 取配置节名 (“c:\text.ini”)
.计次循环首 (取数组成员数 (local_配置名数组), local_计次数据)
local_name ＝ local_配置名数组 [local_计次数据]
local_text ＝ 读配置项 (“c:\text.ini”, local_配置名数组 [local_计次数据], “text”, )
local_test ＝ local_name ＋ “：” ＋ #换行符 ＋ local_text
.如果真 (寻找文本 (编辑框_留言板.内容, local_test, , 假) ＝ -1)
编辑框_留言板.加入文本 (local_name ＋ “：” ＋ #换行符 ＋ local_text ＋ #换行符 ＋ #换行符 ＋ #换行符)
.如果真结束

.计次循环尾 ()