WEB服务自动生成HTML文件

易语言 2020-12-26 22:24:32

文本 = 读入文本 (打开文件 (取运行目录 () + “\FILE.TXT”, , ), )
文本组 = 分割文本 (文本, #换行符, )
.如果真 (取数组成员数 (文本组) > 0)
.计次循环首 (取数组成员数 (文本组), i)
数据中间 = 子文件返回 (文本组 [i]) + #换行符 + 数据中间
.计次循环尾 ()
局_网页 = #数据头 + 数据中间 + #数据尾
返回 (局_网页)