使用FTP服务器自动更新小程序

易语言 2020-08-07 16:55:45

使用FTP服务器自动更新小程序

文件号 [1] = 打开文件 (“C:\Users\Administrator\Desktop\软件更新案例\版本信息.txt”, #读写, 1) ' 先检查本地软件版本
版本号 [1] = 读入一行 (文件号 [1]) ' 将读入本地版本号
调试输出 (版本号 [1])
关闭文件 (文件号 [1])
拖放对象1.注册拖放控件 (_启动窗口.取窗口句柄 ()) ' 用于上传文件,方便试验
.如果真 (版本号 [1] ≠ “”) ' 先确定找到本地版本号才运行以下代码
.如果 (FTP.连接FTP服务器 (“这里输入你申请的服务链接”, “这输入用户名!”, “这里输入密码”, 21, &日志回调, )) ' 登录服务器
.如果真 (文件_删除 (“C:\Users\Administrator\Desktop\软件更新案例\版本信息.txt”))
启动线程 (&更新线程2, , )
.如果真结束
_启动窗口.标题 = “连接服务器成功” ' 提示服务器连接成功
.否则
_启动窗口.标题 = “连接服务器失败”