给有需要的同学,同时也希望有心人能写出更方便更好的电子书工具来。
目录中文档顺序(需要时用手工编辑来排序)
.判断循环首 (原文件名 ≠ “”)
.如果真 (原文件名 ≠ “.” 且 原文件名 ≠ “..”)
新文件名 = 取文本左边 (原文件名, 倒找文本 (原文件名, “.”, , 假) - 1) + 新类型
wjlj = 目录 + 原文件名
lswb0 = 读入文件 (wjlj)
lswb = 到文本 (lswb0)
lswb = 删尾空 (lswb)
lswb = 子文本替换 (lswb, #换行符, “
”, , , 假)
lswb = #tou + lswb + #wei
' 输出调试文本 (原文件名)
写到文件 (目录 + 新文件名, 到字节集 (lswb))
删除文件 (目录 + 原文件名)
.如果真 (文件是否存在 (目录 + “leftbg.gif”) = 假)
写到文件 (目录 + “leftbg.gif”, #gif)
.如果真结束
.如果真结束
原文件名 = 寻找文件 (, )
.判断循环尾 ()
原文件名 = 寻找文件 (目录 + “*.*”, #子目录) ' 寻找子文件夹文件
.判断循环首 (原文件名 ≠ “”)
.如果真 (取文本左边 (原文件名, 1) ≠ “.”) ' “.”判断是文件夹就寻找这个文件夹的所有文件和文件夹。
txt2htm批量转换 (目录 + 原文件名, 原始类型, 新类型)
.如果真结束
原文件名 = 寻找文件 (, #子目录)
.判断循环尾 ()
下一篇 FTP留言板功能,自动获取内容