易语言统计在线人数代码：[3]上传统计

1、在前一篇的代码下增加如下代码：FTP文件上传 (取运行目录 () ＋ “\人数.txt”, “在线人数.txt”, )这里用到的命令就是FTP文件上传（）。取运行目录 () ＋ “\人数.txt”为本地处理后的统计人数文件“在线人数.txt”为服务器上的那个统计文件这里原来是上传覆盖掉原来服务器的文件。

2、经过以上代码，算是简单的完成了统计人数的增加，你可以加上判断来决定这些代码是否重新执行，达到统计成功的目的！如下代码：判断 (连接FTP服务器 (“FTP地址”, “FTP用户名”, “ftp密码”, , ) ＝ 真) .如果 (FTP文件下载 (“在线人数.txt”, 取运行目录 () ＋ “\人数.txt”, ) ＝ 真) 在线人数 ＝ 到整数 (到文本 (读入文件 (取运行目录 () ＋ “\人数.txt”))) ＋ 1 .如果 (写到文件 (取运行目录 () ＋ “\人数.txt”, 到字节集 (到文本 (在线人数))) ＝ 真) .如果 (FTP文件上传 (取运行目录 () ＋ “\人数.txt”, “在线人数.txt”, ) ＝ 真) 时钟1.时钟周期 ＝ 0 断开FTP服务器 ()PS：目的是当所有代码都返回真的时候，再让时钟1周期事件不再执行并断开服务器，周期变为0，否则继续会从FTP服务器下载“在线人数.txt”文件

3、当用户关闭退出软件时，减去一个1。这样我们便能完整的实现统计在在线人数了，回到窗口界面，点击倒三角，添加一个处理事件的子程序，“__启动窗口_将被销毁”。

4、直接复制上面写的代码，改动后如下：判断 (连接FTP服务器 (“FTP地址”, “用户名”, “密码”, , ) ＝ 真) .如果 (FTP文件下载 (“在线人数.txt”, 取运行目录 () ＋ “\人数.txt”, ) ＝ 真) 在线人数 ＝ 到整数 (到文本 (读入文件 (取运行目录 () ＋ “\人数.txt”))) － 1 .如果 (写到文件 (取运行目录 () ＋ “\人数.txt”, 到字节集 (到文本 (在线人数))) ＝ 真) .如果 (FTP文件上传 (取运行目录 () ＋ “\人数.txt”, “在线人数.txt”, ) ＝ 真) 断开FTP服务器 ()PS：之前+1，现在变成减1，去掉“时钟1.时钟周期 ＝ 0”代码这样便能让程序在退出的时候去改变FTP服务器中“在线人数.txt”这个文件的数据，让之前+1的数值减去1个。注意：不要直接处理本地的“在线.txt”文件，不然会导致数据不准确！

5、最后增加一个对软件有益的代码，比如当上传完成“在线.txt”这个文件后删除本地的“在线.txt”文件。可以减少下次该用户使用程序时出错的几率！

6、当然！在程序被关闭后，我们也需要删除掉“在线.txt”这个统计人数的文件。经过以上的步骤是不是完全掌握了如何统计在线人数呢？作为作者本人的你是否会编写一个及时反馈在线人数的程序？接下来我详细讲解如何编写一个动态反馈给作者在线人数的程序！