文本去重的小工具

文本 ＝ 编辑框_源文本.内容 ＋ 编辑框_新文本.内容
.如果真 (文件是否存在 (取运行目录 () ＋ “新数据库”) ＝ 假)
创建目录 (取运行目录 () ＋ “新数据库”)
.如果真结束
写到文件 (取运行目录 () ＋ “新数据库” ＋ 到文本 (取现行时间 ()) ＋ “.txt”, 到字节集 (文本))
信息框 (“保存成功！”, 0, , )
易语言文本去重的小工具例子。