易语言依赖FTP登陆注册的例子

注册本地路径 ＝ 取特定目录 (11) ＋ “/” ＋ 注册账号 ＋ “.c”
写配置项 (注册本地路径, “配置”, “user_id”, 注册账号) ' 账号
写配置项 (注册本地路径, “配置”, “user_password”, 注册密码) ' 密码
按钮_reg.标题 ＝ “注册中”
.如果 (连接FTP服务器 (“012.3vftp.com”, #FTP账号, #FTP密码, 21, ) ＝ 假)
信息框 (“无法链接到服务器！”, 0, , )
按钮_reg.禁止 ＝ 假
.否则
.如果 (FTP文件上传 (注册本地路径, “\user\” ＋ 注册账号 ＋ “.c”, ) ＝ 真)
信息框 (“注册成功啦！” ＋ #换行符 ＋ “您的账号：” ＋ 注册账号 ＋ #换行符 ＋ “您的密码：” ＋ 注册密码 ＋ #换行符 ＋ “请妥善保管！”, 64, “温馨提示”, )
按钮_reg.标题 ＝ “急速注册”
按钮_reg.禁止 ＝ 假
.否则
信息框 (“注册失败。我们深感抱歉。”, 48, , )
按钮_reg.禁止 ＝ 假