易语言合并EDB数据库工具

易语言 2020-08-24 17:34:27

易语言合并EDB数据库工具

本易语言例程源码是易语言论坛用户编写的教程,属于易语言数据库类教程。
本易语言例程还使用到易语言特殊功能支持库。

.判断开始 (验证结果 = “真真真”)
按钮返回值 = 信息框 (“数据库属性完全匹配,可以合并!” + #换行符 + #换行符 + “确定开始合并吗?”, #信息图标 + #确认取消钮, “恭喜,可以合并!”)
.如果真 (按钮返回值 = 0)
.如果 (合并数据库 () = 真)
信息框 (“数据库合并成功,请使用预览功能查看!”, #信息图标, “恭喜”)
调试输出 (“★数据库合并成功!”)
编辑框1.加入文本 (“★数据库合并成功!” + #换行符)
合并.宽度 = 104
预览3.可视 = 真
.否则
信息框 (“未知错误,数据库合并失败!”, #警告图标, “错误”)
调试输出 (“◆未知错误,数据库合并失败!”)
编辑框1.加入文本 (“◆未知错误,数据库合并失败!” + #换行符)
.如果结束

.如果真结束
返回 ()
.判断 (验证结果 = “真真假”)
按钮返回值 = 信息框 (“数据库基本属性匹配,但字段尺寸不匹配,合并时会自动更改不匹配的字段尺寸。” + #换行符 + #换行符 + “确定开始合并吗?”, #信息图标 + #确认取消钮, “恭喜,可以合并!”)
.如果真 (按钮返回值 = 0)
.如果 (合并数据库 () = 真)
信息框 (“数据库合并成功,请使用预览功能查看!”, #信息图标, “恭喜”)
调试输出 (“★数据库合并成功!”)
编辑框1.加入文本 (“★数据库合并成功!” + #换行符)
合并.宽度 = 104
预览3.可视 = 真
.否则
信息框 (“未知错误,数据库合并失败!”, #警告图标, “错误”)
调试输出 (“◆未知错误,数据库合并失败!”)
编辑框1.加入文本 (“◆未知错误,数据库合并失败!” + #换行符)