易语⾔保存txt⽅法2 .版本 2
.⼦程序 保存已经添加的数据
.局部变量 ⽂件号, 整数型
.局部变量 ⽂本, ⽂本型
选择夹1.现⾏⼦夹 = 3
.如果真 (⽂件是否存在 (“D:\易语⾔\⼩软件2\鞋⼦资料获取\已经写⼊数据库.txt”) = 假) ' ⽂件不存在
写到⽂件 (“D:\易语⾔\⼩软件2\鞋⼦资料获取\已经写⼊数据库.txt”, { })
.如果真结束
⽂件号 = 打开⽂件 (“D:\易语⾔\⼩软件2\鞋⼦资料获取\已经写⼊数据库.txt”, , )
移到⽂件尾 (⽂件号)
.如果 (写⽂本⾏ (⽂件号, 编辑框14_链接地址.内容) = 真)
易语言收费版和免费版的区别标签14.标题 = “写⼊成功” + 到⽂本 (⽂件号)
.否则
标签14.标题 = “写⼊失败” + 到⽂本 (⽂件号)
.如果结束
关闭⽂件 (⽂件号)
版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198,我们将在24小时内删除。
发表评论